LCOV - code coverage report
Current view: top level - gcc - var-tracking.c (source / functions) Hit Total Coverage
Test: gcc.info Lines: 4311 4717 91.4 %
Date: 2020-04-04 11:58:09 Functions: 156 168 92.9 %
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-2020 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 "calls.h"
     111                 :            : #include "tree-dfa.h"
     112                 :            : #include "tree-ssa.h"
     113                 :            : #include "cselib.h"
     114                 :            : #include "tree-pretty-print.h"
     115                 :            : #include "rtl-iter.h"
     116                 :            : #include "fibonacci_heap.h"
     117                 :            : #include "print-rtl.h"
     118                 :            : #include "function-abi.h"
     119                 :            : 
     120                 :            : typedef fibonacci_heap <long, basic_block_def> bb_heap_t;
     121                 :            : typedef fibonacci_node <long, basic_block_def> bb_heap_node_t;
     122                 :            : 
     123                 :            : /* var-tracking.c assumes that tree code with the same value as VALUE rtx code
     124                 :            :    has no chance to appear in REG_EXPR/MEM_EXPRs and isn't a decl.
     125                 :            :    Currently the value is the same as IDENTIFIER_NODE, which has such
     126                 :            :    a property.  If this compile time assertion ever fails, make sure that
     127                 :            :    the new tree code that equals (int) VALUE has the same property.  */
     128                 :            : extern char check_value_val[(int) VALUE == (int) IDENTIFIER_NODE ? 1 : -1];
     129                 :            : 
     130                 :            : /* Type of micro operation.  */
     131                 :            : enum micro_operation_type
     132                 :            : {
     133                 :            :   MO_USE,       /* Use location (REG or MEM).  */
     134                 :            :   MO_USE_NO_VAR,/* Use location which is not associated with a variable
     135                 :            :                    or the variable is not trackable.  */
     136                 :            :   MO_VAL_USE,   /* Use location which is associated with a value.  */
     137                 :            :   MO_VAL_LOC,   /* Use location which appears in a debug insn.  */
     138                 :            :   MO_VAL_SET,   /* Set location associated with a value.  */
     139                 :            :   MO_SET,       /* Set location.  */
     140                 :            :   MO_COPY,      /* Copy the same portion of a variable from one
     141                 :            :                    location to another.  */
     142                 :            :   MO_CLOBBER,   /* Clobber location.  */
     143                 :            :   MO_CALL,      /* Call insn.  */
     144                 :            :   MO_ADJUST     /* Adjust stack pointer.  */
     145                 :            : 
     146                 :            : };
     147                 :            : 
     148                 :            : static const char * const ATTRIBUTE_UNUSED
     149                 :            : micro_operation_type_name[] = {
     150                 :            :   "MO_USE",
     151                 :            :   "MO_USE_NO_VAR",
     152                 :            :   "MO_VAL_USE",
     153                 :            :   "MO_VAL_LOC",
     154                 :            :   "MO_VAL_SET",
     155                 :            :   "MO_SET",
     156                 :            :   "MO_COPY",
     157                 :            :   "MO_CLOBBER",
     158                 :            :   "MO_CALL",
     159                 :            :   "MO_ADJUST"
     160                 :            : };
     161                 :            : 
     162                 :            : /* Where shall the note be emitted?  BEFORE or AFTER the instruction.
     163                 :            :    Notes emitted as AFTER_CALL are to take effect during the call,
     164                 :            :    rather than after the call.  */
     165                 :            : enum emit_note_where
     166                 :            : {
     167                 :            :   EMIT_NOTE_BEFORE_INSN,
     168                 :            :   EMIT_NOTE_AFTER_INSN,
     169                 :            :   EMIT_NOTE_AFTER_CALL_INSN
     170                 :            : };
     171                 :            : 
     172                 :            : /* Structure holding information about micro operation.  */
     173                 :            : struct micro_operation
     174                 :            : {
     175                 :            :   /* Type of micro operation.  */
     176                 :            :   enum micro_operation_type type;
     177                 :            : 
     178                 :            :   /* The instruction which the micro operation is in, for MO_USE,
     179                 :            :      MO_USE_NO_VAR, MO_CALL and MO_ADJUST, or the subsequent
     180                 :            :      instruction or note in the original flow (before any var-tracking
     181                 :            :      notes are inserted, to simplify emission of notes), for MO_SET
     182                 :            :      and MO_CLOBBER.  */
     183                 :            :   rtx_insn *insn;
     184                 :            : 
     185                 :            :   union {
     186                 :            :     /* Location.  For MO_SET and MO_COPY, this is the SET that
     187                 :            :        performs the assignment, if known, otherwise it is the target
     188                 :            :        of the assignment.  For MO_VAL_USE and MO_VAL_SET, it is a
     189                 :            :        CONCAT of the VALUE and the LOC associated with it.  For
     190                 :            :        MO_VAL_LOC, it is a CONCAT of the VALUE and the VAR_LOCATION
     191                 :            :        associated with it.  */
     192                 :            :     rtx loc;
     193                 :            : 
     194                 :            :     /* Stack adjustment.  */
     195                 :            :     HOST_WIDE_INT adjust;
     196                 :            :   } u;
     197                 :            : };
     198                 :            : 
     199                 :            : 
     200                 :            : /* A declaration of a variable, or an RTL value being handled like a
     201                 :            :    declaration.  */
     202                 :            : typedef void *decl_or_value;
     203                 :            : 
     204                 :            : /* Return true if a decl_or_value DV is a DECL or NULL.  */
     205                 :            : static inline bool
     206                 :29690000000 : dv_is_decl_p (decl_or_value dv)
     207                 :            : {
     208                 :19009300000 :   return !dv || (int) TREE_CODE ((tree) dv) != (int) VALUE;
     209                 :            : }
     210                 :            : 
     211                 :            : /* Return true if a decl_or_value is a VALUE rtl.  */
     212                 :            : static inline bool
     213                 :25532700000 : dv_is_value_p (decl_or_value dv)
     214                 :            : {
     215                 :   53669700 :   return dv && !dv_is_decl_p (dv);
     216                 :            : }
     217                 :            : 
     218                 :            : /* Return the decl in the decl_or_value.  */
     219                 :            : static inline tree
     220                 : 3851430000 : dv_as_decl (decl_or_value dv)
     221                 :            : {
     222                 :          0 :   gcc_checking_assert (dv_is_decl_p (dv));
     223                 : 3851430000 :   return (tree) dv;
     224                 :            : }
     225                 :            : 
     226                 :            : /* Return the value in the decl_or_value.  */
     227                 :            : static inline rtx
     228                 :10332300000 : dv_as_value (decl_or_value dv)
     229                 :            : {
     230                 :          0 :   gcc_checking_assert (dv_is_value_p (dv));
     231                 :10246300000 :   return (rtx)dv;
     232                 :            : }
     233                 :            : 
     234                 :            : /* Return the opaque pointer in the decl_or_value.  */
     235                 :            : static inline void *
     236                 :13098800000 : dv_as_opaque (decl_or_value dv)
     237                 :            : {
     238                 :13098800000 :   return dv;
     239                 :            : }
     240                 :            : 
     241                 :            : 
     242                 :            : /* Description of location of a part of a variable.  The content of a physical
     243                 :            :    register is described by a chain of these structures.
     244                 :            :    The chains are pretty short (usually 1 or 2 elements) and thus
     245                 :            :    chain is the best data structure.  */
     246                 :            : struct attrs
     247                 :            : {
     248                 :            :   /* Pointer to next member of the list.  */
     249                 :            :   attrs *next;
     250                 :            : 
     251                 :            :   /* The rtx of register.  */
     252                 :            :   rtx loc;
     253                 :            : 
     254                 :            :   /* The declaration corresponding to LOC.  */
     255                 :            :   decl_or_value dv;
     256                 :            : 
     257                 :            :   /* Offset from start of DECL.  */
     258                 :            :   HOST_WIDE_INT offset;
     259                 :            : };
     260                 :            : 
     261                 :            : /* Structure for chaining the locations.  */
     262                 :            : struct location_chain
     263                 :            : {
     264                 :            :   /* Next element in the chain.  */
     265                 :            :   location_chain *next;
     266                 :            : 
     267                 :            :   /* The location (REG, MEM or VALUE).  */
     268                 :            :   rtx loc;
     269                 :            : 
     270                 :            :   /* The "value" stored in this location.  */
     271                 :            :   rtx set_src;
     272                 :            : 
     273                 :            :   /* Initialized? */
     274                 :            :   enum var_init_status init;
     275                 :            : };
     276                 :            : 
     277                 :            : /* A vector of loc_exp_dep holds the active dependencies of a one-part
     278                 :            :    DV on VALUEs, i.e., the VALUEs expanded so as to form the current
     279                 :            :    location of DV.  Each entry is also part of VALUE' s linked-list of
     280                 :            :    backlinks back to DV.  */
     281                 :            : struct loc_exp_dep
     282                 :            : {
     283                 :            :   /* The dependent DV.  */
     284                 :            :   decl_or_value dv;
     285                 :            :   /* The dependency VALUE or DECL_DEBUG.  */
     286                 :            :   rtx value;
     287                 :            :   /* The next entry in VALUE's backlinks list.  */
     288                 :            :   struct loc_exp_dep *next;
     289                 :            :   /* A pointer to the pointer to this entry (head or prev's next) in
     290                 :            :      the doubly-linked list.  */
     291                 :            :   struct loc_exp_dep **pprev;
     292                 :            : };
     293                 :            : 
     294                 :            : 
     295                 :            : /* This data structure holds information about the depth of a variable
     296                 :            :    expansion.  */
     297                 :            : struct expand_depth
     298                 :            : {
     299                 :            :   /* This measures the complexity of the expanded expression.  It
     300                 :            :      grows by one for each level of expansion that adds more than one
     301                 :            :      operand.  */
     302                 :            :   int complexity;
     303                 :            :   /* This counts the number of ENTRY_VALUE expressions in an
     304                 :            :      expansion.  We want to minimize their use.  */
     305                 :            :   int entryvals;
     306                 :            : };
     307                 :            : 
     308                 :            : /* This data structure is allocated for one-part variables at the time
     309                 :            :    of emitting notes.  */
     310                 :            : struct onepart_aux
     311                 :            : {
     312                 :            :   /* Doubly-linked list of dependent DVs.  These are DVs whose cur_loc
     313                 :            :      computation used the expansion of this variable, and that ought
     314                 :            :      to be notified should this variable change.  If the DV's cur_loc
     315                 :            :      expanded to NULL, all components of the loc list are regarded as
     316                 :            :      active, so that any changes in them give us a chance to get a
     317                 :            :      location.  Otherwise, only components of the loc that expanded to
     318                 :            :      non-NULL are regarded as active dependencies.  */
     319                 :            :   loc_exp_dep *backlinks;
     320                 :            :   /* This holds the LOC that was expanded into cur_loc.  We need only
     321                 :            :      mark a one-part variable as changed if the FROM loc is removed,
     322                 :            :      or if it has no known location and a loc is added, or if it gets
     323                 :            :      a change notification from any of its active dependencies.  */
     324                 :            :   rtx from;
     325                 :            :   /* The depth of the cur_loc expression.  */
     326                 :            :   expand_depth depth;
     327                 :            :   /* Dependencies actively used when expand FROM into cur_loc.  */
     328                 :            :   vec<loc_exp_dep, va_heap, vl_embed> deps;
     329                 :            : };
     330                 :            : 
     331                 :            : /* Structure describing one part of variable.  */
     332                 :            : struct variable_part
     333                 :            : {
     334                 :            :   /* Chain of locations of the part.  */
     335                 :            :   location_chain *loc_chain;
     336                 :            : 
     337                 :            :   /* Location which was last emitted to location list.  */
     338                 :            :   rtx cur_loc;
     339                 :            : 
     340                 :            :   union variable_aux
     341                 :            :   {
     342                 :            :     /* The offset in the variable, if !var->onepart.  */
     343                 :            :     HOST_WIDE_INT offset;
     344                 :            : 
     345                 :            :     /* Pointer to auxiliary data, if var->onepart and emit_notes.  */
     346                 :            :     struct onepart_aux *onepaux;
     347                 :            :   } aux;
     348                 :            : };
     349                 :            : 
     350                 :            : /* Maximum number of location parts.  */
     351                 :            : #define MAX_VAR_PARTS 16
     352                 :            : 
     353                 :            : /* Enumeration type used to discriminate various types of one-part
     354                 :            :    variables.  */
     355                 :            : enum onepart_enum
     356                 :            : {
     357                 :            :   /* Not a one-part variable.  */
     358                 :            :   NOT_ONEPART = 0,
     359                 :            :   /* A one-part DECL that is not a DEBUG_EXPR_DECL.  */
     360                 :            :   ONEPART_VDECL = 1,
     361                 :            :   /* A DEBUG_EXPR_DECL.  */
     362                 :            :   ONEPART_DEXPR = 2,
     363                 :            :   /* A VALUE.  */
     364                 :            :   ONEPART_VALUE = 3
     365                 :            : };
     366                 :            : 
     367                 :            : /* Structure describing where the variable is located.  */
     368                 :            : struct variable
     369                 :            : {
     370                 :            :   /* The declaration of the variable, or an RTL value being handled
     371                 :            :      like a declaration.  */
     372                 :            :   decl_or_value dv;
     373                 :            : 
     374                 :            :   /* Reference count.  */
     375                 :            :   int refcount;
     376                 :            : 
     377                 :            :   /* Number of variable parts.  */
     378                 :            :   char n_var_parts;
     379                 :            : 
     380                 :            :   /* What type of DV this is, according to enum onepart_enum.  */
     381                 :            :   ENUM_BITFIELD (onepart_enum) onepart : CHAR_BIT;
     382                 :            : 
     383                 :            :   /* True if this variable_def struct is currently in the
     384                 :            :      changed_variables hash table.  */
     385                 :            :   bool in_changed_variables;
     386                 :            : 
     387                 :            :   /* The variable parts.  */
     388                 :            :   variable_part var_part[1];
     389                 :            : };
     390                 :            : 
     391                 :            : /* Pointer to the BB's information specific to variable tracking pass.  */
     392                 :            : #define VTI(BB) ((variable_tracking_info *) (BB)->aux)
     393                 :            : 
     394                 :            : /* Return MEM_OFFSET (MEM) as a HOST_WIDE_INT, or 0 if we can't.  */
     395                 :            : 
     396                 :            : static inline HOST_WIDE_INT
     397                 :   15164100 : int_mem_offset (const_rtx mem)
     398                 :            : {
     399                 :   15164100 :   HOST_WIDE_INT offset;
     400                 :   15150100 :   if (MEM_OFFSET_KNOWN_P (mem) && MEM_OFFSET (mem).is_constant (&offset))
     401                 :   10220200 :     return offset;
     402                 :            :   return 0;
     403                 :            : }
     404                 :            : 
     405                 :            : #if CHECKING_P && (GCC_VERSION >= 2007)
     406                 :            : 
     407                 :            : /* Access VAR's Ith part's offset, checking that it's not a one-part
     408                 :            :    variable.  */
     409                 :            : #define VAR_PART_OFFSET(var, i) __extension__                   \
     410                 :            : (*({  variable *const __v = (var);                              \
     411                 :            :       gcc_checking_assert (!__v->onepart);                   \
     412                 :            :       &__v->var_part[(i)].aux.offset; }))
     413                 :            : 
     414                 :            : /* Access VAR's one-part auxiliary data, checking that it is a
     415                 :            :    one-part variable.  */
     416                 :            : #define VAR_LOC_1PAUX(var) __extension__                        \
     417                 :            : (*({  variable *const __v = (var);                              \
     418                 :            :       gcc_checking_assert (__v->onepart);                    \
     419                 :            :       &__v->var_part[0].aux.onepaux; }))
     420                 :            : 
     421                 :            : #else
     422                 :            : #define VAR_PART_OFFSET(var, i) ((var)->var_part[(i)].aux.offset)
     423                 :            : #define VAR_LOC_1PAUX(var) ((var)->var_part[0].aux.onepaux)
     424                 :            : #endif
     425                 :            : 
     426                 :            : /* These are accessor macros for the one-part auxiliary data.  When
     427                 :            :    convenient for users, they're guarded by tests that the data was
     428                 :            :    allocated.  */
     429                 :            : #define VAR_LOC_DEP_LST(var) (VAR_LOC_1PAUX (var)                 \
     430                 :            :                               ? VAR_LOC_1PAUX (var)->backlinks         \
     431                 :            :                               : NULL)
     432                 :            : #define VAR_LOC_DEP_LSTP(var) (VAR_LOC_1PAUX (var)                \
     433                 :            :                                ? &VAR_LOC_1PAUX (var)->backlinks  \
     434                 :            :                                : NULL)
     435                 :            : #define VAR_LOC_FROM(var) (VAR_LOC_1PAUX (var)->from)
     436                 :            : #define VAR_LOC_DEPTH(var) (VAR_LOC_1PAUX (var)->depth)
     437                 :            : #define VAR_LOC_DEP_VEC(var) (VAR_LOC_1PAUX (var)                 \
     438                 :            :                               ? &VAR_LOC_1PAUX (var)->deps         \
     439                 :            :                               : NULL)
     440                 :            : 
     441                 :            : 
     442                 :            : 
     443                 :            : typedef unsigned int dvuid;
     444                 :            : 
     445                 :            : /* Return the uid of DV.  */
     446                 :            : 
     447                 :            : static inline dvuid
     448                 :12683800000 : dv_uid (decl_or_value dv)
     449                 :            : {
     450                 :12683800000 :   if (dv_is_value_p (dv))
     451                 : 9285140000 :     return CSELIB_VAL_PTR (dv_as_value (dv))->uid;
     452                 :            :   else
     453                 : 6797380000 :     return DECL_UID (dv_as_decl (dv));
     454                 :            : }
     455                 :            : 
     456                 :            : /* Compute the hash from the uid.  */
     457                 :            : 
     458                 :            : static inline hashval_t
     459                 :12683800000 : dv_uid2hash (dvuid uid)
     460                 :            : {
     461                 :12683800000 :   return uid;
     462                 :            : }
     463                 :            : 
     464                 :            : /* The hash function for a mask table in a shared_htab chain.  */
     465                 :            : 
     466                 :            : static inline hashval_t
     467                 :12683800000 : dv_htab_hash (decl_or_value dv)
     468                 :            : {
     469                 :25367700000 :   return dv_uid2hash (dv_uid (dv));
     470                 :            : }
     471                 :            : 
     472                 :            : static void variable_htab_free (void *);
     473                 :            : 
     474                 :            : /* Variable hashtable helpers.  */
     475                 :            : 
     476                 :            : struct variable_hasher : pointer_hash <variable>
     477                 :            : {
     478                 :            :   typedef void *compare_type;
     479                 :            :   static inline hashval_t hash (const variable *);
     480                 :            :   static inline bool equal (const variable *, const void *);
     481                 :            :   static inline void remove (variable *);
     482                 :            : };
     483                 :            : 
     484                 :            : /* The hash function for variable_htab, computes the hash value
     485                 :            :    from the declaration of variable X.  */
     486                 :            : 
     487                 :            : inline hashval_t
     488                 :10109200000 : variable_hasher::hash (const variable *v)
     489                 :            : {
     490                 :10109200000 :   return dv_htab_hash (v->dv);
     491                 :            : }
     492                 :            : 
     493                 :            : /* Compare the declaration of variable X with declaration Y.  */
     494                 :            : 
     495                 :            : inline bool
     496                 :12384800000 : variable_hasher::equal (const variable *v, const void *y)
     497                 :            : {
     498                 :12384800000 :   decl_or_value dv = CONST_CAST2 (decl_or_value, const void *, y);
     499                 :            : 
     500                 :12384800000 :   return (dv_as_opaque (v->dv) == dv_as_opaque (dv));
     501                 :            : }
     502                 :            : 
     503                 :            : /* Free the element of VARIABLE_HTAB (its type is struct variable_def).  */
     504                 :            : 
     505                 :            : inline void
     506                 :  816375000 : variable_hasher::remove (variable *var)
     507                 :            : {
     508                 :  816375000 :   variable_htab_free (var);
     509                 :  634401000 : }
     510                 :            : 
     511                 :            : typedef hash_table<variable_hasher> variable_table_type;
     512                 :            : typedef variable_table_type::iterator variable_iterator_type;
     513                 :            : 
     514                 :            : /* Structure for passing some other parameters to function
     515                 :            :    emit_note_insn_var_location.  */
     516                 :            : struct emit_note_data
     517                 :            : {
     518                 :            :   /* The instruction which the note will be emitted before/after.  */
     519                 :            :   rtx_insn *insn;
     520                 :            : 
     521                 :            :   /* Where the note will be emitted (before/after insn)?  */
     522                 :            :   enum emit_note_where where;
     523                 :            : 
     524                 :            :   /* The variables and values active at this point.  */
     525                 :            :   variable_table_type *vars;
     526                 :            : };
     527                 :            : 
     528                 :            : /* Structure holding a refcounted hash table.  If refcount > 1,
     529                 :            :    it must be first unshared before modified.  */
     530                 :            : struct shared_hash
     531                 :            : {
     532                 :            :   /* Reference count.  */
     533                 :            :   int refcount;
     534                 :            : 
     535                 :            :   /* Actual hash table.  */
     536                 :            :   variable_table_type *htab;
     537                 :            : };
     538                 :            : 
     539                 :            : /* Structure holding the IN or OUT set for a basic block.  */
     540                 :            : struct dataflow_set
     541                 :            : {
     542                 :            :   /* Adjustment of stack offset.  */
     543                 :            :   HOST_WIDE_INT stack_adjust;
     544                 :            : 
     545                 :            :   /* Attributes for registers (lists of attrs).  */
     546                 :            :   attrs *regs[FIRST_PSEUDO_REGISTER];
     547                 :            : 
     548                 :            :   /* Variable locations.  */
     549                 :            :   shared_hash *vars;
     550                 :            : 
     551                 :            :   /* Vars that is being traversed.  */
     552                 :            :   shared_hash *traversed_vars;
     553                 :            : };
     554                 :            : 
     555                 :            : /* The structure (one for each basic block) containing the information
     556                 :            :    needed for variable tracking.  */
     557                 :            : struct variable_tracking_info
     558                 :            : {
     559                 :            :   /* The vector of micro operations.  */
     560                 :            :   vec<micro_operation> mos;
     561                 :            : 
     562                 :            :   /* The IN and OUT set for dataflow analysis.  */
     563                 :            :   dataflow_set in;
     564                 :            :   dataflow_set out;
     565                 :            : 
     566                 :            :   /* The permanent-in dataflow set for this block.  This is used to
     567                 :            :      hold values for which we had to compute entry values.  ??? This
     568                 :            :      should probably be dynamically allocated, to avoid using more
     569                 :            :      memory in non-debug builds.  */
     570                 :            :   dataflow_set *permp;
     571                 :            : 
     572                 :            :   /* Has the block been visited in DFS?  */
     573                 :            :   bool visited;
     574                 :            : 
     575                 :            :   /* Has the block been flooded in VTA?  */
     576                 :            :   bool flooded;
     577                 :            : 
     578                 :            : };
     579                 :            : 
     580                 :            : /* Alloc pool for struct attrs_def.  */
     581                 :            : object_allocator<attrs> attrs_pool ("attrs pool");
     582                 :            : 
     583                 :            : /* Alloc pool for struct variable_def with MAX_VAR_PARTS entries.  */
     584                 :            : 
     585                 :            : static pool_allocator var_pool
     586                 :            :   ("variable_def pool", sizeof (variable) +
     587                 :            :    (MAX_VAR_PARTS - 1) * sizeof (((variable *)NULL)->var_part[0]));
     588                 :            : 
     589                 :            : /* Alloc pool for struct variable_def with a single var_part entry.  */
     590                 :            : static pool_allocator valvar_pool
     591                 :            :   ("small variable_def pool", sizeof (variable));
     592                 :            : 
     593                 :            : /* Alloc pool for struct location_chain.  */
     594                 :            : static object_allocator<location_chain> location_chain_pool
     595                 :            :   ("location_chain pool");
     596                 :            : 
     597                 :            : /* Alloc pool for struct shared_hash.  */
     598                 :            : static object_allocator<shared_hash> shared_hash_pool ("shared_hash pool");
     599                 :            : 
     600                 :            : /* Alloc pool for struct loc_exp_dep_s for NOT_ONEPART variables.  */
     601                 :            : object_allocator<loc_exp_dep> loc_exp_dep_pool ("loc_exp_dep pool");
     602                 :            : 
     603                 :            : /* Changed variables, notes will be emitted for them.  */
     604                 :            : static variable_table_type *changed_variables;
     605                 :            : 
     606                 :            : /* Shall notes be emitted?  */
     607                 :            : static bool emit_notes;
     608                 :            : 
     609                 :            : /* Values whose dynamic location lists have gone empty, but whose
     610                 :            :    cselib location lists are still usable.  Use this to hold the
     611                 :            :    current location, the backlinks, etc, during emit_notes.  */
     612                 :            : static variable_table_type *dropped_values;
     613                 :            : 
     614                 :            : /* Empty shared hashtable.  */
     615                 :            : static shared_hash *empty_shared_hash;
     616                 :            : 
     617                 :            : /* Scratch register bitmap used by cselib_expand_value_rtx.  */
     618                 :            : static bitmap scratch_regs = NULL;
     619                 :            : 
     620                 :            : #ifdef HAVE_window_save
     621                 :            : struct GTY(()) parm_reg {
     622                 :            :   rtx outgoing;
     623                 :            :   rtx incoming;
     624                 :            : };
     625                 :            : 
     626                 :            : 
     627                 :            : /* Vector of windowed parameter registers, if any.  */
     628                 :            : static vec<parm_reg, va_gc> *windowed_parm_regs = NULL;
     629                 :            : #endif
     630                 :            : 
     631                 :            : /* Variable used to tell whether cselib_process_insn called our hook.  */
     632                 :            : static bool cselib_hook_called;
     633                 :            : 
     634                 :            : /* Local function prototypes.  */
     635                 :            : static void stack_adjust_offset_pre_post (rtx, HOST_WIDE_INT *,
     636                 :            :                                           HOST_WIDE_INT *);
     637                 :            : static void insn_stack_adjust_offset_pre_post (rtx_insn *, HOST_WIDE_INT *,
     638                 :            :                                                HOST_WIDE_INT *);
     639                 :            : static bool vt_stack_adjustments (void);
     640                 :            : 
     641                 :            : static void init_attrs_list_set (attrs **);
     642                 :            : static void attrs_list_clear (attrs **);
     643                 :            : static attrs *attrs_list_member (attrs *, decl_or_value, HOST_WIDE_INT);
     644                 :            : static void attrs_list_insert (attrs **, decl_or_value, HOST_WIDE_INT, rtx);
     645                 :            : static void attrs_list_copy (attrs **, attrs *);
     646                 :            : static void attrs_list_union (attrs **, attrs *);
     647                 :            : 
     648                 :            : static variable **unshare_variable (dataflow_set *set, variable **slot,
     649                 :            :                                         variable *var, enum var_init_status);
     650                 :            : static void vars_copy (variable_table_type *, variable_table_type *);
     651                 :            : static tree var_debug_decl (tree);
     652                 :            : static void var_reg_set (dataflow_set *, rtx, enum var_init_status, rtx);
     653                 :            : static void var_reg_delete_and_set (dataflow_set *, rtx, bool,
     654                 :            :                                     enum var_init_status, rtx);
     655                 :            : static void var_reg_delete (dataflow_set *, rtx, bool);
     656                 :            : static void var_regno_delete (dataflow_set *, int);
     657                 :            : static void var_mem_set (dataflow_set *, rtx, enum var_init_status, rtx);
     658                 :            : static void var_mem_delete_and_set (dataflow_set *, rtx, bool,
     659                 :            :                                     enum var_init_status, rtx);
     660                 :            : static void var_mem_delete (dataflow_set *, rtx, bool);
     661                 :            : 
     662                 :            : static void dataflow_set_init (dataflow_set *);
     663                 :            : static void dataflow_set_clear (dataflow_set *);
     664                 :            : static void dataflow_set_copy (dataflow_set *, dataflow_set *);
     665                 :            : static int variable_union_info_cmp_pos (const void *, const void *);
     666                 :            : static void dataflow_set_union (dataflow_set *, dataflow_set *);
     667                 :            : static location_chain *find_loc_in_1pdv (rtx, variable *,
     668                 :            :                                          variable_table_type *);
     669                 :            : static bool canon_value_cmp (rtx, rtx);
     670                 :            : static int loc_cmp (rtx, rtx);
     671                 :            : static bool variable_part_different_p (variable_part *, variable_part *);
     672                 :            : static bool onepart_variable_different_p (variable *, variable *);
     673                 :            : static bool variable_different_p (variable *, variable *);
     674                 :            : static bool dataflow_set_different (dataflow_set *, dataflow_set *);
     675                 :            : static void dataflow_set_destroy (dataflow_set *);
     676                 :            : 
     677                 :            : static bool track_expr_p (tree, bool);
     678                 :            : static void add_uses_1 (rtx *, void *);
     679                 :            : static void add_stores (rtx, const_rtx, void *);
     680                 :            : static bool compute_bb_dataflow (basic_block);
     681                 :            : static bool vt_find_locations (void);
     682                 :            : 
     683                 :            : static void dump_attrs_list (attrs *);
     684                 :            : static void dump_var (variable *);
     685                 :            : static void dump_vars (variable_table_type *);
     686                 :            : static void dump_dataflow_set (dataflow_set *);
     687                 :            : static void dump_dataflow_sets (void);
     688                 :            : 
     689                 :            : static void set_dv_changed (decl_or_value, bool);
     690                 :            : static void variable_was_changed (variable *, dataflow_set *);
     691                 :            : static variable **set_slot_part (dataflow_set *, rtx, variable **,
     692                 :            :                                  decl_or_value, HOST_WIDE_INT,
     693                 :            :                                  enum var_init_status, rtx);
     694                 :            : static void set_variable_part (dataflow_set *, rtx,
     695                 :            :                                decl_or_value, HOST_WIDE_INT,
     696                 :            :                                enum var_init_status, rtx, enum insert_option);
     697                 :            : static variable **clobber_slot_part (dataflow_set *, rtx,
     698                 :            :                                      variable **, HOST_WIDE_INT, rtx);
     699                 :            : static void clobber_variable_part (dataflow_set *, rtx,
     700                 :            :                                    decl_or_value, HOST_WIDE_INT, rtx);
     701                 :            : static variable **delete_slot_part (dataflow_set *, rtx, variable **,
     702                 :            :                                     HOST_WIDE_INT);
     703                 :            : static void delete_variable_part (dataflow_set *, rtx,
     704                 :            :                                   decl_or_value, HOST_WIDE_INT);
     705                 :            : static void emit_notes_in_bb (basic_block, dataflow_set *);
     706                 :            : static void vt_emit_notes (void);
     707                 :            : 
     708                 :            : static void vt_add_function_parameters (void);
     709                 :            : static bool vt_initialize (void);
     710                 :            : static void vt_finalize (void);
     711                 :            : 
     712                 :            : /* Callback for stack_adjust_offset_pre_post, called via for_each_inc_dec.  */
     713                 :            : 
     714                 :            : static int
     715                 :    5559950 : stack_adjust_offset_pre_post_cb (rtx, rtx op, rtx dest, rtx src, rtx srcoff,
     716                 :            :                                  void *arg)
     717                 :            : {
     718                 :    5559950 :   if (dest != stack_pointer_rtx)
     719                 :            :     return 0;
     720                 :            : 
     721                 :    5559950 :   switch (GET_CODE (op))
     722                 :            :     {
     723                 :    3950080 :     case PRE_INC:
     724                 :    3950080 :     case PRE_DEC:
     725                 :    3950080 :       ((HOST_WIDE_INT *)arg)[0] -= INTVAL (srcoff);
     726                 :    3950080 :       return 0;
     727                 :    1579850 :     case POST_INC:
     728                 :    1579850 :     case POST_DEC:
     729                 :    1579850 :       ((HOST_WIDE_INT *)arg)[1] -= INTVAL (srcoff);
     730                 :    1579850 :       return 0;
     731                 :      30028 :     case PRE_MODIFY:
     732                 :      30028 :     case POST_MODIFY:
     733                 :            :       /* We handle only adjustments by constant amount.  */
     734                 :      30028 :       gcc_assert (GET_CODE (src) == PLUS
     735                 :            :                   && CONST_INT_P (XEXP (src, 1))
     736                 :            :                   && XEXP (src, 0) == stack_pointer_rtx);
     737                 :      30028 :       ((HOST_WIDE_INT *)arg)[GET_CODE (op) == POST_MODIFY]
     738                 :      30028 :         -= INTVAL (XEXP (src, 1));
     739                 :      30028 :       return 0;
     740                 :          0 :     default:
     741                 :          0 :       gcc_unreachable ();
     742                 :            :     }
     743                 :            : }
     744                 :            : 
     745                 :            : /* Given a SET, calculate the amount of stack adjustment it contains
     746                 :            :    PRE- and POST-modifying stack pointer.
     747                 :            :    This function is similar to stack_adjust_offset.  */
     748                 :            : 
     749                 :            : static void
     750                 :   44833200 : stack_adjust_offset_pre_post (rtx pattern, HOST_WIDE_INT *pre,
     751                 :            :                               HOST_WIDE_INT *post)
     752                 :            : {
     753                 :   44833200 :   rtx src = SET_SRC (pattern);
     754                 :   44833200 :   rtx dest = SET_DEST (pattern);
     755                 :   44833200 :   enum rtx_code code;
     756                 :            : 
     757                 :   44833200 :   if (dest == stack_pointer_rtx)
     758                 :            :     {
     759                 :            :       /* (set (reg sp) (plus (reg sp) (const_int))) */
     760                 :    2434480 :       code = GET_CODE (src);
     761                 :    2434480 :       if (! (code == PLUS || code == MINUS)
     762                 :    2433700 :           || XEXP (src, 0) != stack_pointer_rtx
     763                 :    2433700 :           || !CONST_INT_P (XEXP (src, 1)))
     764                 :    2434480 :         return;
     765                 :            : 
     766                 :    2433660 :       if (code == MINUS)
     767                 :          4 :         *post += INTVAL (XEXP (src, 1));
     768                 :            :       else
     769                 :    2433650 :         *post -= INTVAL (XEXP (src, 1));
     770                 :    2433660 :       return;
     771                 :            :     }
     772                 :   42398700 :   HOST_WIDE_INT res[2] = { 0, 0 };
     773                 :   42398700 :   for_each_inc_dec (pattern, stack_adjust_offset_pre_post_cb, res);
     774                 :   42398700 :   *pre += res[0];
     775                 :   42398700 :   *post += res[1];
     776                 :            : }
     777                 :            : 
     778                 :            : /* Given an INSN, calculate the amount of stack adjustment it contains
     779                 :            :    PRE- and POST-modifying stack pointer.  */
     780                 :            : 
     781                 :            : static void
     782                 :   99892800 : insn_stack_adjust_offset_pre_post (rtx_insn *insn, HOST_WIDE_INT *pre,
     783                 :            :                                    HOST_WIDE_INT *post)
     784                 :            : {
     785                 :   99892800 :   rtx pattern;
     786                 :            : 
     787                 :   99892800 :   *pre = 0;
     788                 :   99892800 :   *post = 0;
     789                 :            : 
     790                 :   99892800 :   pattern = PATTERN (insn);
     791                 :   99892800 :   if (RTX_FRAME_RELATED_P (insn))
     792                 :            :     {
     793                 :    3577760 :       rtx expr = find_reg_note (insn, REG_FRAME_RELATED_EXPR, NULL_RTX);
     794                 :    3577760 :       if (expr)
     795                 :         10 :         pattern = XEXP (expr, 0);
     796                 :            :     }
     797                 :            : 
     798                 :   99892800 :   if (GET_CODE (pattern) == SET)
     799                 :   38801300 :     stack_adjust_offset_pre_post (pattern, pre, post);
     800                 :   61091500 :   else if (GET_CODE (pattern) == PARALLEL
     801                 :   55310600 :            || GET_CODE (pattern) == SEQUENCE)
     802                 :            :     {
     803                 :    5780880 :       int i;
     804                 :            : 
     805                 :            :       /* There may be stack adjustments inside compound insns.  Search
     806                 :            :          for them.  */
     807                 :   18487600 :       for ( i = XVECLEN (pattern, 0) - 1; i >= 0; i--)
     808                 :   12706700 :         if (GET_CODE (XVECEXP (pattern, 0, i)) == SET)
     809                 :    6031850 :           stack_adjust_offset_pre_post (XVECEXP (pattern, 0, i), pre, post);
     810                 :            :     }
     811                 :   99892800 : }
     812                 :            : 
     813                 :            : /* Compute stack adjustments for all blocks by traversing DFS tree.
     814                 :            :    Return true when the adjustments on all incoming edges are consistent.
     815                 :            :    Heavily borrowed from pre_and_rev_post_order_compute.  */
     816                 :            : 
     817                 :            : static bool
     818                 :     321433 : vt_stack_adjustments (void)
     819                 :            : {
     820                 :     321433 :   edge_iterator *stack;
     821                 :     321433 :   int sp;
     822                 :            : 
     823                 :            :   /* Initialize entry block.  */
     824                 :     321433 :   VTI (ENTRY_BLOCK_PTR_FOR_FN (cfun))->visited = true;
     825                 :     321433 :   VTI (ENTRY_BLOCK_PTR_FOR_FN (cfun))->in.stack_adjust
     826                 :     321433 :     = INCOMING_FRAME_SP_OFFSET;
     827                 :     321433 :   VTI (ENTRY_BLOCK_PTR_FOR_FN (cfun))->out.stack_adjust
     828                 :     321433 :     = INCOMING_FRAME_SP_OFFSET;
     829                 :            : 
     830                 :            :   /* Allocate stack for back-tracking up CFG.  */
     831                 :     321433 :   stack = XNEWVEC (edge_iterator, n_basic_blocks_for_fn (cfun) + 1);
     832                 :     321433 :   sp = 0;
     833                 :            : 
     834                 :            :   /* Push the first edge on to the stack.  */
     835                 :     321433 :   stack[sp++] = ei_start (ENTRY_BLOCK_PTR_FOR_FN (cfun)->succs);
     836                 :            : 
     837                 :   10789500 :   while (sp)
     838                 :            :     {
     839                 :   10468100 :       edge_iterator ei;
     840                 :   10468100 :       basic_block src;
     841                 :   10468100 :       basic_block dest;
     842                 :            : 
     843                 :            :       /* Look at the edge on the top of the stack.  */
     844                 :   10468100 :       ei = stack[sp - 1];
     845                 :   10468100 :       src = ei_edge (ei)->src;
     846                 :   10468100 :       dest = ei_edge (ei)->dest;
     847                 :            : 
     848                 :            :       /* Check if the edge destination has been visited yet.  */
     849                 :   10468100 :       if (!VTI (dest)->visited)
     850                 :            :         {
     851                 :    4318230 :           rtx_insn *insn;
     852                 :    4318230 :           HOST_WIDE_INT pre, post, offset;
     853                 :    4318230 :           VTI (dest)->visited = true;
     854                 :    4318230 :           VTI (dest)->in.stack_adjust = offset = VTI (src)->out.stack_adjust;
     855                 :            : 
     856                 :    4318230 :           if (dest != EXIT_BLOCK_PTR_FOR_FN (cfun))
     857                 :    4001640 :             for (insn = BB_HEAD (dest);
     858                 :   63261100 :                  insn != NEXT_INSN (BB_END (dest));
     859                 :   59259500 :                  insn = NEXT_INSN (insn))
     860                 :   59259500 :               if (INSN_P (insn))
     861                 :            :                 {
     862                 :   49949300 :                   insn_stack_adjust_offset_pre_post (insn, &pre, &post);
     863                 :   49949300 :                   offset += pre + post;
     864                 :            :                 }
     865                 :            : 
     866                 :    4318230 :           VTI (dest)->out.stack_adjust = offset;
     867                 :            : 
     868                 :    8127650 :           if (EDGE_COUNT (dest->succs) > 0)
     869                 :            :             /* Since the DEST node has been visited for the first
     870                 :            :                time, check its successors.  */
     871                 :    3809420 :             stack[sp++] = ei_start (dest->succs);
     872                 :            :         }
     873                 :            :       else
     874                 :            :         {
     875                 :            :           /* We can end up with different stack adjustments for the exit block
     876                 :            :              of a shrink-wrapped function if stack_adjust_offset_pre_post
     877                 :            :              doesn't understand the rtx pattern used to restore the stack
     878                 :            :              pointer in the epilogue.  For example, on s390(x), the stack
     879                 :            :              pointer is often restored via a load-multiple instruction
     880                 :            :              and so no stack_adjust offset is recorded for it.  This means
     881                 :            :              that the stack offset at the end of the epilogue block is the
     882                 :            :              same as the offset before the epilogue, whereas other paths
     883                 :            :              to the exit block will have the correct stack_adjust.
     884                 :            : 
     885                 :            :              It is safe to ignore these differences because (a) we never
     886                 :            :              use the stack_adjust for the exit block in this pass and
     887                 :            :              (b) dwarf2cfi checks whether the CFA notes in a shrink-wrapped
     888                 :            :              function are correct.
     889                 :            : 
     890                 :            :              We must check whether the adjustments on other edges are
     891                 :            :              the same though.  */
     892                 :    6149900 :           if (dest != EXIT_BLOCK_PTR_FOR_FN (cfun)
     893                 :    5738020 :               && VTI (dest)->in.stack_adjust != VTI (src)->out.stack_adjust)
     894                 :            :             {
     895                 :         45 :               free (stack);
     896                 :         45 :               return false;
     897                 :            :             }
     898                 :            : 
     899                 :    6149860 :           if (! ei_one_before_end_p (ei))
     900                 :            :             /* Go to the next edge.  */
     901                 :    2019270 :             ei_next (&stack[sp - 1]);
     902                 :            :           else
     903                 :            :             /* Return to previous level if there are no more edges.  */
     904                 :    4130590 :             sp--;
     905                 :            :         }
     906                 :            :     }
     907                 :            : 
     908                 :     321388 :   free (stack);
     909                 :     321388 :   return true;
     910                 :            : }
     911                 :            : 
     912                 :            : /* arg_pointer_rtx resp. frame_pointer_rtx if stack_pointer_rtx or
     913                 :            :    hard_frame_pointer_rtx is being mapped to it and offset for it.  */
     914                 :            : static rtx cfa_base_rtx;
     915                 :            : static HOST_WIDE_INT cfa_base_offset;
     916                 :            : 
     917                 :            : /* Compute a CFA-based value for an ADJUSTMENT made to stack_pointer_rtx
     918                 :            :    or hard_frame_pointer_rtx.  */
     919                 :            : 
     920                 :            : static inline rtx
     921                 :   13597200 : compute_cfa_pointer (poly_int64 adjustment)
     922                 :            : {
     923                 :   20091100 :   return plus_constant (Pmode, cfa_base_rtx, adjustment + cfa_base_offset);
     924                 :            : }
     925                 :            : 
     926                 :            : /* Adjustment for hard_frame_pointer_rtx to cfa base reg,
     927                 :            :    or -1 if the replacement shouldn't be done.  */
     928                 :            : static poly_int64 hard_frame_pointer_adjustment = -1;
     929                 :            : 
     930                 :            : /* Data for adjust_mems callback.  */
     931                 :            : 
     932                 :   56420000 : class adjust_mem_data
     933                 :            : {
     934                 :            : public:
     935                 :            :   bool store;
     936                 :            :   machine_mode mem_mode;
     937                 :            :   HOST_WIDE_INT stack_adjust;
     938                 :            :   auto_vec<rtx> side_effects;
     939                 :            : };
     940                 :            : 
     941                 :            : /* Helper for adjust_mems.  Return true if X is suitable for
     942                 :            :    transformation of wider mode arithmetics to narrower mode.  */
     943                 :            : 
     944                 :            : static bool
     945                 :         98 : use_narrower_mode_test (rtx x, const_rtx subreg)
     946                 :            : {
     947                 :         98 :   subrtx_var_iterator::array_type array;
     948                 :        234 :   FOR_EACH_SUBRTX_VAR (iter, array, x, NONCONST)
     949                 :            :     {
     950                 :        196 :       rtx x = *iter;
     951                 :        196 :       if (CONSTANT_P (x))
     952                 :         14 :         iter.skip_subrtxes ();
     953                 :            :       else
     954                 :        182 :         switch (GET_CODE (x))
     955                 :            :           {
     956                 :         63 :           case REG:
     957                 :         63 :             if (cselib_lookup (x, GET_MODE (SUBREG_REG (subreg)), 0, VOIDmode))
     958                 :         60 :               return false;
     959                 :         24 :             if (!validate_subreg (GET_MODE (subreg), GET_MODE (x), x,
     960                 :         24 :                                   subreg_lowpart_offset (GET_MODE (subreg),
     961                 :         24 :                                                          GET_MODE (x))))
     962                 :            :               return false;
     963                 :            :             break;
     964                 :            :           case PLUS:
     965                 :            :           case MINUS:
     966                 :            :           case MULT:
     967                 :            :             break;
     968                 :         98 :           case ASHIFT:
     969                 :         98 :             if (GET_MODE (XEXP (x, 1)) != VOIDmode)
     970                 :            :               {
     971                 :         67 :                 enum machine_mode mode = GET_MODE (subreg);
     972                 :         67 :                 rtx op1 = XEXP (x, 1);
     973                 :         67 :                 enum machine_mode op1_mode = GET_MODE (op1);
     974                 :         67 :                 if (GET_MODE_PRECISION (as_a <scalar_int_mode> (mode))
     975                 :         67 :                     < GET_MODE_PRECISION (as_a <scalar_int_mode> (op1_mode)))
     976                 :            :                   {
     977                 :         29 :                     poly_uint64 byte = subreg_lowpart_offset (mode, op1_mode);
     978                 :         29 :                     if (GET_CODE (op1) == SUBREG || GET_CODE (op1) == CONCAT)
     979                 :            :                       {
     980                 :          1 :                         if (!simplify_subreg (mode, op1, op1_mode, byte))
     981                 :          0 :                           return false;
     982                 :            :                       }
     983                 :         28 :                     else if (!validate_subreg (mode, op1_mode, op1, byte))
     984                 :            :                       return false;
     985                 :            :                   }
     986                 :            :               }
     987                 :        136 :             iter.substitute (XEXP (x, 0));
     988                 :            :             break;
     989                 :            :           default:
     990                 :            :             return false;
     991                 :            :           }
     992                 :            :     }
     993                 :         38 :   return true;
     994                 :            : }
     995                 :            : 
     996                 :            : /* Transform X into narrower mode MODE from wider mode WMODE.  */
     997                 :            : 
     998                 :            : static rtx
     999                 :         76 : use_narrower_mode (rtx x, scalar_int_mode mode, scalar_int_mode wmode)
    1000                 :            : {
    1001                 :         76 :   rtx op0, op1;
    1002                 :         76 :   if (CONSTANT_P (x))
    1003                 :         14 :     return lowpart_subreg (mode, x, wmode);
    1004                 :         62 :   switch (GET_CODE (x))
    1005                 :            :     {
    1006                 :         24 :     case REG:
    1007                 :         24 :       return lowpart_subreg (mode, x, wmode);
    1008                 :          0 :     case PLUS:
    1009                 :          0 :     case MINUS:
    1010                 :          0 :     case MULT:
    1011                 :          0 :       op0 = use_narrower_mode (XEXP (x, 0), mode, wmode);
    1012                 :          0 :       op1 = use_narrower_mode (XEXP (x, 1), mode, wmode);
    1013                 :          0 :       return simplify_gen_binary (GET_CODE (x), mode, op0, op1);
    1014                 :         38 :     case ASHIFT:
    1015                 :         38 :       op0 = use_narrower_mode (XEXP (x, 0), mode, wmode);
    1016                 :         38 :       op1 = XEXP (x, 1);
    1017                 :            :       /* Ensure shift amount is not wider than mode.  */
    1018                 :         38 :       if (GET_MODE (op1) == VOIDmode)
    1019                 :          6 :         op1 = lowpart_subreg (mode, op1, wmode);
    1020                 :         32 :       else if (GET_MODE_PRECISION (mode)
    1021                 :         32 :                < GET_MODE_PRECISION (as_a <scalar_int_mode> (GET_MODE (op1))))
    1022                 :         13 :         op1 = lowpart_subreg (mode, op1, GET_MODE (op1));
    1023                 :         38 :       return simplify_gen_binary (ASHIFT, mode, op0, op1);
    1024                 :          0 :     default:
    1025                 :          0 :       gcc_unreachable ();
    1026                 :            :     }
    1027                 :            : }
    1028                 :            : 
    1029                 :            : /* Helper function for adjusting used MEMs.  */
    1030                 :            : 
    1031                 :            : static rtx
    1032                 :  203988000 : adjust_mems (rtx loc, const_rtx old_rtx, void *data)
    1033                 :            : {
    1034                 :  203988000 :   class adjust_mem_data *amd = (class adjust_mem_data *) data;
    1035                 :  203988000 :   rtx mem, addr = loc, tem;
    1036                 :  203988000 :   machine_mode mem_mode_save;
    1037                 :  203988000 :   bool store_save;
    1038                 :  203988000 :   scalar_int_mode tem_mode, tem_subreg_mode;
    1039                 :  203988000 :   poly_int64 size;
    1040                 :  203988000 :   switch (GET_CODE (loc))
    1041                 :            :     {
    1042                 :   44541200 :     case REG:
    1043                 :            :       /* Don't do any sp or fp replacements outside of MEM addresses
    1044                 :            :          on the LHS.  */
    1045                 :   44541200 :       if (amd->mem_mode == VOIDmode && amd->store)
    1046                 :            :         return loc;
    1047                 :   44527500 :       if (loc == stack_pointer_rtx
    1048                 :   15613700 :           && !frame_pointer_needed
    1049                 :   13693800 :           && cfa_base_rtx)
    1050                 :   13377100 :         return compute_cfa_pointer (amd->stack_adjust);
    1051                 :   31150500 :       else if (loc == hard_frame_pointer_rtx
    1052                 :    2053670 :                && frame_pointer_needed
    1053                 :    2053310 :                && maybe_ne (hard_frame_pointer_adjustment, -1)
    1054                 :   31370600 :                && cfa_base_rtx)
    1055                 :     220102 :         return compute_cfa_pointer (hard_frame_pointer_adjustment);
    1056                 :   30930400 :       gcc_checking_assert (loc != virtual_incoming_args_rtx);
    1057                 :            :       return loc;
    1058                 :   16876300 :     case MEM:
    1059                 :   16876300 :       mem = loc;
    1060                 :   16876300 :       if (!amd->store)
    1061                 :            :         {
    1062                 :    9659920 :           mem = targetm.delegitimize_address (mem);
    1063                 :    9659920 :           if (mem != loc && !MEM_P (mem))
    1064                 :     103172 :             return simplify_replace_fn_rtx (mem, old_rtx, adjust_mems, data);
    1065                 :            :         }
    1066                 :            : 
    1067                 :   16773200 :       addr = XEXP (mem, 0);
    1068                 :   16773200 :       mem_mode_save = amd->mem_mode;
    1069                 :   16773200 :       amd->mem_mode = GET_MODE (mem);
    1070                 :   16773200 :       store_save = amd->store;
    1071                 :   16773200 :       amd->store = false;
    1072                 :   16773200 :       addr = simplify_replace_fn_rtx (addr, old_rtx, adjust_mems, data);
    1073                 :   16773200 :       amd->store = store_save;
    1074                 :   16773200 :       amd->mem_mode = mem_mode_save;
    1075                 :   16773200 :       if (mem == loc)
    1076                 :   16730800 :         addr = targetm.delegitimize_address (addr);
    1077                 :   16773200 :       if (addr != XEXP (mem, 0))
    1078                 :    8403690 :         mem = replace_equiv_address_nv (mem, addr);
    1079                 :   16773200 :       if (!amd->store)
    1080                 :    9556750 :         mem = avoid_constant_pool_reference (mem);
    1081                 :            :       return mem;
    1082                 :    2438500 :     case PRE_INC:
    1083                 :    2438500 :     case PRE_DEC:
    1084                 :    4877000 :       size = GET_MODE_SIZE (amd->mem_mode);
    1085                 :    2438500 :       addr = plus_constant (GET_MODE (loc), XEXP (loc, 0),
    1086                 :    2438500 :                             GET_CODE (loc) == PRE_INC ? size : -size);
    1087                 :            :       /* FALLTHRU */
    1088                 :    3309890 :     case POST_INC:
    1089                 :    3309890 :     case POST_DEC:
    1090                 :    3309890 :       if (addr == loc)
    1091                 :     871393 :         addr = XEXP (loc, 0);
    1092                 :    3309890 :       gcc_assert (amd->mem_mode != VOIDmode && amd->mem_mode != BLKmode);
    1093                 :    3309890 :       addr = simplify_replace_fn_rtx (addr, old_rtx, adjust_mems, data);
    1094                 :    6619780 :       size = GET_MODE_SIZE (amd->mem_mode);
    1095                 :     871393 :       tem = plus_constant (GET_MODE (loc), XEXP (loc, 0),
    1096                 :    3309890 :                            (GET_CODE (loc) == PRE_INC
    1097                 :    6619780 :                             || GET_CODE (loc) == POST_INC) ? size : -size);
    1098                 :    3309890 :       store_save = amd->store;
    1099                 :    3309890 :       amd->store = false;
    1100                 :    3309890 :       tem = simplify_replace_fn_rtx (tem, old_rtx, adjust_mems, data);
    1101                 :    3309890 :       amd->store = store_save;
    1102                 :    3309890 :       amd->side_effects.safe_push (gen_rtx_SET (XEXP (loc, 0), tem));
    1103                 :    3309890 :       return addr;
    1104                 :      21165 :     case PRE_MODIFY:
    1105                 :      21165 :       addr = XEXP (loc, 1);
    1106                 :            :       /* FALLTHRU */
    1107                 :      21165 :     case POST_MODIFY:
    1108                 :      21165 :       if (addr == loc)
    1109                 :          0 :         addr = XEXP (loc, 0);
    1110                 :      21165 :       gcc_assert (amd->mem_mode != VOIDmode);
    1111                 :      21165 :       addr = simplify_replace_fn_rtx (addr, old_rtx, adjust_mems, data);
    1112                 :      21165 :       store_save = amd->store;
    1113                 :      21165 :       amd->store = false;
    1114                 :      21165 :       tem = simplify_replace_fn_rtx (XEXP (loc, 1), old_rtx,
    1115                 :            :                                      adjust_mems, data);
    1116                 :      21165 :       amd->store = store_save;
    1117                 :      21165 :       amd->side_effects.safe_push (gen_rtx_SET (XEXP (loc, 0), tem));
    1118                 :      21165 :       return addr;
    1119                 :      35723 :     case SUBREG:
    1120                 :            :       /* First try without delegitimization of whole MEMs and
    1121                 :            :          avoid_constant_pool_reference, which is more likely to succeed.  */
    1122                 :      35723 :       store_save = amd->store;
    1123                 :      35723 :       amd->store = true;
    1124                 :      35723 :       addr = simplify_replace_fn_rtx (SUBREG_REG (loc), old_rtx, adjust_mems,
    1125                 :            :                                       data);
    1126                 :      35723 :       amd->store = store_save;
    1127                 :      35723 :       mem = simplify_replace_fn_rtx (addr, old_rtx, adjust_mems, data);
    1128                 :      35723 :       if (mem == SUBREG_REG (loc))
    1129                 :            :         {
    1130                 :      35158 :           tem = loc;
    1131                 :      35158 :           goto finish_subreg;
    1132                 :            :         }
    1133                 :       1130 :       tem = simplify_gen_subreg (GET_MODE (loc), mem,
    1134                 :        565 :                                  GET_MODE (SUBREG_REG (loc)),
    1135                 :        565 :                                  SUBREG_BYTE (loc));
    1136                 :        565 :       if (tem)
    1137                 :        565 :         goto finish_subreg;
    1138                 :          0 :       tem = simplify_gen_subreg (GET_MODE (loc), addr,
    1139                 :          0 :                                  GET_MODE (SUBREG_REG (loc)),
    1140                 :          0 :                                  SUBREG_BYTE (loc));
    1141                 :          0 :       if (tem == NULL_RTX)
    1142                 :          0 :         tem = gen_rtx_raw_SUBREG (GET_MODE (loc), addr, SUBREG_BYTE (loc));
    1143                 :          0 :     finish_subreg:
    1144                 :      35723 :       if (MAY_HAVE_DEBUG_BIND_INSNS
    1145                 :      35723 :           && GET_CODE (tem) == SUBREG
    1146                 :      35723 :           && (GET_CODE (SUBREG_REG (tem)) == PLUS
    1147                 :            :               || GET_CODE (SUBREG_REG (tem)) == MINUS
    1148                 :      35723 :               || GET_CODE (SUBREG_REG (tem)) == MULT
    1149                 :      35630 :               || GET_CODE (SUBREG_REG (tem)) == ASHIFT)
    1150                 :        196 :           && is_a <scalar_int_mode> (GET_MODE (tem), &tem_mode)
    1151                 :        178 :           && is_a <scalar_int_mode> (GET_MODE (SUBREG_REG (tem)),
    1152                 :            :                                      &tem_subreg_mode)
    1153                 :        101 :           && (GET_MODE_PRECISION (tem_mode)
    1154                 :        101 :               < GET_MODE_PRECISION (tem_subreg_mode))
    1155                 :        101 :           && subreg_lowpart_p (tem)
    1156                 :      35821 :           && use_narrower_mode_test (SUBREG_REG (tem), tem))
    1157                 :         38 :         return use_narrower_mode (SUBREG_REG (tem), tem_mode, tem_subreg_mode);
    1158                 :            :       return tem;
    1159                 :       6344 :     case ASM_OPERANDS:
    1160                 :            :       /* Don't do any replacements in second and following
    1161                 :            :          ASM_OPERANDS of inline-asm with multiple sets.
    1162                 :            :          ASM_OPERANDS_INPUT_VEC, ASM_OPERANDS_INPUT_CONSTRAINT_VEC
    1163                 :            :          and ASM_OPERANDS_LABEL_VEC need to be equal between
    1164                 :            :          all the ASM_OPERANDs in the insn and adjust_insn will
    1165                 :            :          fix this up.  */
    1166                 :       6344 :       if (ASM_OPERANDS_OUTPUT_IDX (loc) != 0)
    1167                 :       1937 :         return loc;
    1168                 :            :       break;
    1169                 :            :     default:
    1170                 :            :       break;
    1171                 :            :     }
    1172                 :            :   return NULL_RTX;
    1173                 :            : }
    1174                 :            : 
    1175                 :            : /* Helper function for replacement of uses.  */
    1176                 :            : 
    1177                 :            : static void
    1178                 :   64031200 : adjust_mem_uses (rtx *x, void *data)
    1179                 :            : {
    1180                 :   64031200 :   rtx new_x = simplify_replace_fn_rtx (*x, NULL_RTX, adjust_mems, data);
    1181                 :   64031200 :   if (new_x != *x)
    1182                 :    7008920 :     validate_change (NULL_RTX, x, new_x, true);
    1183                 :   64031200 : }
    1184                 :            : 
    1185                 :            : /* Helper function for replacement of stores.  */
    1186                 :            : 
    1187                 :            : static void
    1188                 :   29872400 : adjust_mem_stores (rtx loc, const_rtx expr, void *data)
    1189                 :            : {
    1190                 :   29872400 :   if (MEM_P (loc))
    1191                 :            :     {
    1192                 :    7207790 :       rtx new_dest = simplify_replace_fn_rtx (SET_DEST (expr), NULL_RTX,
    1193                 :            :                                               adjust_mems, data);
    1194                 :    7207790 :       if (new_dest != SET_DEST (expr))
    1195                 :            :         {
    1196                 :    4704970 :           rtx xexpr = CONST_CAST_RTX (expr);
    1197                 :    4704970 :           validate_change (NULL_RTX, &SET_DEST (xexpr), new_dest, true);
    1198                 :            :         }
    1199                 :            :     }
    1200                 :   29872400 : }
    1201                 :            : 
    1202                 :            : /* Simplify INSN.  Remove all {PRE,POST}_{INC,DEC,MODIFY} rtxes,
    1203                 :            :    replace them with their value in the insn and add the side-effects
    1204                 :            :    as other sets to the insn.  */
    1205                 :            : 
    1206                 :            : static void
    1207                 :   56411800 : adjust_insn (basic_block bb, rtx_insn *insn)
    1208                 :            : {
    1209                 :   56411800 :   rtx set;
    1210                 :            : 
    1211                 :            : #ifdef HAVE_window_save
    1212                 :            :   /* If the target machine has an explicit window save instruction, the
    1213                 :            :      transformation OUTGOING_REGNO -> INCOMING_REGNO is done there.  */
    1214                 :            :   if (RTX_FRAME_RELATED_P (insn)
    1215                 :            :       && find_reg_note (insn, REG_CFA_WINDOW_SAVE, NULL_RTX))
    1216                 :            :     {
    1217                 :            :       unsigned int i, nregs = vec_safe_length (windowed_parm_regs);
    1218                 :            :       rtx rtl = gen_rtx_PARALLEL (VOIDmode, rtvec_alloc (nregs * 2));
    1219                 :            :       parm_reg *p;
    1220                 :            : 
    1221                 :            :       FOR_EACH_VEC_SAFE_ELT (windowed_parm_regs, i, p)
    1222                 :            :         {
    1223                 :            :           XVECEXP (rtl, 0, i * 2)
    1224                 :            :             = gen_rtx_SET (p->incoming, p->outgoing);
    1225                 :            :           /* Do not clobber the attached DECL, but only the REG.  */
    1226                 :            :           XVECEXP (rtl, 0, i * 2 + 1)
    1227                 :            :             = gen_rtx_CLOBBER (GET_MODE (p->outgoing),
    1228                 :            :                                gen_raw_REG (GET_MODE (p->outgoing),
    1229                 :            :                                             REGNO (p->outgoing)));
    1230                 :            :         }
    1231                 :            : 
    1232                 :            :       validate_change (NULL_RTX, &PATTERN (insn), rtl, true);
    1233                 :            :       return;
    1234                 :            :     }
    1235                 :            : #endif
    1236                 :            : 
    1237                 :   56411800 :   adjust_mem_data amd;
    1238                 :   56411800 :   amd.mem_mode = VOIDmode;
    1239                 :   56411800 :   amd.stack_adjust = -VTI (bb)->out.stack_adjust;
    1240                 :            : 
    1241                 :   56411800 :   amd.store = true;
    1242                 :   56411800 :   note_stores (insn, adjust_mem_stores, &amd);
    1243                 :            : 
    1244                 :   56411800 :   amd.store = false;
    1245                 :   56411800 :   if (GET_CODE (PATTERN (insn)) == PARALLEL
    1246                 :    3385210 :       && asm_noperands (PATTERN (insn)) > 0
    1247                 :   56417800 :       && GET_CODE (XVECEXP (PATTERN (insn), 0, 0)) == SET)
    1248                 :            :     {
    1249                 :       4407 :       rtx body, set0;
    1250                 :       4407 :       int i;
    1251                 :            : 
    1252                 :            :       /* inline-asm with multiple sets is tiny bit more complicated,
    1253                 :            :          because the 3 vectors in ASM_OPERANDS need to be shared between
    1254                 :            :          all ASM_OPERANDS in the instruction.  adjust_mems will
    1255                 :            :          not touch ASM_OPERANDS other than the first one, asm_noperands
    1256                 :            :          test above needs to be called before that (otherwise it would fail)
    1257                 :            :          and afterwards this code fixes it up.  */
    1258                 :       4407 :       note_uses (&PATTERN (insn), adjust_mem_uses, &amd);
    1259                 :       4407 :       body = PATTERN (insn);
    1260                 :       4407 :       set0 = XVECEXP (body, 0, 0);
    1261                 :       4407 :       gcc_checking_assert (GET_CODE (set0) == SET
    1262                 :            :                            && GET_CODE (SET_SRC (set0)) == ASM_OPERANDS
    1263                 :            :                            && ASM_OPERANDS_OUTPUT_IDX (SET_SRC (set0)) == 0);
    1264                 :       6344 :       for (i = 1; i < XVECLEN (body, 0); i++)
    1265                 :       6344 :         if (GET_CODE (XVECEXP (body, 0, i)) != SET)
    1266                 :            :           break;
    1267                 :            :         else
    1268                 :            :           {
    1269                 :       1937 :             set = XVECEXP (body, 0, i);
    1270                 :       1937 :             gcc_checking_assert (GET_CODE (SET_SRC (set)) == ASM_OPERANDS
    1271                 :            :                                  && ASM_OPERANDS_OUTPUT_IDX (SET_SRC (set))
    1272                 :            :                                     == i);
    1273                 :       1937 :             if (ASM_OPERANDS_INPUT_VEC (SET_SRC (set))
    1274                 :       1937 :                 != ASM_OPERANDS_INPUT_VEC (SET_SRC (set0))
    1275                 :       1655 :                 || ASM_OPERANDS_INPUT_CONSTRAINT_VEC (SET_SRC (set))
    1276                 :       1655 :                    != ASM_OPERANDS_INPUT_CONSTRAINT_VEC (SET_SRC (set0))
    1277                 :       1655 :                 || ASM_OPERANDS_LABEL_VEC (SET_SRC (set))
    1278                 :       1655 :                    != ASM_OPERANDS_LABEL_VEC (SET_SRC (set0)))
    1279                 :            :               {
    1280                 :        282 :                 rtx newsrc = shallow_copy_rtx (SET_SRC (set));
    1281                 :        282 :                 ASM_OPERANDS_INPUT_VEC (newsrc)
    1282                 :        282 :                   = ASM_OPERANDS_INPUT_VEC (SET_SRC (set0));
    1283                 :        282 :                 ASM_OPERANDS_INPUT_CONSTRAINT_VEC (newsrc)
    1284                 :        282 :                   = ASM_OPERANDS_INPUT_CONSTRAINT_VEC (SET_SRC (set0));
    1285                 :        282 :                 ASM_OPERANDS_LABEL_VEC (newsrc)
    1286                 :        282 :                   = ASM_OPERANDS_LABEL_VEC (SET_SRC (set0));
    1287                 :        282 :                 validate_change (NULL_RTX, &SET_SRC (set), newsrc, true);
    1288                 :            :               }
    1289                 :            :           }
    1290                 :            :     }
    1291                 :            :   else
    1292                 :   56407400 :     note_uses (&PATTERN (insn), adjust_mem_uses, &amd);
    1293                 :            : 
    1294                 :            :   /* For read-only MEMs containing some constant, prefer those
    1295                 :            :      constants.  */
    1296                 :   56411800 :   set = single_set (insn);
    1297                 :   56411800 :   if (set && MEM_P (SET_SRC (set)) && MEM_READONLY_P (SET_SRC (set)))
    1298                 :            :     {
    1299                 :      23661 :       rtx note = find_reg_equal_equiv_note (insn);
    1300                 :            : 
    1301                 :      23661 :       if (note && CONSTANT_P (XEXP (note, 0)))
    1302                 :          0 :         validate_change (NULL_RTX, &SET_SRC (set), XEXP (note, 0), true);
    1303                 :            :     }
    1304                 :            : 
    1305                 :   56411800 :   if (!amd.side_effects.is_empty ())
    1306                 :            :     {
    1307                 :    3331060 :       rtx *pat, new_pat;
    1308                 :    3331060 :       int i, oldn;
    1309                 :            : 
    1310                 :    3331060 :       pat = &PATTERN (insn);
    1311                 :    3331060 :       if (GET_CODE (*pat) == COND_EXEC)
    1312                 :          0 :         pat = &COND_EXEC_CODE (*pat);
    1313                 :    3331060 :       if (GET_CODE (*pat) == PARALLEL)
    1314                 :      10424 :         oldn = XVECLEN (*pat, 0);
    1315                 :            :       else
    1316                 :            :         oldn = 1;
    1317                 :    3331060 :       unsigned int newn = amd.side_effects.length ();
    1318                 :    3331060 :       new_pat = gen_rtx_PARALLEL (VOIDmode, rtvec_alloc (oldn + newn));
    1319                 :    3331060 :       if (GET_CODE (*pat) == PARALLEL)
    1320                 :      31272 :         for (i = 0; i < oldn; i++)
    1321                 :      20848 :           XVECEXP (new_pat, 0, i) = XVECEXP (*pat, 0, i);
    1322                 :            :       else
    1323                 :    3320630 :         XVECEXP (new_pat, 0, 0) = *pat;
    1324                 :            : 
    1325                 :    3331060 :       rtx effect;
    1326                 :    3331060 :       unsigned int j;
    1327                 :    9993170 :       FOR_EACH_VEC_ELT_REVERSE (amd.side_effects, j, effect)
    1328                 :    3331060 :         XVECEXP (new_pat, 0, j + oldn) = effect;
    1329                 :    3331060 :       validate_change (NULL_RTX, pat, new_pat, true);
    1330                 :            :     }
    1331                 :   56411800 : }
    1332                 :            : 
    1333                 :            : /* Return the DEBUG_EXPR of a DEBUG_EXPR_DECL or the VALUE in DV.  */
    1334                 :            : static inline rtx
    1335                 :    9926790 : dv_as_rtx (decl_or_value dv)
    1336                 :            : {
    1337                 :    9926790 :   tree decl;
    1338                 :            : 
    1339                 :    9926790 :   if (dv_is_value_p (dv))
    1340                 :    9926790 :     return dv_as_value (dv);
    1341                 :            : 
    1342                 :    1847980 :   decl = dv_as_decl (dv);
    1343                 :            : 
    1344                 :    1847980 :   gcc_checking_assert (TREE_CODE (decl) == DEBUG_EXPR_DECL);
    1345                 :    1847980 :   return DECL_RTL_KNOWN_SET (decl);
    1346                 :            : }
    1347                 :            : 
    1348                 :            : /* Return nonzero if a decl_or_value must not have more than one
    1349                 :            :    variable part.  The returned value discriminates among various
    1350                 :            :    kinds of one-part DVs ccording to enum onepart_enum.  */
    1351                 :            : static inline onepart_enum
    1352                 :  421596000 : dv_onepart_p (decl_or_value dv)
    1353                 :            : {
    1354                 :  421596000 :   tree decl;
    1355                 :            : 
    1356                 :  421596000 :   if (!MAY_HAVE_DEBUG_BIND_INSNS)
    1357                 :            :     return NOT_ONEPART;
    1358                 :            : 
    1359                 :  421596000 :   if (dv_is_value_p (dv))
    1360                 :            :     return ONEPART_VALUE;
    1361                 :            : 
    1362                 :  119377000 :   decl = dv_as_decl (dv);
    1363                 :            : 
    1364                 :  119377000 :   if (TREE_CODE (decl) == DEBUG_EXPR_DECL)
    1365                 :            :     return ONEPART_DEXPR;
    1366                 :            : 
    1367                 :   98491500 :   if (target_for_debug_bind (decl) != NULL_TREE)
    1368                 :   93726500 :     return ONEPART_VDECL;
    1369                 :            : 
    1370                 :            :   return NOT_ONEPART;
    1371                 :            : }
    1372                 :            : 
    1373                 :            : /* Return the variable pool to be used for a dv of type ONEPART.  */
    1374                 :            : static inline pool_allocator &
    1375                 :  407149000 : onepart_pool (onepart_enum onepart)
    1376                 :            : {
    1377                 :  407149000 :   return onepart ? valvar_pool : var_pool;
    1378                 :            : }
    1379                 :            : 
    1380                 :            : /* Allocate a variable_def from the corresponding variable pool.  */
    1381                 :            : static inline variable *
    1382                 :  203574000 : onepart_pool_allocate (onepart_enum onepart)
    1383                 :            : {
    1384                 :  193276000 :   return (variable*) onepart_pool (onepart).allocate ();
    1385                 :            : }
    1386                 :            : 
    1387                 :            : /* Build a decl_or_value out of a decl.  */
    1388                 :            : static inline decl_or_value
    1389                 :  114243000 : dv_from_decl (tree decl)
    1390                 :            : {
    1391                 :  114243000 :   decl_or_value dv;
    1392                 :  114243000 :   dv = decl;
    1393                 :          0 :   gcc_checking_assert (dv_is_decl_p (dv));
    1394                 :  113112000 :   return dv;
    1395                 :            : }
    1396                 :            : 
    1397                 :            : /* Build a decl_or_value out of a value.  */
    1398                 :            : static inline decl_or_value
    1399                 :  926547000 : dv_from_value (rtx value)
    1400                 :            : {
    1401                 :  926547000 :   decl_or_value dv;
    1402                 :  926547000 :   dv = value;
    1403                 :          0 :   gcc_checking_assert (dv_is_value_p (dv));
    1404                 :  657404000 :   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                 :  289663000 : dv_from_rtx (rtx x)
    1410                 :            : {
    1411                 :  289663000 :   decl_or_value dv;
    1412                 :            : 
    1413                 :  289663000 :   switch (GET_CODE (x))
    1414                 :            :     {
    1415                 :   21134900 :     case DEBUG_EXPR:
    1416                 :   21134900 :       dv = dv_from_decl (DEBUG_EXPR_TREE_DECL (x));
    1417                 :   21134900 :       gcc_checking_assert (DECL_RTL_KNOWN_SET (DEBUG_EXPR_TREE_DECL (x)) == x);
    1418                 :            :       break;
    1419                 :            : 
    1420                 :  268528000 :     case VALUE:
    1421                 :  268528000 :       dv = dv_from_value (x);
    1422                 :            :       break;
    1423                 :            : 
    1424                 :          0 :     default:
    1425                 :          0 :       gcc_unreachable ();
    1426                 :            :     }
    1427                 :            : 
    1428                 :  289663000 :   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                 :  936090000 : variable_htab_free (void *elem)
    1448                 :            : {
    1449                 :  936090000 :   int i;
    1450                 :  936090000 :   variable *var = (variable *) elem;
    1451                 :  936090000 :   location_chain *node, *next;
    1452                 :            : 
    1453                 :  936090000 :   gcc_checking_assert (var->refcount > 0);
    1454                 :            : 
    1455                 :  936090000 :   var->refcount--;
    1456                 :  936090000 :   if (var->refcount > 0)
    1457                 :            :     return;
    1458                 :            : 
    1459                 :  302009000 :   for (i = 0; i < var->n_var_parts; i++)
    1460                 :            :     {
    1461                 :  251934000 :       for (node = var->var_part[i].loc_chain; node; node = next)
    1462                 :            :         {
    1463                 :  153499000 :           next = node->next;
    1464                 :  153499000 :           delete node;
    1465                 :            :         }
    1466                 :   98434700 :       var->var_part[i].loc_chain = NULL;
    1467                 :            :     }
    1468                 :  203574000 :   if (var->onepart && VAR_LOC_1PAUX (var))
    1469                 :            :     {
    1470                 :   23743600 :       loc_exp_dep_clear (var);
    1471                 :   23743600 :       if (VAR_LOC_DEP_LST (var))
    1472                 :    1363160 :         VAR_LOC_DEP_LST (var)->pprev = NULL;
    1473                 :   23743600 :       XDELETE (VAR_LOC_1PAUX (var));
    1474                 :            :       /* These may be reused across functions, so reset
    1475                 :            :          e.g. NO_LOC_P.  */
    1476                 :   23743600 :       if (var->onepart == ONEPART_DEXPR)
    1477                 :    1778280 :         set_dv_changed (var->dv, true);
    1478                 :            :     }
    1479                 :  204790000 :   onepart_pool (var->onepart).remove (var);
    1480                 :            : }
    1481                 :            : 
    1482                 :            : /* Initialize the set (array) SET of attrs to empty lists.  */
    1483                 :            : 
    1484                 :            : static void
    1485                 :   20578400 : init_attrs_list_set (attrs **set)
    1486                 :            : {
    1487                 :   20578400 :   int i;
    1488                 :            : 
    1489                 : 1584530000 :   for (i = 0; i < FIRST_PSEUDO_REGISTER; i++)
    1490                 : 1589710000 :     set[i] = NULL;
    1491                 :          0 : }
    1492                 :            : 
    1493                 :            : /* Make the list *LISTP empty.  */
    1494                 :            : 
    1495                 :            : static void
    1496                 : 4979500000 : attrs_list_clear (attrs **listp)
    1497                 :            : {
    1498                 : 4979500000 :   attrs *list, *next;
    1499                 :            : 
    1500                 : 5144520000 :   for (list = *listp; list; list = next)
    1501                 :            :     {
    1502                 :  165019000 :       next = list->next;
    1503                 :  165019000 :       delete list;
    1504                 :            :     }
    1505                 : 4979500000 :   *listp = NULL;
    1506                 : 1824120000 : }
    1507                 :            : 
    1508                 :            : /* Return true if the pair of DECL and OFFSET is the member of the LIST.  */
    1509                 :            : 
    1510                 :            : static attrs *
    1511                 :          0 : attrs_list_member (attrs *list, decl_or_value dv, HOST_WIDE_INT offset)
    1512                 :            : {
    1513                 :     772793 :   for (; list; list = list->next)
    1514                 :     681306 :     if (dv_as_opaque (list->dv) == dv_as_opaque (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                 :   68590100 : attrs_list_insert (attrs **listp, decl_or_value dv,
    1523                 :            :                    HOST_WIDE_INT offset, rtx loc)
    1524                 :            : {
    1525                 :   67156000 :   attrs *list = new attrs;
    1526                 :   68590100 :   list->loc = loc;
    1527                 :   68590100 :   list->dv = dv;
    1528                 :   68590100 :   list->offset = offset;
    1529                 :   68590100 :   list->next = *listp;
    1530                 :   68590100 :   *listp = list;
    1531                 :   67807400 : }
    1532                 :            : 
    1533                 :            : /* Copy all nodes from SRC and create a list *DSTP of the copies.  */
    1534                 :            : 
    1535                 :            : static void
    1536                 : 1824120000 : attrs_list_copy (attrs **dstp, attrs *src)
    1537                 :            : {
    1538                 : 1824120000 :   attrs_list_clear (dstp);
    1539                 : 1966110000 :   for (; src; src = src->next)
    1540                 :            :     {
    1541                 :  141983000 :       attrs *n = new attrs;
    1542                 :  141983000 :       n->loc = src->loc;
    1543                 :  141983000 :       n->dv = src->dv;
    1544                 :  141983000 :       n->offset = src->offset;
    1545                 :  141983000 :       n->next = *dstp;
    1546                 :  141983000 :       *dstp = n;
    1547                 :            :     }
    1548                 : 1824120000 : }
    1549                 :            : 
    1550                 :            : /* Add all nodes from SRC which are not in *DSTP to *DSTP.  */
    1551                 :            : 
    1552                 :            : static void
    1553                 :       7980 : attrs_list_union (attrs **dstp, attrs *src)
    1554                 :            : {
    1555                 :       8163 :   for (; src; src = src->next)
    1556                 :            :     {
    1557                 :        366 :       if (!attrs_list_member (*dstp, src->dv, src->offset))
    1558                 :        336 :         attrs_list_insert (dstp, src->dv, src->offset, src->loc);
    1559                 :            :     }
    1560                 :       7980 : }
    1561                 :            : 
    1562                 :            : /* Combine nodes that are not onepart nodes from SRC and SRC2 into
    1563                 :            :    *DSTP.  */
    1564                 :            : 
    1565                 :            : static void
    1566                 :  243083000 : attrs_list_mpdv_union (attrs **dstp, attrs *src, attrs *src2)
    1567                 :            : {
    1568                 :  243083000 :   gcc_assert (!*dstp);
    1569                 :  264551000 :   for (; src; src = src->next)
    1570                 :            :     {
    1571                 :   21467800 :       if (!dv_onepart_p (src->dv))
    1572                 :   22810400 :         attrs_list_insert (dstp, src->dv, src->offset, src->loc);
    1573                 :            :     }
    1574                 :  268593000 :   for (src = src2; src; src = src->next)
    1575                 :            :     {
    1576                 :   25510200 :       if (!dv_onepart_p (src->dv)
    1577                 :   26224100 :           && !attrs_list_member (*dstp, src->dv, src->offset))
    1578                 :   25601600 :         attrs_list_insert (dstp, src->dv, src->offset, src->loc);
    1579                 :            :     }
    1580                 :  243083000 : }
    1581                 :            : 
    1582                 :            : /* Shared hashtable support.  */
    1583                 :            : 
    1584                 :            : /* Return true if VARS is shared.  */
    1585                 :            : 
    1586                 :            : static inline bool
    1587                 :  842776000 : shared_hash_shared (shared_hash *vars)
    1588                 :            : {
    1589                 :  842776000 :   return vars->refcount > 1;
    1590                 :            : }
    1591                 :            : 
    1592                 :            : /* Return the hash table for VARS.  */
    1593                 :            : 
    1594                 :            : static inline variable_table_type *
    1595                 : 1937870000 : shared_hash_htab (shared_hash *vars)
    1596                 :            : {
    1597                 : 1937870000 :   return vars->htab;
    1598                 :            : }
    1599                 :            : 
    1600                 :            : /* Return true if VAR is shared, or maybe because VARS is shared.  */
    1601                 :            : 
    1602                 :            : static inline bool
    1603                 : 1716790000 : shared_var_p (variable *var, shared_hash *vars)
    1604                 :            : {
    1605                 :            :   /* Don't count an entry in the changed_variables table as a duplicate.  */
    1606                 : 1716790000 :   return ((var->refcount > 1 + (int) var->in_changed_variables)
    1607                 :  458356000 :           || shared_hash_shared (vars));
    1608                 :            : }
    1609                 :            : 
    1610                 :            : /* Copy variables into a new hash table.  */
    1611                 :            : 
    1612                 :            : static shared_hash *
    1613                 :   11216600 : shared_hash_unshare (shared_hash *vars)
    1614                 :            : {
    1615                 :   11216600 :   shared_hash *new_vars = new shared_hash;
    1616                 :   11216600 :   gcc_assert (vars->refcount > 1);
    1617                 :   11216600 :   new_vars->refcount = 1;
    1618                 :   11216600 :   new_vars->htab = new variable_table_type (vars->htab->elements () + 3);
    1619                 :   11216600 :   vars_copy (new_vars->htab, vars->htab);
    1620                 :   11216600 :   vars->refcount--;
    1621                 :   11216600 :   return new_vars;
    1622                 :            : }
    1623                 :            : 
    1624                 :            : /* Increment reference counter on VARS and return it.  */
    1625                 :            : 
    1626                 :            : static inline shared_hash *
    1627                 :   65522800 : shared_hash_copy (shared_hash *vars)
    1628                 :            : {
    1629                 :   65522800 :   vars->refcount++;
    1630                 :   65522800 :   return vars;
    1631                 :            : }
    1632                 :            : 
    1633                 :            : /* Decrement reference counter and destroy hash table if not shared
    1634                 :            :    anymore.  */
    1635                 :            : 
    1636                 :            : static void
    1637                 :   68721200 : shared_hash_destroy (shared_hash *vars)
    1638                 :            : {
    1639                 :   68721200 :   gcc_checking_assert (vars->refcount > 0);
    1640                 :   68721200 :   if (--vars->refcount == 0)
    1641                 :            :     {
    1642                 :   14415000 :       delete vars->htab;
    1643                 :   14415000 :       delete vars;
    1644                 :            :     }
    1645                 :   68721200 : }
    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                 :  108327000 : shared_hash_find_slot_unshare_1 (shared_hash **pvars, decl_or_value dv,
    1652                 :            :                                  hashval_t dvhash, enum insert_option ins)
    1653                 :            : {
    1654                 :  108327000 :   if (shared_hash_shared (*pvars))
    1655                 :   11216600 :     *pvars = shared_hash_unshare (*pvars);
    1656                 :  108327000 :   return shared_hash_htab (*pvars)->find_slot_with_hash (dv, dvhash, ins);
    1657                 :            : }
    1658                 :            : 
    1659                 :            : static inline variable **
    1660                 :   11233600 : shared_hash_find_slot_unshare (shared_hash **pvars, decl_or_value dv,
    1661                 :            :                                enum insert_option ins)
    1662                 :            : {
    1663                 :   22467200 :   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                 :  175934000 : shared_hash_find_slot_1 (shared_hash *vars, decl_or_value dv, hashval_t dvhash)
    1672                 :            : {
    1673                 :  175934000 :   return shared_hash_htab (vars)->find_slot_with_hash (dv, dvhash,
    1674                 :  175934000 :                                                        shared_hash_shared (vars)
    1675                 :            :                                                        ? NO_INSERT : INSERT);
    1676                 :            : }
    1677                 :            : 
    1678                 :            : static inline variable **
    1679                 :  175934000 : shared_hash_find_slot (shared_hash *vars, decl_or_value dv)
    1680                 :            : {
    1681                 :  175934000 :   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                 :  827986000 : shared_hash_find_slot_noinsert_1 (shared_hash *vars, decl_or_value dv,
    1688                 :            :                                   hashval_t dvhash)
    1689                 :            : {
    1690                 :  827986000 :   return shared_hash_htab (vars)->find_slot_with_hash (dv, dvhash, NO_INSERT);
    1691                 :            : }
    1692                 :            : 
    1693                 :            : static inline variable **
    1694                 :  559311000 : shared_hash_find_slot_noinsert (shared_hash *vars, decl_or_value dv)
    1695                 :            : {
    1696                 :  559311000 :   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                 :  178113000 : shared_hash_find_1 (shared_hash *vars, decl_or_value dv, hashval_t dvhash)
    1704                 :            : {
    1705                 :  356226000 :   return shared_hash_htab (vars)->find_with_hash (dv, dvhash);
    1706                 :            : }
    1707                 :            : 
    1708                 :            : static inline variable *
    1709                 :   44090800 : shared_hash_find (shared_hash *vars, decl_or_value dv)
    1710                 :            : {
    1711                 :   44090800 :   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                 : 8757160000 : canon_value_cmp (rtx tval, rtx cval)
    1725                 :            : {
    1726                 : 8757160000 :   return !cval
    1727                 : 3265500000 :     || 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                 :   41087600 : unshare_variable (dataflow_set *set, variable **slot, variable *var,
    1736                 :            :                   enum var_init_status initialized)
    1737                 :            : {
    1738                 :   41087600 :   variable *new_var;
    1739                 :   41087600 :   int i;
    1740                 :            : 
    1741                 :   41087600 :   new_var = onepart_pool_allocate (var->onepart);
    1742                 :   41087600 :   new_var->dv = var->dv;
    1743                 :   41087600 :   new_var->refcount = 1;
    1744                 :   41087600 :   var->refcount--;
    1745                 :   41087600 :   new_var->n_var_parts = var->n_var_parts;
    1746                 :   41087600 :   new_var->onepart = var->onepart;
    1747                 :   41087600 :   new_var->in_changed_variables = false;
    1748                 :            : 
    1749                 :   41087600 :   if (! flag_var_tracking_uninit)
    1750                 :   41087600 :     initialized = VAR_INIT_STATUS_INITIALIZED;
    1751                 :            : 
    1752                 :   82465200 :   for (i = 0; i < var->n_var_parts; i++)
    1753                 :            :     {
    1754                 :   41377700 :       location_chain *node;
    1755                 :   41377700 :       location_chain **nextp;
    1756                 :            : 
    1757                 :   41377700 :       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                 :   40465700 :           gcc_checking_assert (!VAR_LOC_1PAUX (var) || emit_notes);
    1764                 :   40465700 :           VAR_LOC_1PAUX (new_var) = VAR_LOC_1PAUX (var);
    1765                 :   40465700 :           VAR_LOC_1PAUX (var) = NULL;
    1766                 :            :         }
    1767                 :            :       else
    1768                 :     911958 :         VAR_PART_OFFSET (new_var, i) = VAR_PART_OFFSET (var, i);
    1769                 :   41377700 :       nextp = &new_var->var_part[i].loc_chain;
    1770                 :  112905000 :       for (node = var->var_part[i].loc_chain; node; node = node->next)
    1771                 :            :         {
    1772                 :   71527200 :           location_chain *new_lc;
    1773                 :            : 
    1774                 :   71527200 :           new_lc = new location_chain;
    1775                 :   71527200 :           new_lc->next = NULL;
    1776                 :   71527200 :           if (node->init > initialized)
    1777                 :          0 :             new_lc->init = node->init;
    1778                 :            :           else
    1779                 :   71527200 :             new_lc->init = initialized;
    1780                 :   71527200 :           if (node->set_src && !(MEM_P (node->set_src)))
    1781                 :     274697 :             new_lc->set_src = node->set_src;
    1782                 :            :           else
    1783                 :   71252500 :             new_lc->set_src = NULL;
    1784                 :   71527200 :           new_lc->loc = node->loc;
    1785                 :            : 
    1786                 :   71527200 :           *nextp = new_lc;
    1787                 :   71527200 :           nextp = &new_lc->next;
    1788                 :            :         }
    1789                 :            : 
    1790                 :   41377700 :       new_var->var_part[i].cur_loc = var->var_part[i].cur_loc;
    1791                 :            :     }
    1792                 :            : 
    1793                 :   41087600 :   dst_can_be_shared = false;
    1794                 :   41087600 :   if (shared_hash_shared (set->vars))
    1795                 :    3455780 :     slot = shared_hash_find_slot_unshare (&set->vars, var->dv, NO_INSERT);
    1796                 :   37631800 :   else if (set->traversed_vars && set->vars != set->traversed_vars)
    1797                 :     293847 :     slot = shared_hash_find_slot_noinsert (set->vars, var->dv);
    1798                 :   41087600 :   *slot = new_var;
    1799                 :   41087600 :   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                 :   41087600 :   return slot;
    1812                 :            : }
    1813                 :            : 
    1814                 :            : /* Copy all variables from hash table SRC to hash table DST.  */
    1815                 :            : 
    1816                 :            : static void
    1817                 :   11216600 : vars_copy (variable_table_type *dst, variable_table_type *src)
    1818                 :            : {
    1819                 :   11216600 :   variable_iterator_type hi;
    1820                 :   11216600 :   variable *var;
    1821                 :            : 
    1822                 :  488194000 :   FOR_EACH_HASH_TABLE_ELEMENT (*src, var, variable, hi)
    1823                 :            :     {
    1824                 :  465761000 :       variable **dstp;
    1825                 :  465761000 :       var->refcount++;
    1826                 :  465761000 :       dstp = dst->find_slot_with_hash (var->dv, dv_htab_hash (var->dv),
    1827                 :            :                                        INSERT);
    1828                 :  465761000 :       *dstp = var;
    1829                 :            :     }
    1830                 :   11216600 : }
    1831                 :            : 
    1832                 :            : /* Map a decl to its main debug decl.  */
    1833                 :            : 
    1834                 :            : static inline tree
    1835                 :   44630200 : var_debug_decl (tree decl)
    1836                 :            : {
    1837                 :   44630200 :   if (decl && VAR_P (decl) && DECL_HAS_DEBUG_EXPR_P (decl))
    1838                 :            :     {
    1839                 :    1196060 :       tree debugdecl = DECL_DEBUG_EXPR (decl);
    1840                 :    1196060 :       if (DECL_P (debugdecl))
    1841                 :          0 :         decl = debugdecl;
    1842                 :            :     }
    1843                 :            : 
    1844                 :   44630200 :   return decl;
    1845                 :            : }
    1846                 :            : 
    1847                 :            : /* Set the register LOC to contain DV, OFFSET.  */
    1848                 :            : 
    1849                 :            : static void
    1850                 :   53183400 : var_reg_decl_set (dataflow_set *set, rtx loc, enum var_init_status initialized,
    1851                 :            :                   decl_or_value dv, HOST_WIDE_INT offset, rtx set_src,
    1852                 :            :                   enum insert_option iopt)
    1853                 :            : {
    1854                 :   53183400 :   attrs *node;
    1855                 :   53183400 :   bool decl_p = dv_is_decl_p (dv);
    1856                 :            : 
    1857                 :            :   if (decl_p)
    1858                 :    2143210 :     dv = dv_from_decl (var_debug_decl (dv_as_decl (dv)));
    1859                 :            : 
    1860                 :   54822300 :   for (node = set->regs[REGNO (loc)]; node; node = node->next)
    1861                 :    2482720 :     if (dv_as_opaque (node->dv) == dv_as_opaque (dv)
    1862                 :    2482720 :         && node->offset == offset)
    1863                 :            :       break;
    1864                 :   53183400 :   if (!node)
    1865                 :   52339500 :     attrs_list_insert (&set->regs[REGNO (loc)], dv, offset, loc);
    1866                 :   53183400 :   set_variable_part (set, loc, dv, offset, initialized, set_src, iopt);
    1867                 :   53183400 : }
    1868                 :            : 
    1869                 :            : /* Return true if we should track a location that is OFFSET bytes from
    1870                 :            :    a variable.  Store the constant offset in *OFFSET_OUT if so.  */
    1871                 :            : 
    1872                 :            : static bool
    1873                 :   12263100 : track_offset_p (poly_int64 offset, HOST_WIDE_INT *offset_out)
    1874                 :            : {
    1875                 :   12263100 :   HOST_WIDE_INT const_offset;
    1876                 :          0 :   if (!offset.is_constant (&const_offset)
    1877                 :   12263100 :       || !IN_RANGE (const_offset, 0, MAX_VAR_PARTS - 1))
    1878                 :            :     return false;
    1879                 :   12262000 :   *offset_out = const_offset;
    1880                 :    2610450 :   return true;
    1881                 :            : }
    1882                 :            : 
    1883                 :            : /* Return the offset of a register that track_offset_p says we
    1884                 :            :    should track.  */
    1885                 :            : 
    1886                 :            : static HOST_WIDE_INT
    1887                 :    1354900 : get_tracked_reg_offset (rtx loc)
    1888                 :            : {
    1889                 :    1354900 :   HOST_WIDE_INT offset;
    1890                 :    2709810 :   if (!track_offset_p (REG_OFFSET (loc), &offset))
    1891                 :          0 :     gcc_unreachable ();
    1892                 :    1354900 :   return offset;
    1893                 :            : }
    1894                 :            : 
    1895                 :            : /* Set the register to contain REG_EXPR (LOC), REG_OFFSET (LOC).  */
    1896                 :            : 
    1897                 :            : static void
    1898                 :    1071610 : var_reg_set (dataflow_set *set, rtx loc, enum var_init_status initialized,
    1899                 :            :              rtx set_src)
    1900                 :            : {
    1901                 :    1071610 :   tree decl = REG_EXPR (loc);
    1902                 :    1071610 :   HOST_WIDE_INT offset = get_tracked_reg_offset (loc);
    1903                 :            : 
    1904                 :    2143210 :   var_reg_decl_set (set, loc, initialized,
    1905                 :            :                     dv_from_decl (decl), offset, set_src, INSERT);
    1906                 :    1071610 : }
    1907                 :            : 
    1908                 :            : static enum var_init_status
    1909                 :       5055 : get_init_value (dataflow_set *set, rtx loc, decl_or_value dv)
    1910                 :            : {
    1911                 :       5055 :   variable *var;
    1912                 :       5055 :   int i;
    1913                 :       5055 :   enum var_init_status ret_val = VAR_INIT_STATUS_UNKNOWN;
    1914                 :            : 
    1915                 :       5055 :   if (! flag_var_tracking_uninit)
    1916                 :            :     return VAR_INIT_STATUS_INITIALIZED;
    1917                 :            : 
    1918                 :          0 :   var = shared_hash_find (set->vars, dv);
    1919                 :          0 :   if (var)
    1920                 :            :     {
    1921                 :          0 :       for (i = 0; i < var->n_var_parts && ret_val == VAR_INIT_STATUS_UNKNOWN; i++)
    1922                 :            :         {
    1923                 :          0 :           location_chain *nextp;
    1924                 :          0 :           for (nextp = var->var_part[i].loc_chain; nextp; nextp = nextp->next)
    1925                 :          0 :             if (rtx_equal_p (nextp->loc, loc))
    1926                 :            :               {
    1927                 :          0 :                 ret_val = nextp->init;
    1928                 :          0 :                 break;
    1929                 :            :               }
    1930                 :            :         }
    1931                 :            :     }
    1932                 :            : 
    1933                 :            :   return ret_val;
    1934                 :            : }
    1935                 :            : 
    1936                 :            : /* Delete current content of register LOC in dataflow set SET and set
    1937                 :            :    the register to contain REG_EXPR (LOC), REG_OFFSET (LOC).  If
    1938                 :            :    MODIFY is true, any other live copies of the same variable part are
    1939                 :            :    also deleted from the dataflow set, otherwise the variable part is
    1940                 :            :    assumed to be copied from another location holding the same
    1941                 :            :    part.  */
    1942                 :            : 
    1943                 :            : static void
    1944                 :     251968 : var_reg_delete_and_set (dataflow_set *set, rtx loc, bool modify,
    1945                 :            :                         enum var_init_status initialized, rtx set_src)
    1946                 :            : {
    1947                 :     251968 :   tree decl = REG_EXPR (loc);
    1948                 :     251968 :   HOST_WIDE_INT offset = get_tracked_reg_offset (loc);
    1949                 :     251968 :   attrs *node, *next;
    1950                 :     251968 :   attrs **nextp;
    1951                 :            : 
    1952                 :     251968 :   decl = var_debug_decl (decl);
    1953                 :            : 
    1954                 :     251968 :   if (initialized == VAR_INIT_STATUS_UNKNOWN)
    1955                 :          0 :     initialized = get_init_value (set, loc, dv_from_decl (decl));
    1956                 :            : 
    1957                 :     251968 :   nextp = &set->regs[REGNO (loc)];
    1958                 :     418658 :   for (node = *nextp; node; node = next)
    1959                 :            :     {
    1960                 :     166690 :       next = node->next;
    1961                 :     166690 :       if (dv_as_opaque (node->dv) != decl || node->offset != offset)
    1962                 :            :         {
    1963                 :     151037 :           delete_variable_part (set, node->loc, node->dv, node->offset);
    1964                 :     151037 :           delete node;
    1965                 :     151037 :           *nextp = next;
    1966                 :            :         }
    1967                 :            :       else
    1968                 :            :         {
    1969                 :      15653 :           node->loc = loc;
    1970                 :      15653 :           nextp = &node->next;
    1971                 :            :         }
    1972                 :            :     }
    1973                 :     251968 :   if (modify)
    1974                 :     484956 :     clobber_variable_part (set, loc, dv_from_decl (decl), offset, set_src);
    1975                 :     251968 :   var_reg_set (set, loc, initialized, set_src);
    1976                 :     251968 : }
    1977                 :            : 
    1978                 :            : /* Delete the association of register LOC in dataflow set SET with any
    1979                 :            :    variables that aren't onepart.  If CLOBBER is true, also delete any
    1980                 :            :    other live copies of the same variable part, and delete the
    1981                 :            :    association with onepart dvs too.  */
    1982                 :            : 
    1983                 :            : static void
    1984                 :   45566500 : var_reg_delete (dataflow_set *set, rtx loc, bool clobber)
    1985                 :            : {
    1986                 :   45566500 :   attrs **nextp = &set->regs[REGNO (loc)];
    1987                 :   45566500 :   attrs *node, *next;
    1988                 :            : 
    1989                 :   45566500 :   HOST_WIDE_INT offset;
    1990                 :   45566500 :   if (clobber && track_offset_p (REG_OFFSET (loc), &offset))
    1991                 :            :     {
    1992                 :    9651550 :       tree decl = REG_EXPR (loc);
    1993                 :            : 
    1994                 :    9651550 :       decl = var_debug_decl (decl);
    1995                 :            : 
    1996                 :    9808950 :       clobber_variable_part (set, NULL, dv_from_decl (decl), offset, NULL);
    1997                 :            :     }
    1998                 :            : 
    1999                 :   83947300 :   for (node = *nextp; node; node = next)
    2000                 :            :     {
    2001                 :   38380800 :       next = node->next;
    2002                 :   38380800 :       if (clobber || !dv_onepart_p (node->dv))
    2003                 :            :         {
    2004                 :    2251320 :           delete_variable_part (set, node->loc, node->dv, node->offset);
    2005                 :    2251320 :           delete node;
    2006                 :    2251320 :           *nextp = next;
    2007                 :            :         }
    2008                 :            :       else
    2009                 :   36129500 :         nextp = &node->next;
    2010                 :            :     }
    2011                 :   45566500 : }
    2012                 :            : 
    2013                 :            : /* Delete content of register with number REGNO in dataflow set SET.  */
    2014                 :            : 
    2015                 :            : static void
    2016                 :  396690000 : var_regno_delete (dataflow_set *set, int regno)
    2017                 :            : {
    2018                 :  396690000 :   attrs **reg = &set->regs[regno];
    2019                 :  396690000 :   attrs *node, *next;
    2020                 :            : 
    2021                 :  439378000 :   for (node = *reg; node; node = next)
    2022                 :            :     {
    2023                 :   42688400 :       next = node->next;
    2024                 :   42688400 :       delete_variable_part (set, node->loc, node->dv, node->offset);
    2025                 :   42688400 :       delete node;
    2026                 :            :     }
    2027                 :  396690000 :   *reg = NULL;
    2028                 :  396690000 : }
    2029                 :            : 
    2030                 :            : /* Return true if I is the negated value of a power of two.  */
    2031                 :            : static bool
    2032                 :     111223 : negative_power_of_two_p (HOST_WIDE_INT i)
    2033                 :            : {
    2034                 :     111223 :   unsigned HOST_WIDE_INT x = -(unsigned HOST_WIDE_INT)i;
    2035                 :     111223 :   return pow2_or_zerop (x);
    2036                 :            : }
    2037                 :            : 
    2038                 :            : /* Strip constant offsets and alignments off of LOC.  Return the base
    2039                 :            :    expression.  */
    2040                 :            : 
    2041                 :            : static rtx
    2042                 :   12927900 : vt_get_canonicalize_base (rtx loc)
    2043                 :            : {
    2044                 :   12927900 :   while ((GET_CODE (loc) == PLUS
    2045                 :   12927900 :           || GET_CODE (loc) == AND)
    2046                 :          0 :          && GET_CODE (XEXP (loc, 1)) == CONST_INT
    2047                 :   12927900 :          && (GET_CODE (loc) != AND
    2048                 :          0 :              || negative_power_of_two_p (INTVAL (XEXP (loc, 1)))))
    2049                 :          0 :     loc = XEXP (loc, 0);
    2050                 :            : 
    2051                 :   12927900 :   return loc;
    2052                 :            : }
    2053                 :            : 
    2054                 :            : /* This caches canonicalized addresses for VALUEs, computed using
    2055                 :            :    information in the global cselib table.  */
    2056                 :            : static hash_map<rtx, rtx> *global_get_addr_cache;
    2057                 :            : 
    2058                 :            : /* This caches canonicalized addresses for VALUEs, computed using
    2059                 :            :    information from the global cache and information pertaining to a
    2060                 :            :    basic block being analyzed.  */
    2061                 :            : static hash_map<rtx, rtx> *local_get_addr_cache;
    2062                 :            : 
    2063                 :            : static rtx vt_canonicalize_addr (dataflow_set *, rtx);
    2064                 :            : 
    2065                 :            : /* Return the canonical address for LOC, that must be a VALUE, using a
    2066                 :            :    cached global equivalence or computing it and storing it in the
    2067                 :            :    global cache.  */
    2068                 :            : 
    2069                 :            : static rtx
    2070                 :  105365000 : get_addr_from_global_cache (rtx const loc)
    2071                 :            : {
    2072                 :  105365000 :   rtx x;
    2073                 :            : 
    2074                 :  105365000 :   gcc_checking_assert (GET_CODE (loc) == VALUE);
    2075                 :            : 
    2076                 :  105365000 :   bool existed;
    2077                 :  105365000 :   rtx *slot = &global_get_addr_cache->get_or_insert (loc, &existed);
    2078                 :  105365000 :   if (existed)
    2079                 :   97350300 :     return *slot;
    2080                 :            : 
    2081                 :    8014430 :   x = canon_rtx (get_addr (loc));
    2082                 :            : 
    2083                 :            :   /* Tentative, avoiding infinite recursion.  */
    2084                 :    8014430 :   *slot = x;
    2085                 :            : 
    2086                 :    8014430 :   if (x != loc)
    2087                 :            :     {
    2088                 :    6725860 :       rtx nx = vt_canonicalize_addr (NULL, x);
    2089                 :    6725860 :       if (nx != x)
    2090                 :            :         {
    2091                 :            :           /* The table may have moved during recursion, recompute
    2092                 :            :              SLOT.  */
    2093                 :    6844830 :           *global_get_addr_cache->get (loc) = x = nx;
    2094                 :            :         }
    2095                 :            :     }
    2096                 :            : 
    2097                 :            :   return x;
    2098                 :            : }
    2099                 :            : 
    2100                 :            : /* Return the canonical address for LOC, that must be a VALUE, using a
    2101                 :            :    cached local equivalence or computing it and storing it in the
    2102                 :            :    local cache.  */
    2103                 :            : 
    2104                 :            : static rtx
    2105                 :  865158000 : get_addr_from_local_cache (dataflow_set *set, rtx const loc)
    2106                 :            : {
    2107                 :  865158000 :   rtx x;
    2108                 :  865158000 :   decl_or_value dv;
    2109                 :  865158000 :   variable *var;
    2110                 :  865158000 :   location_chain *l;
    2111                 :            : 
    2112                 :  865158000 :   gcc_checking_assert (GET_CODE (loc) == VALUE);
    2113                 :            : 
    2114                 :  865158000 :   bool existed;
    2115                 :  865158000 :   rtx *slot = &local_get_addr_cache->get_or_insert (loc, &existed);
    2116                 :  865158000 :   if (existed)
    2117                 :  765649000 :     return *slot;
    2118                 :            : 
    2119                 :   99509400 :   x = get_addr_from_global_cache (loc);
    2120                 :            : 
    2121                 :            :   /* Tentative, avoiding infinite recursion.  */
    2122                 :   99509400 :   *slot = x;
    2123                 :            : 
    2124                 :            :   /* Recurse to cache local expansion of X, or if we need to search
    2125                 :            :      for a VALUE in the expansion.  */
    2126                 :   99509400 :   if (x != loc)
    2127                 :            :     {
    2128                 :   88087200 :       rtx nx = vt_canonicalize_addr (set, x);
    2129                 :   88087200 :       if (nx != x)
    2130                 :            :         {
    2131                 :   30518600 :           slot = local_get_addr_cache->get (loc);
    2132                 :   30518600 :           *slot = x = nx;
    2133                 :            :         }
    2134                 :   88087200 :       return x;
    2135                 :            :     }
    2136                 :            : 
    2137                 :   11422200 :   dv = dv_from_rtx (x);
    2138                 :   11422200 :   var = shared_hash_find (set->vars, dv);
    2139                 :   11422200 :   if (!var)
    2140                 :            :     return x;
    2141                 :            : 
    2142                 :            :   /* Look for an improved equivalent expression.  */
    2143                 :   15440600 :   for (l = var->var_part[0].loc_chain; l; l = l->next)
    2144                 :            :     {
    2145                 :   12927900 :       rtx base = vt_get_canonicalize_base (l->loc);
    2146                 :   12927900 :       if (GET_CODE (base) == VALUE
    2147                 :   14510600 :           && canon_value_cmp (base, loc))
    2148                 :            :         {
    2149                 :    8003410 :           rtx nx = vt_canonicalize_addr (set, l->loc);
    2150                 :    8003410 :           if (x != nx)
    2151                 :            :             {
    2152                 :    8003410 :               slot = local_get_addr_cache->get (loc);
    2153                 :    8003410 :               *slot = x = nx;
    2154                 :            :             }
    2155                 :            :           break;
    2156                 :            :         }
    2157                 :            :     }
    2158                 :            : 
    2159                 :            :   return x;
    2160                 :            : }
    2161                 :            : 
    2162                 :            : /* Canonicalize LOC using equivalences from SET in addition to those
    2163                 :            :    in the cselib static table.  It expects a VALUE-based expression,
    2164                 :            :    and it will only substitute VALUEs with other VALUEs or
    2165                 :            :    function-global equivalences, so that, if two addresses have base
    2166                 :            :    VALUEs that are locally or globally related in ways that
    2167                 :            :    memrefs_conflict_p cares about, they will both canonicalize to
    2168                 :            :    expressions that have the same base VALUE.
    2169                 :            : 
    2170                 :            :    The use of VALUEs as canonical base addresses enables the canonical
    2171                 :            :    RTXs to remain unchanged globally, if they resolve to a constant,
    2172                 :            :    or throughout a basic block otherwise, so that they can be cached
    2173                 :            :    and the cache needs not be invalidated when REGs, MEMs or such
    2174                 :            :    change.  */
    2175                 :            : 
    2176                 :            : static rtx
    2177                 :  924070000 : vt_canonicalize_addr (dataflow_set *set, rtx oloc)
    2178                 :            : {
    2179                 :  924070000 :   poly_int64 ofst = 0, term;
    2180                 :  924070000 :   machine_mode mode = GET_MODE (oloc);
    2181                 :  924070000 :   rtx loc = oloc;
    2182                 :  924070000 :   rtx x;
    2183                 :  924070000 :   bool retry = true;
    2184                 :            : 
    2185                 : 1848140000 :   while (retry)
    2186                 :            :     {
    2187                 : 1011940000 :       while (GET_CODE (loc) == PLUS
    2188                 : 1011940000 :              && poly_int_rtx_p (XEXP (loc, 1), &term))
    2189                 :            :         {
    2190                 :   87867500 :           ofst += term;
    2191                 :   87867500 :           loc = XEXP (loc, 0);
    2192                 :            :         }
    2193                 :            : 
    2194                 :            :       /* Alignment operations can't normally be combined, so just
    2195                 :            :          canonicalize the base and we're done.  We'll normally have
    2196                 :            :          only one stack alignment anyway.  */
    2197                 :  924070000 :       if (GET_CODE (loc) == AND
    2198                 :     111249 :           && GET_CODE (XEXP (loc, 1)) == CONST_INT
    2199                 :  924181000 :           && negative_power_of_two_p (INTVAL (XEXP (loc, 1))))
    2200                 :            :         {
    2201                 :     111220 :           x = vt_canonicalize_addr (set, XEXP (loc, 0));
    2202                 :     111220 :           if (x != XEXP (loc, 0))
    2203                 :       9684 :             loc = gen_rtx_AND (mode, x, XEXP (loc, 1));
    2204                 :            :           retry = false;
    2205                 :            :         }
    2206                 :            : 
    2207                 :  924070000 :       if (GET_CODE (loc) == VALUE)
    2208                 :            :         {
    2209                 :  871014000 :           if (set)
    2210                 :  865158000 :             loc = get_addr_from_local_cache (set, loc);
    2211                 :            :           else
    2212                 :    5855250 :             loc = get_addr_from_global_cache (loc);
    2213                 :            : 
    2214                 :            :           /* Consolidate plus_constants.  */
    2215                 :  902604000 :           while (maybe_ne (ofst, 0)
    2216                 :   73386100 :                  && GET_CODE (loc) == PLUS
    2217                 : 2782420000 :                  && poly_int_rtx_p (XEXP (loc, 1), &term))
    2218                 :            :             {
    2219                 :   31590200 :               ofst += term;
    2220                 :   31590200 :               loc = XEXP (loc, 0);
    2221                 :            :             }
    2222                 :            : 
    2223                 :            :           retry = false;
    2224                 :            :         }
    2225                 :            :       else
    2226                 :            :         {
    2227                 :   53056000 :           x = canon_rtx (loc);
    2228                 :   53056000 :           if (retry)
    2229                 :   52944800 :             retry = (x != loc);
    2230                 :            :           loc = x;
    2231                 :            :         }
    2232                 :            :     }
    2233                 :            : 
    2234                 :            :   /* Add OFST back in.  */
    2235                 :  924070000 :   if (maybe_ne (ofst, 0))
    2236                 :            :     {
    2237                 :            :       /* Don't build new RTL if we can help it.  */
    2238                 :   87824500 :       if (strip_offset (oloc, &term) == loc && known_eq (term, ofst))
    2239                 :            :         return oloc;
    2240                 :            : 
    2241                 :   33890200 :       loc = plus_constant (mode, loc, ofst);
    2242                 :            :     }
    2243                 :            : 
    2244                 :            :   return loc;
    2245                 :            : }
    2246                 :            : 
    2247                 :            : /* Return true iff there's a true dependence between MLOC and LOC.
    2248                 :            :    MADDR must be a canonicalized version of MLOC's address.  */
    2249                 :            : 
    2250                 :            : static inline bool
    2251                 : 1795650000 : vt_canon_true_dep (dataflow_set *set, rtx mloc, rtx maddr, rtx loc)
    2252                 :            : {
    2253                 : 1795650000 :   if (GET_CODE (loc) != MEM)
    2254                 :            :     return false;
    2255                 :            : 
    2256                 :  805639000 :   rtx addr = vt_canonicalize_addr (set, XEXP (loc, 0));
    2257                 :  805639000 :   if (!canon_true_dependence (mloc, GET_MODE (mloc), maddr, loc, addr))
    2258                 :  795541000 :     return false;
    2259                 :            : 
    2260                 :            :   return true;
    2261                 :            : }
    2262                 :            : 
    2263                 :            : /* Hold parameters for the hashtab traversal function
    2264                 :            :    drop_overlapping_mem_locs, see below.  */
    2265                 :            : 
    2266                 :            : struct overlapping_mems
    2267                 :            : {
    2268                 :            :   dataflow_set *set;
    2269                 :            :   rtx loc, addr;
    2270                 :            : };
    2271                 :            : 
    2272                 :            : /* Remove all MEMs that overlap with COMS->LOC from the location list
    2273                 :            :    of a hash table entry for a onepart variable.  COMS->ADDR must be a
    2274                 :            :    canonicalized form of COMS->LOC's address, and COMS->LOC must be
    2275                 :            :    canonicalized itself.  */
    2276                 :            : 
    2277                 :            : int
    2278                 : 1242890000 : drop_overlapping_mem_locs (variable **slot, overlapping_mems *coms)
    2279                 :            : {
    2280                 : 1242890000 :   dataflow_set *set = coms->set;
    2281                 : 1242890000 :   rtx mloc = coms->loc, addr = coms->addr;
    2282                 : 1242890000 :   variable *var = *slot;
    2283                 :            : 
    2284                 : 1242890000 :   if (var->onepart != NOT_ONEPART)
    2285                 :            :     {
    2286                 : 1239050000 :       location_chain *loc, **locp;
    2287                 : 1239050000 :       bool changed = false;
    2288                 : 1239050000 :       rtx cur_loc;
    2289                 :            : 
    2290                 : 1239050000 :       gcc_assert (var->n_var_parts == 1);
    2291                 :            : 
    2292                 : 1239050000 :       if (shared_var_p (var, set->vars))
    2293                 :            :         {
    2294                 : 2209480000 :           for (loc = var->var_part[0].loc_chain; loc; loc = loc->next)
    2295                 : 1233450000 :             if (vt_canon_true_dep (set, mloc, addr, loc->loc))
    2296                 :            :               break;
    2297                 :            : 
    2298                 :  979474000 :           if (!loc)
    2299                 :            :             return 1;
    2300                 :            : 
    2301                 :    3441050 :           slot = unshare_variable (set, slot, var, VAR_INIT_STATUS_UNKNOWN);
    2302                 :    3441050 :           var = *slot;
    2303                 :    3441050 :           gcc_assert (var->n_var_parts == 1);
    2304                 :            :         }
    2305                 :            : 
    2306                 :  263013000 :       if (VAR_LOC_1PAUX (var))
    2307                 :   23411600 :         cur_loc = VAR_LOC_FROM (var);
    2308                 :            :       else
    2309                 :  239601000 :         cur_loc = var->var_part[0].cur_loc;
    2310                 :            : 
    2311                 :  263013000 :       for (locp = &var->var_part[0].loc_chain, loc = *locp;
    2312                 :  825217000 :            loc; loc = *locp)
    2313                 :            :         {
    2314                 :  562204000 :           if (!vt_canon_true_dep (set, mloc, addr, loc->loc))
    2315                 :            :             {
    2316                 :  555548000 :               locp = &loc->next;
    2317                 :  555548000 :               continue;
    2318                 :            :             }
    2319                 :            : 
    2320                 :    6656650 :           *locp = loc->next;
    2321                 :            :           /* If we have deleted the location which was last emitted
    2322                 :            :              we have to emit new location so add the variable to set
    2323                 :            :              of changed variables.  */
    2324                 :    6656650 :           if (cur_loc == loc->loc)
    2325                 :            :             {
    2326                 :     271241 :               changed = true;
    2327                 :     271241 :               var->var_part[0].cur_loc = NULL;
    2328                 :     271241 :               if (VAR_LOC_1PAUX (var))
    2329                 :     271241 :                 VAR_LOC_FROM (var) = NULL;
    2330                 :            :             }
    2331                 :    6656650 :           delete loc;
    2332                 :            :         }
    2333                 :            : 
    2334                 :  263013000 :       if (!var->var_part[0].loc_chain)
    2335                 :            :         {
    2336                 :    3126700 :           var->n_var_parts--;
    2337                 :    3126700 :           changed = true;
    2338                 :            :         }
    2339                 :  263013000 :       if (changed)
    2340                 :    3167580 :         variable_was_changed (var, set);
    2341                 :            :     }
    2342                 :            : 
    2343                 :            :   return 1;
    2344                 :            : }
    2345                 :            : 
    2346                 :            : /* Remove from SET all VALUE bindings to MEMs that overlap with LOC.  */
    2347                 :            : 
    2348                 :            : static void
    2349                 :   15503300 : clobber_overlapping_mems (dataflow_set *set, rtx loc)
    2350                 :            : {
    2351                 :   15503300 :   struct overlapping_mems coms;
    2352                 :            : 
    2353                 :   15503300 :   gcc_checking_assert (GET_CODE (loc) == MEM);
    2354                 :            : 
    2355                 :   15503300 :   coms.set = set;
    2356                 :   15503300 :   coms.loc = canon_rtx (loc);
    2357                 :   15503300 :   coms.addr = vt_canonicalize_addr (set, XEXP (loc, 0));
    2358                 :            : 
    2359                 :   15503300 :   set->traversed_vars = set->vars;
    2360                 :   15503300 :   shared_hash_htab (set->vars)
    2361                 :   15503300 :     ->traverse <overlapping_mems*, drop_overlapping_mem_locs> (&coms);
    2362                 :   15503300 :   set->traversed_vars = NULL;
    2363                 :   15503300 : }
    2364                 :            : 
    2365                 :            : /* Set the location of DV, OFFSET as the MEM LOC.  */
    2366                 :            : 
    2367                 :            : static void
    2368                 :   30130400 : var_mem_decl_set (dataflow_set *set, rtx loc, enum var_init_status initialized,
    2369                 :            :                   decl_or_value dv, HOST_WIDE_INT offset, rtx set_src,
    2370                 :            :                   enum insert_option iopt)
    2371                 :            : {
    2372                 :   30130400 :   if (dv_is_decl_p (dv))
    2373                 :     119764 :     dv = dv_from_decl (var_debug_decl (dv_as_decl (dv)));
    2374                 :            : 
    2375                 :   30130400 :   set_variable_part (set, loc, dv, offset, initialized, set_src, iopt);
    2376                 :   30130400 : }
    2377                 :            : 
    2378                 :            : /* Set the location part of variable MEM_EXPR (LOC) in dataflow set
    2379                 :            :    SET to LOC.
    2380                 :            :    Adjust the address first if it is stack pointer based.  */
    2381                 :            : 
    2382                 :            : static void
    2383                 :      59882 : var_mem_set (dataflow_set *set, rtx loc, enum var_init_status initialized,
    2384                 :            :              rtx set_src)
    2385                 :            : {
    2386                 :      59882 :   tree decl = MEM_EXPR (loc);
    2387                 :      59882 :   HOST_WIDE_INT offset = int_mem_offset (loc);
    2388                 :            : 
    2389                 :     119764 :   var_mem_decl_set (set, loc, initialized,
    2390                 :            :                     dv_from_decl (decl), offset, set_src, INSERT);
    2391                 :      59882 : }
    2392                 :            : 
    2393                 :            : /* Delete and set the location part of variable MEM_EXPR (LOC) in
    2394                 :            :    dataflow set SET to LOC.  If MODIFY is true, any other live copies
    2395                 :            :    of the same variable part are also deleted from the dataflow set,
    2396                 :            :    otherwise the variable part is assumed to be copied from another
    2397                 :            :    location holding the same part.
    2398                 :            :    Adjust the address first if it is stack pointer based.  */
    2399                 :            : 
    2400                 :            : static void
    2401                 :       7418 : var_mem_delete_and_set (dataflow_set *set, rtx loc, bool modify,
    2402                 :            :                         enum var_init_status initialized, rtx set_src)
    2403                 :            : {
    2404                 :       7418 :   tree decl = MEM_EXPR (loc);
    2405                 :       7418 :   HOST_WIDE_INT offset = int_mem_offset (loc);
    2406                 :            : 
    2407                 :       7418 :   clobber_overlapping_mems (set, loc);
    2408                 :       7418 :   decl = var_debug_decl (decl);
    2409                 :            : 
    2410                 :       7418 :   if (initialized == VAR_INIT_STATUS_UNKNOWN)
    2411                 :          0 :     initialized = get_init_value (set, loc, dv_from_decl (decl));
    2412                 :            : 
    2413                 :       7418 :   if (modify)
    2414                 :      12276 :     clobber_variable_part (set, NULL, dv_from_decl (decl), offset, set_src);
    2415                 :       7418 :   var_mem_set (set, loc, initialized, set_src);
    2416                 :       7418 : }
    2417                 :            : 
    2418                 :            : /* Delete the location part LOC from dataflow set SET.  If CLOBBER is
    2419                 :            :    true, also delete any other live copies of the same variable part.
    2420                 :            :    Adjust the address first if it is stack pointer based.  */
    2421                 :            : 
    2422                 :            : static void
    2423                 :         26 : var_mem_delete (dataflow_set *set, rtx loc, bool clobber)
    2424                 :            : {
    2425                 :         26 :   tree decl = MEM_EXPR (loc);
    2426                 :         26 :   HOST_WIDE_INT offset = int_mem_offset (loc);
    2427                 :            : 
    2428                 :         26 :   clobber_overlapping_mems (set, loc);
    2429                 :         26 :   decl = var_debug_decl (decl);
    2430                 :         26 :   if (clobber)
    2431                 :         52 :     clobber_variable_part (set, NULL, dv_from_decl (decl), offset, NULL);
    2432                 :         52 :   delete_variable_part (set, loc, dv_from_decl (decl), offset);
    2433                 :         26 : }
    2434                 :            : 
    2435                 :            : /* Return true if LOC should not be expanded for location expressions,
    2436                 :            :    or used in them.  */
    2437                 :            : 
    2438                 :            : static inline bool
    2439                 :  184408000 : unsuitable_loc (rtx loc)
    2440                 :            : {
    2441                 :    9535170 :   switch (GET_CODE (loc))
    2442                 :            :     {
    2443                 :            :     case PC:
    2444                 :            :     case SCRATCH:
    2445                 :            :     case CC0:
    2446                 :            :     case ASM_INPUT:
    2447                 :            :     case ASM_OPERANDS:
    2448                 :            :       return true;
    2449                 :            : 
    2450                 :  169669000 :     default:
    2451                 :  169669000 :       return false;
    2452                 :            :     }
    2453                 :            : }
    2454                 :            : 
    2455                 :            : /* Bind VAL to LOC in SET.  If MODIFIED, detach LOC from any values
    2456                 :            :    bound to it.  */
    2457                 :            : 
    2458                 :            : static inline void
    2459                 :   81770400 : val_bind (dataflow_set *set, rtx val, rtx loc, bool modified)
    2460                 :            : {
    2461                 :   81770400 :   if (REG_P (loc))
    2462                 :            :     {
    2463                 :   51699900 :       if (modified)
    2464                 :   45061600 :         var_regno_delete (set, REGNO (loc));
    2465                 :  103400000 :       var_reg_decl_set (set, loc, VAR_INIT_STATUS_INITIALIZED,
    2466                 :            :                         dv_from_value (val), 0, NULL_RTX, INSERT);
    2467                 :            :     }
    2468                 :   30070500 :   else if (MEM_P (loc))
    2469                 :            :     {
    2470                 :   30070500 :       struct elt_loc_list *l = CSELIB_VAL_PTR (val)->locs;
    2471                 :            : 
    2472                 :   30070500 :       if (modified)
    2473                 :   15495800 :         clobber_overlapping_mems (set, loc);
    2474                 :            : 
    2475                 :   30070500 :       if (l && GET_CODE (l->loc) == VALUE)
    2476                 :     626684 :         l = canonical_cselib_val (CSELIB_VAL_PTR (l->loc))->locs;
    2477                 :            : 
    2478                 :            :       /* If this MEM is a global constant, we don't need it in the
    2479                 :            :          dynamic tables.  ??? We should test this before emitting the
    2480                 :            :          micro-op in the first place.  */
    2481                 :   38100200 :       while (l)
    2482                 :    8029700 :         if (GET_CODE (l->loc) == MEM && XEXP (l->loc, 0) == XEXP (loc, 0))
    2483                 :            :           break;
    2484                 :            :         else
    2485                 :    8029700 :           l = l->next;
    2486                 :            : 
    2487                 :   30070500 :       if (!l)
    2488                 :   30070500 :         var_mem_decl_set (set, loc, VAR_INIT_STATUS_INITIALIZED,
    2489                 :            :                           dv_from_value (val), 0, NULL_RTX, INSERT);
    2490                 :            :     }
    2491                 :            :   else
    2492                 :            :     {
    2493                 :            :       /* Other kinds of equivalences are necessarily static, at least
    2494                 :            :          so long as we do not perform substitutions while merging
    2495                 :            :          expressions.  */
    2496                 :          0 :       gcc_unreachable ();
    2497                 :            :       set_variable_part (set, loc, dv_from_value (val), 0,
    2498                 :            :                          VAR_INIT_STATUS_INITIALIZED, NULL_RTX, INSERT);
    2499                 :            :     }
    2500                 :   81770400 : }
    2501                 :            : 
    2502                 :            : /* Bind a value to a location it was just stored in.  If MODIFIED
    2503                 :            :    holds, assume the location was modified, detaching it from any
    2504                 :            :    values bound to it.  */
    2505                 :            : 
    2506                 :            : static void
    2507                 :   60557400 : val_store (dataflow_set *set, rtx val, rtx loc, rtx_insn *insn,
    2508                 :            :            bool modified)
    2509                 :            : {
    2510                 :   60557400 :   cselib_val *v = CSELIB_VAL_PTR (val);
    2511                 :            : 
    2512                 :   60557400 :   gcc_assert (cselib_preserved_value_p (v));
    2513                 :            : 
    2514                 :   60557400 :   if (dump_file)
    2515                 :            :     {
    2516                 :       1052 :       fprintf (dump_file, "%i: ", insn ? INSN_UID (insn) : 0);
    2517                 :        526 :       print_inline_rtx (dump_file, loc, 0);
    2518                 :        526 :       fprintf (dump_file, " evaluates to ");
    2519                 :        526 :       print_inline_rtx (dump_file, val, 0);
    2520                 :        526 :       if (v->locs)
    2521                 :            :         {
    2522                 :            :           struct elt_loc_list *l;
    2523                 :        956 :           for (l = v->locs; l; l = l->next)
    2524                 :            :             {
    2525                 :        532 :               fprintf (dump_file, "\n%i: ", INSN_UID (l->setting_insn));
    2526                 :        532 :               print_inline_rtx (dump_file, l->loc, 0);
    2527                 :            :             }
    2528                 :            :         }
    2529                 :        526 :       fprintf (dump_file, "\n");
    2530                 :            :     }
    2531                 :            : 
    2532                 :   60557400 :   gcc_checking_assert (!unsuitable_loc (loc));
    2533                 :            : 
    2534                 :   60557400 :   val_bind (set, val, loc, modified);
    2535                 :   60557400 : }
    2536                 :            : 
    2537                 :            : /* Clear (canonical address) slots that reference X.  */
    2538                 :            : 
    2539                 :            : bool
    2540                 :          0 : local_get_addr_clear_given_value (rtx const &, rtx *slot, rtx x)
    2541                 :            : {
    2542                 :          0 :   if (vt_get_canonicalize_base (*slot) == x)
    2543                 :          0 :     *slot = NULL;
    2544                 :          0 :   return true;
    2545                 :            : }
    2546                 :            : 
    2547                 :            : /* Reset this node, detaching all its equivalences.  Return the slot
    2548                 :            :    in the variable hash table that holds dv, if there is one.  */
    2549                 :            : 
    2550                 :            : static void
    2551                 :   28583200 : val_reset (dataflow_set *set, decl_or_value dv)
    2552                 :            : {
    2553                 :   28583200 :   variable *var = shared_hash_find (set->vars, dv) ;
    2554                 :   28583200 :   location_chain *node;
    2555                 :   28583200 :   rtx cval;
    2556                 :            : 
    2557                 :   28583200 :   if (!var || !var->n_var_parts)
    2558                 :            :     return;
    2559                 :            : 
    2560                 :          0 :   gcc_assert (var->n_var_parts == 1);
    2561                 :            : 
    2562                 :          0 :   if (var->onepart == ONEPART_VALUE)
    2563                 :            :     {
    2564                 :          0 :       rtx x = dv_as_value (dv);
    2565                 :            : 
    2566                 :            :       /* Relationships in the global cache don't change, so reset the
    2567                 :            :          local cache entry only.  */
    2568                 :          0 :       rtx *slot = local_get_addr_cache->get (x);
    2569                 :          0 :       if (slot)
    2570                 :            :         {
    2571                 :            :           /* If the value resolved back to itself, odds are that other
    2572                 :            :              values may have cached it too.  These entries now refer
    2573                 :            :              to the old X, so detach them too.  Entries that used the
    2574                 :            :              old X but resolved to something else remain ok as long as
    2575                 :            :              that something else isn't also reset.  */
    2576                 :          0 :           if (*slot == x)
    2577                 :          0 :             local_get_addr_cache
    2578                 :          0 :               ->traverse<rtx, local_get_addr_clear_given_value> (x);
    2579                 :          0 :           *slot = NULL;
    2580                 :            :         }
    2581                 :            :     }
    2582                 :            : 
    2583                 :          0 :   cval = NULL;
    2584                 :          0 :   for (node = var->var_part[0].loc_chain; node; node = node->next)
    2585                 :          0 :     if (GET_CODE (node->loc) == VALUE
    2586                 :          0 :         && canon_value_cmp (node->loc, cval))
    2587                 :            :       cval = node->loc;
    2588                 :            : 
    2589                 :          0 :   for (node = var->var_part[0].loc_chain; node; node = node->next)
    2590                 :          0 :     if (GET_CODE (node->loc) == VALUE && cval != node->loc)
    2591                 :            :       {
    2592                 :            :         /* Redirect the equivalence link to the new canonical
    2593                 :            :            value, or simply remove it if it would point at
    2594                 :            :            itself.  */
    2595                 :          0 :         if (cval)
    2596                 :          0 :           set_variable_part (set, cval, dv_from_value (node->loc),
    2597                 :            :                              0, node->init, node->set_src, NO_INSERT);
    2598                 :          0 :         delete_variable_part (set, dv_as_value (dv),
    2599                 :            :                               dv_from_value (node->loc), 0);
    2600                 :            :       }
    2601                 :            : 
    2602                 :          0 :   if (cval)
    2603                 :            :     {
    2604                 :          0 :       decl_or_value cdv = dv_from_value (cval);
    2605                 :            : 
    2606                 :            :       /* Keep the remaining values connected, accumulating links
    2607                 :            :          in the canonical value.  */
    2608                 :          0 :       for (node = var->var_part[0].loc_chain; node; node = node->next)
    2609                 :            :         {
    2610                 :          0 :           if (node->loc == cval)
    2611                 :          0 :             continue;
    2612                 :          0 :           else if (GET_CODE (node->loc) == REG)
    2613                 :          0 :             var_reg_decl_set (set, node->loc, node->init, cdv, 0,
    2614                 :            :                               node->set_src, NO_INSERT);
    2615                 :          0 :           else if (GET_CODE (node->loc) == MEM)
    2616                 :          0 :             var_mem_decl_set (set, node->loc, node->init, cdv, 0,
    2617                 :            :                               node->set_src, NO_INSERT);
    2618                 :            :           else
    2619                 :          0 :             set_variable_part (set, node->loc, cdv, 0,
    2620                 :            :                                node->init, node->set_src, NO_INSERT);
    2621                 :            :         }
    2622                 :            :     }
    2623                 :            : 
    2624                 :            :   /* We remove this last, to make sure that the canonical value is not
    2625                 :            :      removed to the point of requiring reinsertion.  */
    2626                 :          0 :   if (cval)
    2627                 :          0 :     delete_variable_part (set, dv_as_value (dv), dv_from_value (cval), 0);
    2628                 :            : 
    2629                 :          0 :   clobber_variable_part (set, NULL, dv, 0, NULL);
    2630                 :            : }
    2631                 :            : 
    2632                 :            : /* Find the values in a given location and map the val to another
    2633                 :            :    value, if it is unique, or add the location as one holding the
    2634                 :            :    value.  */
    2635                 :            : 
    2636                 :            : static void
    2637                 :   28376500 : val_resolve (dataflow_set *set, rtx val, rtx loc, rtx_insn *insn)
    2638                 :            : {
    2639                 :   28376500 :   decl_or_value dv = dv_from_value (val);
    2640                 :            : 
    2641                 :   28376500 :   if (dump_file && (dump_flags & TDF_DETAILS))
    2642                 :            :     {
    2643                 :          6 :       if (insn)
    2644                 :          6 :         fprintf (dump_file, "%i: ", INSN_UID (insn));
    2645                 :            :       else
    2646                 :          0 :         fprintf (dump_file, "head: ");
    2647                 :          6 :       print_inline_rtx (dump_file, val, 0);
    2648                 :          6 :       fputs (" is at ", dump_file);
    2649                 :          6 :       print_inline_rtx (dump_file, loc, 0);
    2650                 :          6 :       fputc ('\n', dump_file);
    2651                 :            :     }
    2652                 :            : 
    2653                 :   28376500 :   val_reset (set, dv);
    2654                 :            : 
    2655                 :   28376500 :   gcc_checking_assert (!unsuitable_loc (loc));
    2656                 :            : 
    2657                 :   28376500 :   if (REG_P (loc))
    2658                 :            :     {
    2659                 :   13801800 :       attrs *node, *found = NULL;
    2660                 :            : 
    2661                 :   22373200 :       for (node = set->regs[REGNO (loc)]; node; node = node->next)
    2662                 :   17142800 :         if (dv_is_value_p (node->dv)
    2663                 :    8265200 :             && GET_MODE (dv_as_value (node->dv)) == GET_MODE (loc))
    2664                 :            :           {
    2665                 :    7163530 :             found = node;
    2666                 :            : 
    2667                 :            :             /* Map incoming equivalences.  ??? Wouldn't it be nice if
    2668                 :            :              we just started sharing the location lists?  Maybe a
    2669                 :            :              circular list ending at the value itself or some
    2670                 :            :              such.  */
    2671                 :    7163530 :             set_variable_part (set, dv_as_value (node->dv),
    2672                 :            :                                dv_from_value (val), node->offset,
    2673                 :            :                                VAR_INIT_STATUS_INITIALIZED, NULL_RTX, INSERT);
    2674                 :    7163530 :             set_variable_part (set, val, node->dv, node->offset,
    2675                 :            :                                VAR_INIT_STATUS_INITIALIZED, NULL_RTX, INSERT);
    2676                 :            :           }
    2677                 :            : 
    2678                 :            :       /* If we didn't find any equivalence, we need to remember that
    2679                 :            :          this value is held in the named register.  */
    2680                 :   13801800 :       if (found)
    2681                 :            :         return;
    2682                 :            :     }
    2683                 :            :   /* ??? Attempt to find and merge equivalent MEMs or other
    2684                 :            :      expressions too.  */
    2685                 :            : 
    2686                 :   21213000 :   val_bind (set, val, loc, false);
    2687                 :            : }
    2688                 :            : 
    2689                 :            : /* Initialize dataflow set SET to be empty.
    2690                 :            :    VARS_SIZE is the initial size of hash table VARS.  */
    2691                 :            : 
    2692                 :            : static void
    2693                 :   20578400 : dataflow_set_init (dataflow_set *set)
    2694                 :            : {
    2695                 :          0 :   init_attrs_list_set (set->regs);
    2696                 :   20917300 :   set->vars = shared_hash_copy (empty_shared_hash);
    2697                 :   20917300 :   set->stack_adjust = 0;
    2698                 :   20917300 :   set->traversed_vars = NULL;
    2699                 :     147028 : }
    2700                 :            : 
    2701                 :            : /* Delete the contents of dataflow set SET.  */
    2702                 :            : 
    2703                 :            : static void
    2704                 :   20600900 : dataflow_set_clear (dataflow_set *set)
    2705                 :            : {
    2706                 :   20600900 :   int i;
    2707                 :            : 
    2708                 : 1586270000 :   for (i = 0; i < FIRST_PSEUDO_REGISTER; i++)
    2709                 : 3131340000 :     attrs_list_clear (&set->regs[i]);
    2710                 :            : 
    2711                 :   20600900 :   shared_hash_destroy (set->vars);
    2712                 :   20600900 :   set->vars = shared_hash_copy (empty_shared_hash);
    2713                 :   20600900 : }
    2714                 :            : 
    2715                 :            : /* Copy the contents of dataflow set SRC to DST.  */
    2716                 :            : 
    2717                 :            : static void
    2718                 :   24001600 : dataflow_set_copy (dataflow_set *dst, dataflow_set *src)
    2719                 :            : {
    2720                 :   24001600 :   int i;
    2721                 :            : 
    2722                 : 1848120000 :   for (i = 0; i < FIRST_PSEUDO_REGISTER; i++)
    2723                 : 1824120000 :     attrs_list_copy (&dst->regs[i], src->regs[i]);
    2724                 :            : 
    2725                 :   24001600 :   shared_hash_destroy (dst->vars);
    2726                 :   24001600 :   dst->vars = shared_hash_copy (src->vars);
    2727                 :   24001600 :   dst->stack_adjust = src->stack_adjust;
    2728                 :   24001600 : }
    2729                 :            : 
    2730                 :            : /* Information for merging lists of locations for a given offset of variable.
    2731                 :            :  */
    2732                 :            : struct variable_union_info
    2733                 :            : {
    2734                 :            :   /* Node of the location chain.  */
    2735                 :            :   location_chain *lc;
    2736                 :            : 
    2737                 :            :   /* The sum of positions in the input chains.  */
    2738                 :            :   int pos;
    2739                 :            : 
    2740                 :            :   /* The position in the chain of DST dataflow set.  */
    2741                 :            :   int pos_dst;
    2742                 :            : };
    2743                 :            : 
    2744                 :            : /* Buffer for location list sorting and its allocated size.  */
    2745                 :            : static struct variable_union_info *vui_vec;
    2746                 :            : static int vui_allocated;
    2747                 :            : 
    2748                 :            : /* Compare function for qsort, order the structures by POS element.  */
    2749                 :            : 
    2750                 :            : static int
    2751                 :     521622 : variable_union_info_cmp_pos (const void *n1, const void *n2)
    2752                 :            : {
    2753                 :     521622 :   const struct variable_union_info *const i1 =
    2754                 :            :     (const struct variable_union_info *) n1;
    2755                 :     521622 :   const struct variable_union_info *const i2 =
    2756                 :            :     ( const struct variable_union_info *) n2;
    2757                 :            : 
    2758                 :     521622 :   if (i1->pos != i2->pos)
    2759                 :     516066 :     return i1->pos - i2->pos;
    2760                 :            : 
    2761                 :       5556 :   return (i1->pos_dst - i2->pos_dst);
    2762                 :            : }
    2763                 :            : 
    2764                 :            : /* Compute union of location parts of variable *SLOT and the same variable
    2765                 :            :    from hash table DATA.  Compute "sorted" union of the location chains
    2766                 :            :    for common offsets, i.e. the locations of a variable part are sorted by
    2767                 :            :    a priority where the priority is the sum of the positions in the 2 chains
    2768                 :            :    (if a location is only in one list the position in the second list is
    2769                 :            :    defined to be larger than the length of the chains).
    2770                 :            :    When we are updating the location parts the newest location is in the
    2771                 :            :    beginning of the chain, so when we do the described "sorted" union
    2772                 :            :    we keep the newest locations in the beginning.  */
    2773                 :            : 
    2774                 :            : static int
    2775                 :    1480800 : variable_union (variable *src, dataflow_set *set)
    2776                 :            : {
    2777                 :    1480800 :   variable *dst;
    2778                 :    1480800 :   variable **dstp;
    2779                 :    1480800 :   int i, j, k;
    2780                 :            : 
    2781                 :    1480800 :   dstp = shared_hash_find_slot (set->vars, src->dv);
    2782                 :    1480800 :   if (!dstp || !*dstp)
    2783                 :            :     {
    2784                 :     773630 :       src->refcount++;
    2785                 :            : 
    2786                 :     773630 :       dst_can_be_shared = false;
    2787                 :     773630 :       if (!dstp)
    2788                 :          1 :         dstp = shared_hash_find_slot_unshare (&set->vars, src->dv, INSERT);
    2789                 :            : 
    2790                 :     773630 :       *dstp = src;
    2791                 :            : 
    2792                 :            :       /* Continue traversing the hash table.  */
    2793                 :     773630 :       return 1;
    2794                 :            :     }
    2795                 :            :   else
    2796                 :     707174 :     dst = *dstp;
    2797                 :            : 
    2798                 :     707174 :   gcc_assert (src->n_var_parts);
    2799                 :     707174 :   gcc_checking_assert (src->onepart == dst->onepart);
    2800                 :            : 
    2801                 :            :   /* We can combine one-part variables very efficiently, because their
    2802                 :            :      entries are in canonical order.  */
    2803                 :     707174 :   if (src->onepart)
    2804                 :            :     {
    2805                 :          0 :       location_chain **nodep, *dnode, *snode;
    2806                 :            : 
    2807                 :          0 :       gcc_assert (src->n_var_parts == 1
    2808                 :            :                   && dst->n_var_parts == 1);
    2809                 :            : 
    2810                 :          0 :       snode = src->var_part[0].loc_chain;
    2811                 :          0 :       gcc_assert (snode);
    2812                 :            : 
    2813                 :          0 :     restart_onepart_unshared:
    2814                 :          0 :       nodep = &dst->var_part[0].loc_chain;
    2815                 :          0 :       dnode = *nodep;
    2816                 :          0 :       gcc_assert (dnode);
    2817                 :            : 
    2818                 :          0 :       while (snode)
    2819                 :            :         {
    2820                 :          0 :           int r = dnode ? loc_cmp (dnode->loc, snode->loc) : 1;
    2821                 :            : 
    2822                 :          0 :           if (r > 0)
    2823                 :            :             {
    2824                 :          0 :               location_chain *nnode;
    2825                 :            : 
    2826                 :          0 :               if (shared_var_p (dst, set->vars))
    2827                 :            :                 {
    2828                 :          0 :                   dstp = unshare_variable (set, dstp, dst,
    2829                 :            :                                            VAR_INIT_STATUS_INITIALIZED);
    2830                 :          0 :                   dst = *dstp;
    2831                 :          0 :                   goto restart_onepart_unshared;
    2832                 :            :                 }
    2833                 :            : 
    2834                 :          0 :               *nodep = nnode = new location_chain;
    2835                 :          0 :               nnode->loc = snode->loc;
    2836                 :          0 :               nnode->init = snode->init;
    2837                 :          0 :               if (!snode->set_src || MEM_P (snode->set_src))
    2838                 :          0 :                 nnode->set_src = NULL;
    2839                 :            :               else
    2840                 :          0 :                 nnode->set_src = snode->set_src;
    2841                 :          0 :               nnode->next = dnode;
    2842                 :          0 :               dnode = nnode;
    2843                 :            :             }
    2844                 :          0 :           else if (r == 0)
    2845                 :          0 :             gcc_checking_assert (rtx_equal_p (dnode->loc, snode->loc));
    2846                 :            : 
    2847                 :          0 :           if (r >= 0)
    2848                 :          0 :             snode = snode->next;
    2849                 :            : 
    2850                 :          0 :           nodep = &dnode->next;
    2851                 :          0 :           dnode = *nodep;
    2852                 :            :         }
    2853                 :            : 
    2854                 :            :       return 1;
    2855                 :            :     }
    2856                 :            : 
    2857                 :            :   gcc_checking_assert (!src->onepart);
    2858                 :            : 
    2859                 :            :   /* Count the number of location parts, result is K.  */
    2860                 :    1051560 :   for (i = 0, j = 0, k = 0;
    2861                 :    1758730 :        i < src->n_var_parts && j < dst->n_var_parts; k++)
    2862                 :            :     {
    2863                 :    1051560 :       if (VAR_PART_OFFSET (src, i) == VAR_PART_OFFSET (dst, j))
    2864                 :            :         {
    2865                 :    1017150 :           i++;
    2866                 :    1017150 :           j++;
    2867                 :            :         }
    2868                 :      34409 :       else if (VAR_PART_OFFSET (src, i) < VAR_PART_OFFSET (dst, j))
    2869                 :      27940 :         i++;
    2870                 :            :       else
    2871                 :       6469 :         j++;
    2872                 :            :     }
    2873                 :     707174 :   k += src->n_var_parts - i;
    2874                 :     707174 :   k += dst->n_var_parts - j;
    2875                 :            : 
    2876                 :            :   /* We track only variables whose size is <= MAX_VAR_PARTS bytes
    2877                 :            :      thus there are at most MAX_VAR_PARTS different offsets.  */
    2878                 :     707174 :   gcc_checking_assert (dst->onepart ? k == 1 : k <= MAX_VAR_PARTS);
    2879                 :            : 
    2880                 :     707174 :   if (dst->n_var_parts != k && shared_var_p (dst, set->vars))
    2881                 :            :     {
    2882                 :      47382 :       dstp = unshare_variable (set, dstp, dst, VAR_INIT_STATUS_UNKNOWN);
    2883                 :      47382 :       dst = *dstp;
    2884                 :            :     }
    2885                 :            : 
    2886                 :     707174 :   i = src->n_var_parts - 1;
    2887                 :     707174 :   j = dst->n_var_parts - 1;
    2888                 :     707174 :   dst->n_var_parts = k;
    2889                 :            : 
    2890                 :    1784020 :   for (k--; k >= 0; k--)
    2891                 :            :     {
    2892                 :    1076840 :       location_chain *node, *node2;
    2893                 :            : 
    2894                 :    1076840 :       if (i >= 0 && j >= 0
    2895                 :    1076840 :           && VAR_PART_OFFSET (src, i) == VAR_PART_OFFSET (dst, j))
    2896                 :            :         {
    2897                 :            :           /* Compute the "sorted" union of the chains, i.e. the locations which
    2898                 :            :              are in both chains go first, they are sorted by the sum of
    2899                 :            :              positions in the chains.  */
    2900                 :    1017150 :           int dst_l, src_l;
    2901                 :    1017150 :           int ii, jj, n;
    2902                 :    1017150 :           struct variable_union_info *vui;
    2903                 :            : 
    2904                 :            :           /* If DST is shared compare the location chains.
    2905                 :            :              If they are different we will modify the chain in DST with
    2906                 :            :              high probability so make a copy of DST.  */
    2907                 :    1017150 :           if (shared_var_p (dst, set->vars))
    2908                 :            :             {
    2909                 :    2042590 :               for (node = src->var_part[i].loc_chain,
    2910                 :    2042590 :                    node2 = dst->var_part[j].loc_chain; node && node2;
    2911                 :    1098450 :                    node = node->next, node2 = node2->next)
    2912                 :            :                 {
    2913                 :    1714530 :                   if (!((REG_P (node2->loc)
    2914                 :     566690 :                          && REG_P (node->loc)
    2915                 :     564842 :                          && REGNO (node2->loc) == REGNO (node->loc))
    2916                 :     584996 :                         || rtx_equal_p (node2->loc, node->loc)))
    2917                 :            :                     {
    2918                 :      31082 :                       if (node2->init < node->init)
    2919                 :          0 :                         node2->init = node->init;
    2920                 :            :                       break;
    2921                 :            :                     }
    2922                 :            :                 }
    2923                 :     944138 :               if (node || node2)
    2924                 :            :                 {
    2925                 :      72523 :                   dstp = unshare_variable (set, dstp, dst,
    2926                 :            :                                            VAR_INIT_STATUS_UNKNOWN);
    2927                 :      72523 :                   dst = (variable *)*dstp;
    2928                 :            :                 }
    2929                 :            :             }
    2930                 :            : 
    2931                 :    1017150 :           src_l = 0;
    2932                 :    2328640 :           for (node = src->var_part[i].loc_chain; node; node = node->next)
    2933                 :    1311490 :             src_l++;
    2934                 :    1017150 :           dst_l = 0;
    2935                 :    2259430 :           for (node = dst->var_part[j].loc_chain; node; node = node->next)
    2936                 :    1242280 :             dst_l++;
    2937                 :            : 
    2938                 :    1017150 :           if (dst_l == 1)
    2939                 :            :             {
    2940                 :            :               /* The most common case, much simpler, no qsort is needed.  */
    2941                 :     829356 :               location_chain *dstnode = dst->var_part[j].loc_chain;
    2942                 :     829356 :               dst->var_part[k].loc_chain = dstnode;
    2943                 :     829356 :               VAR_PART_OFFSET (dst, k) = VAR_PART_OFFSET (dst, j);
    2944                 :     829356 :               node2 = dstnode;
    2945                 :    1726770 :               for (node = src->var_part[i].loc_chain; node; node = node->next)
    2946                 :    1248260 :                 if (!((REG_P (dstnode->loc)
    2947                 :     597359 :                        && REG_P (node->loc)
    2948                 :     595486 :                        && REGNO (dstnode->loc) == REGNO (node->loc))
    2949                 :     350845 :                       || rtx_equal_p (dstnode->loc, node->loc)))
    2950                 :            :                   {
    2951                 :      77266 :                     location_chain *new_node;
    2952                 :            : 
    2953                 :            :                     /* Copy the location from SRC.  */
    2954                 :      77266 :                     new_node = new location_chain;
    2955                 :      77266 :                     new_node->loc = node->loc;
    2956                 :      77266 :                     new_node->init = node->init;
    2957                 :      77266 :                     if (!node->set_src || MEM_P (node->set_src))
    2958                 :      68578 :                       new_node->set_src = NULL;
    2959                 :            :                     else
    2960                 :       8688 :                       new_node->set_src = node->set_src;
    2961                 :      77266 :                     node2->next = new_node;
    2962                 :      77266 :                     node2 = new_node;
    2963                 :            :                   }
    2964                 :     829356 :               node2->next = NULL;
    2965                 :            :             }
    2966                 :            :           else
    2967                 :            :             {
    2968                 :     187792 :               if (src_l + dst_l > vui_allocated)
    2969                 :            :                 {
    2970                 :       8310 :                   vui_allocated = MAX (vui_allocated * 2, src_l + dst_l);
    2971                 :       8310 :                   vui_vec = XRESIZEVEC (struct variable_union_info, vui_vec,
    2972                 :            :                                         vui_allocated);
    2973                 :            :                 }
    2974                 :     187792 :               vui = vui_vec;
    2975                 :            : 
    2976                 :            :               /* Fill in the locations from DST.  */
    2977                 :     600718 :               for (node = dst->var_part[j].loc_chain, jj = 0; node;
    2978                 :     412926 :                    node = node->next, jj++)
    2979                 :            :                 {
    2980                 :     412926 :                   vui[jj].lc = node;
    2981                 :     412926 :                   vui[jj].pos_dst = jj;
    2982                 :            : 
    2983                 :            :                   /* Pos plus value larger than a sum of 2 valid positions.  */
    2984                 :     412926 :                   vui[jj].pos = jj + src_l + dst_l;
    2985                 :            :                 }
    2986                 :            : 
    2987                 :            :               /* Fill in the locations from SRC.  */
    2988                 :     187792 :               n = dst_l;
    2989                 :     601867 :               for (node = src->var_part[i].loc_chain, ii = 0; node;
    2990                 :     414075 :                    node = node->next, ii++)
    2991                 :            :                 {
    2992                 :            :                   /* Find location from NODE.  */
    2993                 :     767985 :                   for (jj = 0; jj < dst_l; jj++)
    2994                 :            :                     {
    2995                 :     752942 :                       if ((REG_P (vui[jj].lc->loc)
    2996                 :     136976 :                            && REG_P (node->loc)
    2997                 :     102510 :                            && REGNO (vui[jj].lc->loc) == REGNO (node->loc))
    2998                 :     813886 :                           || rtx_equal_p (vui[jj].lc->loc, node->loc))
    2999                 :            :                         {
    3000                 :     399032 :                           vui[jj].pos = jj + ii;
    3001                 :     399032 :                           break;
    3002                 :            :                         }
    3003                 :            :                     }
    3004                 :     414075 :                   if (jj >= dst_l)   /* The location has not been found.  */
    3005                 :            :                     {
    3006                 :      15043 :                       location_chain *new_node;
    3007                 :            : 
    3008                 :            :                       /* Copy the location from SRC.  */
    3009                 :      15043 :                       new_node = new location_chain;
    3010                 :      15043 :                       new_node->loc = node->loc;
    3011                 :      15043 :                       new_node->init = node->init;
    3012                 :      15043 :                       if (!node->set_src || MEM_P (node->set_src))
    3013                 :       8913 :                         new_node->set_src = NULL;
    3014                 :            :                       else
    3015                 :       6130 :                         new_node->set_src = node->set_src;
    3016                 :      15043 :                       vui[n].lc = new_node;
    3017                 :      15043 :                       vui[n].pos_dst = src_l + dst_l;
    3018                 :      15043 :                       vui[n].pos = ii + src_l + dst_l;
    3019                 :      15043 :                       n++;
    3020                 :            :                     }
    3021                 :            :                 }
    3022                 :            : 
    3023                 :     187792 :               if (dst_l == 2)
    3024                 :            :                 {
    3025                 :            :                   /* Special case still very common case.  For dst_l == 2
    3026                 :            :                      all entries dst_l ... n-1 are sorted, with for i >= dst_l
    3027                 :            :                      vui[i].pos == i + src_l + dst_l.  */
    3028                 :     160723 :                   if (vui[0].pos > vui[1].pos)
    3029                 :            :                     {
    3030                 :            :                       /* Order should be 1, 0, 2... */
    3031                 :       4957 :                       dst->var_part[k].loc_chain = vui[1].lc;
    3032                 :       4957 :                       vui[1].lc->next = vui[0].lc;
    3033                 :       4957 :                       if (n >= 3)
    3034                 :            :                         {
    3035                 :        355 :                           vui[0].lc->next = vui[2].lc;
    3036                 :        355 :                           vui[n - 1].lc->next = NULL;
    3037                 :            :                         }
    3038                 :            :                       else
    3039                 :       4602 :                         vui[0].lc->next = NULL;
    3040                 :            :                       ii = 3;
    3041                 :            :                     }
    3042                 :            :                   else
    3043                 :            :                     {
    3044                 :     155766 :                       dst->var_part[k].loc_chain = vui[0].lc;
    3045                 :     155766 :                       if (n >= 3 && vui[2].pos < vui[1].pos)
    3046                 :            :                         {
    3047                 :            :                           /* Order should be 0, 2, 1, 3... */
    3048                 :        629 :                           vui[0].lc->next = vui[2].lc;
    3049                 :        629 :                           vui[2].lc->next = vui[1].lc;
    3050                 :        629 :                           if (n >= 4)
    3051                 :            :                             {
    3052                 :         43 :                               vui[1].lc->next = vui[3].lc;
    3053                 :         43 :                               vui[n - 1].lc->next = NULL;
    3054                 :            :                             }
    3055                 :            :                           else
    3056                 :        586 :                             vui[1].lc->next = NULL;
    3057                 :            :                           ii = 4;
    3058                 :            :                         }
    3059                 :            :                       else
    3060                 :            :                         {
    3061                 :            :                           /* Order should be 0, 1, 2... */
    3062                 :     155137 :                           ii = 1;
    3063                 :     155137 :                           vui[n - 1].lc->next = NULL;
    3064                 :            :                         }
    3065                 :            :                     }
    3066                 :     328656 :                   for (; ii < n; ii++)
    3067                 :     167933 :                     vui[ii - 1].lc->next = vui[ii].lc;
    3068                 :            :                 }
    3069                 :            :               else
    3070                 :            :                 {
    3071                 :      27069 :                   qsort (vui, n, sizeof (struct variable_union_info),
    3072                 :            :                          variable_union_info_cmp_pos);
    3073                 :            : 
    3074                 :            :                   /* Reconnect the nodes in sorted order.  */
    3075                 :      92700 :                   for (ii = 1; ii < n; ii++)
    3076                 :      65631 :                     vui[ii - 1].lc->next = vui[ii].lc;
    3077                 :      27069 :                   vui[n - 1].lc->next = NULL;
    3078                 :      27069 :                   dst->var_part[k].loc_chain = vui[0].lc;
    3079                 :            :                 }
    3080                 :            : 
    3081                 :     187792 :               VAR_PART_OFFSET (dst, k) = VAR_PART_OFFSET (dst, j);
    3082                 :            :             }
    3083                 :    1017150 :           i--;
    3084                 :    1017150 :           j--;
    3085                 :            :         }
    3086                 :      59694 :       else if ((i >= 0 && j >= 0
    3087                 :      25285 :                 && VAR_PART_OFFSET (src, i) < VAR_PART_OFFSET (dst, j))
    3088                 :      79136 :                || i < 0)
    3089                 :            :         {
    3090                 :      12312 :           dst->var_part[k] = dst->var_part[j];
    3091                 :      12312 :           j--;
    3092                 :            :         }
    3093                 :      47382 :       else if ((i >= 0 && j >= 0
    3094                 :      19442 :                 && VAR_PART_OFFSET (src, i) > VAR_PART_OFFSET (dst, j))
    3095                 :      47382 :                || j < 0)
    3096                 :            :         {
    3097                 :      47382 :           location_chain **nextp;
    3098                 :            : 
    3099                 :            :           /* Copy the chain from SRC.  */
    3100                 :      47382 :           nextp = &dst->var_part[k].loc_chain;
    3101                 :     103068 :           for (node = src->var_part[i].loc_chain; node; node = node->next)
    3102                 :            :             {
    3103                 :      55686 :               location_chain *new_lc;
    3104                 :            : 
    3105                 :      55686 :               new_lc = new location_chain;
    3106                 :      55686 :               new_lc->next = NULL;
    3107                 :      55686 :               new_lc->init = node->init;
    3108                 :      55686 :               if (!node->set_src || MEM_P (node->set_src))
    3109                 :      47207 :                 new_lc->set_src = NULL;
    3110                 :            :               else
    3111                 :       8479 :                 new_lc->set_src = node->set_src;
    3112                 :      55686 :               new_lc->loc = node->loc;
    3113                 :            : 
    3114                 :      55686 :               *nextp = new_lc;
    3115                 :      55686 :               nextp = &new_lc->next;
    3116                 :            :             }
    3117                 :            : 
    3118                 :      47382 :           VAR_PART_OFFSET (dst, k) = VAR_PART_OFFSET (src, i);
    3119                 :      47382 :           i--;
    3120                 :            :         }
    3121                 :    1076840 :       dst->var_part[k].cur_loc = NULL;
    3122                 :            :     }
    3123                 :            : 
    3124                 :     707174 :   if (flag_var_tracking_uninit)
    3125                 :          0 :     for (i = 0; i < src->n_var_parts && i < dst->n_var_parts; i++)
    3126                 :            :       {
    3127                 :          0 :         location_chain *node, *node2;
    3128                 :          0 :         for (node = src->var_part[i].loc_chain; node; node = node->next)
    3129                 :          0 :           for (node2 = dst->var_part[i].loc_chain; node2; node2 = node2->next)
    3130                 :          0 :             if (rtx_equal_p (node->loc, node2->loc))
    3131                 :            :               {
    3132                 :          0 :                 if (node->init > node2->init)
    3133                 :          0 :                   node2->init = node->init;
    3134                 :            :               }
    3135                 :            :       }
    3136                 :            : 
    3137                 :            :   /* Continue traversing the hash table.  */
    3138                 :            :   return 1;
    3139                 :            : }
    3140                 :            : 
    3141                 :            : /* Compute union of dataflow sets SRC and DST and store it to DST.  */
    3142                 :            : 
    3143                 :            : static void
    3144                 :        105 : dataflow_set_union (dataflow_set *dst, dataflow_set *src)
    3145                 :            : {
    3146                 :        105 :   int i;
    3147                 :            : 
    3148                 :       8085 :   for (i = 0; i < FIRST_PSEUDO_REGISTER; i++)
    3149                 :       7980 :     attrs_list_union (&dst->regs[i], src->regs[i]);
    3150                 :            : 
    3151                 :        105 :   if (dst->vars == empty_shared_hash)
    3152                 :            :     {
    3153                 :         87 :       shared_hash_destroy (dst->vars);
    3154                 :         87 :       dst->vars = shared_hash_copy (src->vars);
    3155                 :            :     }
    3156                 :            :   else
    3157                 :            :     {
    3158                 :         18 :       variable_iterator_type hi;
    3159                 :         18 :       variable *var;
    3160                 :            : 
    3161                 :         68 :       FOR_EACH_HASH_TABLE_ELEMENT (*shared_hash_htab (src->vars),
    3162                 :            :                                    var, variable, hi)
    3163                 :         32 :         variable_union (var, dst);
    3164                 :            :     }
    3165                 :        105 : }
    3166                 :            : 
    3167                 :            : /* Whether the value is currently being expanded.  */
    3168                 :            : #define VALUE_RECURSED_INTO(x) \
    3169                 :            :   (RTL_FLAG_CHECK2 ("VALUE_RECURSED_INTO", (x), VALUE, DEBUG_EXPR)->used)
    3170                 :            : 
    3171                 :            : /* Whether no expansion was found, saving useless lookups.
    3172                 :            :    It must only be set when VALUE_CHANGED is clear.  */
    3173                 :            : #define NO_LOC_P(x) \
    3174                 :            :   (RTL_FLAG_CHECK2 ("NO_LOC_P", (x), VALUE, DEBUG_EXPR)->return_val)
    3175                 :            : 
    3176                 :            : /* Whether cur_loc in the value needs to be (re)computed.  */
    3177                 :            : #define VALUE_CHANGED(x) \
    3178                 :            :   (RTL_FLAG_CHECK1 ("VALUE_CHANGED", (x), VALUE)->frame_related)
    3179                 :            : /* Whether cur_loc in the decl needs to be (re)computed.  */
    3180                 :            : #define DECL_CHANGED(x) TREE_VISITED (x)
    3181                 :            : 
    3182                 :            : /* Record (if NEWV) that DV needs to have its cur_loc recomputed.  For
    3183                 :            :    user DECLs, this means they're in changed_variables.  Values and
    3184                 :            :    debug exprs may be left with this flag set if no user variable
    3185                 :            :    requires them to be evaluated.  */
    3186                 :            : 
    3187                 :            : static inline void
    3188                 :  201140000 : set_dv_changed (decl_or_value dv, bool newv)
    3189                 :            : {
    3190                 :  201140000 :   switch (dv_onepart_p (dv))
    3191                 :            :     {
    3192                 :  122038000 :     case ONEPART_VALUE:
    3193                 :  122038000 :       if (newv)
    3194                 :  200659000 :         NO_LOC_P (dv_as_value (dv)) = false;
    3195                 :  122038000 :       VALUE_CHANGED (dv_as_value (dv)) = newv;
    3196                 :  122038000 :       break;
    3197                 :            : 
    3198                 :   13852200 :     case ONEPART_DEXPR:
    3199                 :   13852200 :       if (newv)
    3200                 :   20640400 :         NO_LOC_P (DECL_RTL_KNOWN_SET (dv_as_decl (dv))) = false;
    3201                 :            :       /* Fall through.  */
    3202                 :            : 
    3203                 :   79101500 :     default:
    3204                 :   79101500 :       DECL_CHANGED (dv_as_decl (dv)) = newv;
    3205                 :   79101500 :       break;
    3206                 :            :     }
    3207                 :  201140000 : }
    3208                 :            : 
    3209                 :            : /* Return true if DV needs to have its cur_loc recomputed.  */
    3210                 :            : 
    3211                 :            : static inline bool
    3212                 :   87789600 : dv_changed_p (decl_or_value dv)
    3213                 :            : {
    3214                 :  125195000 :   return (dv_is_value_p (dv)
    3215                 :   50384300 :           ? VALUE_CHANGED (dv_as_value (dv))
    3216                 :   37405300 :           : DECL_CHANGED (dv_as_decl (dv)));
    3217                 :            : }
    3218                 :            : 
    3219                 :            : /* Return a location list node whose loc is rtx_equal to LOC, in the
    3220                 :            :    location list of a one-part variable or value VAR, or in that of
    3221                 :            :    any values recursively mentioned in the location lists.  VARS must
    3222                 :            :    be in star-canonical form.  */
    3223                 :            : 
    3224                 :            : static location_chain *
    3225                 :   15664600 : find_loc_in_1pdv (rtx loc, variable *var, variable_table_type *vars)
    3226                 :            : {
    3227                 :   15664600 :   location_chain *node;
    3228                 :   15664600 :   enum rtx_code loc_code;
    3229                 :            : 
    3230                 :   15664600 :   if (!var)
    3231                 :            :     return NULL;
    3232                 :            : 
    3233                 :   15076400 :   gcc_checking_assert (var->onepart);
    3234                 :            : 
    3235                 :   15076400 :   if (!var->n_var_parts)
    3236                 :            :     return NULL;
    3237                 :            : 
    3238                 :   15076400 :   gcc_checking_assert (loc != dv_as_opaque (var->dv));
    3239                 :            : 
    3240                 :   15076400 :   loc_code = GET_CODE (loc);
    3241                 :   28784000 :   for (node = var->var_part[0].loc_chain; node; node = node->next)
    3242                 :            :     {
    3243                 :   22312400 :       decl_or_value dv;
    3244                 :   22312400 :       variable *rvar;
    3245                 :            : 
    3246                 :   22312400 :       if (GET_CODE (node->loc) != loc_code)
    3247                 :            :         {
    3248                 :   11871500 :           if (GET_CODE (node->loc) != VALUE)
    3249                 :   13707700 :             continue;
    3250                 :            :         }
    3251                 :   10440900 :       else if (loc == node->loc)
    3252                 :    8604700 :         return node;
    3253                 :    7205090 :       else if (loc_code != VALUE)
    3254                 :            :         {
    3255                 :    2461860 :           if (rtx_equal_p (loc, node->loc))
    3256                 :     377934 :             return node;
    3257                 :    2083930 :           continue;
    3258                 :            :         }
    3259                 :            : 
    3260                 :            :       /* Since we're in star-canonical form, we don't need to visit
    3261                 :            :          non-canonical nodes: one-part variables and non-canonical
    3262                 :            :          values would only point back to the canonical node.  */
    3263                 :    7586200 :       if (dv_is_value_p (var->dv)
    3264                 :    4118200 :           && !canon_value_cmp (node->loc, dv_as_value (var->dv)))
    3265                 :            :         {
    3266                 :            :           /* Skip all subsequent VALUEs.  */
    3267                 :   11572900 :           while (node->next && GET_CODE (node->next->loc) == VALUE)
    3268                 :            :             {
    3269                 :    8977580 :               node = node->next;
    3270                 :    8977580 :               gcc_checking_assert (!canon_value_cmp (node->loc,
    3271                 :            :                                                      dv_as_value (var->dv)));
    3272                 :    8977580 :               if (loc == node->loc)
    3273                 :     647441 :                 return node;
    3274                 :            :             }
    3275                 :    2595270 :           continue;
    3276                 :            :         }
    3277                 :            : 
    3278                 :    4343480 :       gcc_checking_assert (node == var->var_part[0].loc_chain);
    3279                 :    4343480 :       gcc_checking_assert (!node->next);
    3280                 :            : 
    3281                 :    4343480 :       dv = dv_from_value (node->loc);
    3282                 :    4343480 :       rvar = vars->find_with_hash (dv, dv_htab_hash (dv));
    3283                 :    4343480 :       return find_loc_in_1pdv (loc, rvar, vars);
    3284                 :            :     }
    3285                 :            : 
    3286                 :            :   /* ??? Gotta look in cselib_val locations too.  */
    3287                 :            : 
    3288                 :            :   return NULL;
    3289                 :            : }
    3290                 :            : 
    3291                 :            : /* Hash table iteration argument passed to variable_merge.  */
    3292                 :            : struct dfset_merge
    3293                 :            : {
    3294                 :            :   /* The set in which the merge is to be inserted.  */
    3295                 :            :   dataflow_set *dst;
    3296                 :            :   /* The set that we're iterating in.  */
    3297                 :            :   dataflow_set *cur;
    3298                 :            :   /* The set that may contain the other dv we are to merge with.  */
    3299                 :            :   dataflow_set *src;
    3300                 :            :   /* Number of onepart dvs in src.  */
    3301                 :            :   int src_onepart_cnt;
    3302                 :            : };
    3303                 :            : 
    3304                 :            : /* Insert LOC in *DNODE, if it's not there yet.  The list must be in
    3305                 :            :    loc_cmp order, and it is maintained as such.  */
    3306                 :            : 
    3307                 :            : static void
    3308                 :   42743100 : insert_into_intersection (location_chain **nodep, rtx loc,
    3309                 :            :                           enum var_init_status status)
    3310                 :            : {
    3311                 :   42743100 :   location_chain *node;
    3312                 :   42743100 :   int r;
    3313                 :            : 
    3314                 :  847019000 :   for (node = *nodep; node; nodep = &node->next, node = *nodep)
    3315                 :  835907000 :     if ((r = loc_cmp (node->loc, loc)) == 0)
    3316                 :            :       {
    3317                 :   23871500 :         node->init = MIN (node->init, status);
    3318                 :   23871500 :         return;
    3319                 :            :       }
    3320                 :  812035000 :     else if (r > 0)
    3321                 :            :       break;
    3322                 :            : 
    3323                 :   18871600 :   node = new location_chain;
    3324                 :            : 
    3325                 :   18871600 :   node->loc = loc;
    3326                 :   18871600 :   node->set_src = NULL;
    3327                 :   18871600 :   node->init = status;
    3328                 :   18871600 :   node->next = *nodep;
    3329                 :   18871600 :   *nodep = node;
    3330                 :            : }
    3331                 :            : 
    3332                 :            : /* Insert in DEST the intersection of the locations present in both
    3333                 :            :    S1NODE and S2VAR, directly or indirectly.  S1NODE is from a
    3334                 :            :    variable in DSM->cur, whereas S2VAR is from DSM->src.  dvar is in
    3335                 :            :    DSM->dst.  */
    3336                 :            : 
    3337                 :            : static void
    3338                 :   32441600 : intersect_loc_chains (rtx val, location_chain **dest, struct dfset_merge *dsm,
    3339                 :            :                       location_chain *s1node, variable *s2var)
    3340                 :            : {
    3341                 :   32441600 :   dataflow_set *s1set = dsm->cur;
    3342                 :   32441600 :   dataflow_set *s2set = dsm->src;
    3343                 :   32441600 :   location_chain *found;
    3344                 :            : 
    3345                 :   32441600 :   if (s2var)
    3346                 :            :     {
    3347                 :   32441600 :       location_chain *s2node;
    3348                 :            : 
    3349                 :   32441600 :       gcc_checking_assert (s2var->onepart);
    3350                 :            : 
    3351                 :   32441600 :       if (s2var->n_var_parts)
    3352                 :            :         {
    3353                 :   32441600 :           s2node = s2var->var_part[0].loc_chain;
    3354                 :            : 
    3355                 :   70923500 :           for (; s1node && s2node;
    3356                 :   38481900 :                s1node = s1node->next, s2node = s2node->next)
    3357                 :   46987400 :             if (s1node->loc != s2node->loc)
    3358                 :            :               break;
    3359                 :   38481900 :             else if (s1node->loc == val)
    3360                 :          0 :               continue;
    3361                 :            :             else
    3362                 :   38481900 :               insert_into_intersection (dest, s1node->loc,
    3363                 :   38481900 :                                         MIN (s1node->init, s2node->init));
    3364                 :            :         }
    3365                 :            :     }
    3366                 :            : 
    3367                 :   45504500 :   for (; s1node; s1node = s1node->next)
    3368                 :            :     {
    3369                 :   13063000 :       if (s1node->loc == val)
    3370                 :    1741840 :         continue;
    3371                 :            : 
    3372                 :   11321100 :       if ((found = find_loc_in_1pdv (s1node->loc, s2var,
    3373                 :            :                                      shared_hash_htab (s2set->vars))))
    3374                 :            :         {
    3375                 :    4261210 :           insert_into_intersection (dest, s1node->loc,
    3376                 :    4261210 :                                     MIN (s1node->init, found->init));
    3377                 :    4261210 :           continue;
    3378                 :            :         }
    3379                 :            : 
    3380                 :    7059900 :       if (GET_CODE (s1node->loc) == VALUE
    3381                 :    7059900 :           && !VALUE_RECURSED_INTO (s1node->loc))
    3382                 :            :         {
    3383                 :    3693080 :           decl_or_value dv = dv_from_value (s1node->loc);
    3384                 :    3693080 :           variable *svar = shared_hash_find (s1set->vars, dv);
    3385                 :    3693080 :           if (svar)
    3386                 :            :             {
    3387                 :    3275380 :               if (svar->n_var_parts == 1)
    3388                 :            :                 {
    3389                 :    3275380 :                   VALUE_RECURSED_INTO (s1node->loc) = true;
    3390                 :    3275380 :                   intersect_loc_chains (val, dest, dsm,
    3391                 :            :                                         svar->var_part[0].loc_chain,
    3392                 :            :                                         s2var);
    3393                 :    3275380 :                   VALUE_RECURSED_INTO (s1node->loc) = false;
    3394                 :            :                 }
    3395                 :            :             }
    3396                 :            :         }
    3397                 :            : 
    3398                 :            :       /* ??? gotta look in cselib_val locations too.  */
    3399                 :            : 
    3400                 :            :       /* ??? if the location is equivalent to any location in src,
    3401                 :            :          searched recursively
    3402                 :            : 
    3403                 :            :            add to dst the values needed to represent the equivalence
    3404                 :            : 
    3405                 :            :      telling whether locations S is equivalent to another dv's
    3406                 :            :      location list:
    3407                 :            : 
    3408                 :            :        for each location D in the list
    3409                 :            : 
    3410                 :            :          if S and D satisfy rtx_equal_p, then it is present
    3411                 :            : 
    3412                 :            :          else if D is a value, recurse without cycles
    3413                 :            : 
    3414                 :            :          else if S and D have the same CODE and MODE
    3415                 :            : 
    3416                 :            :            for each operand oS and the corresponding oD
    3417                 :            : 
    3418                 :            :              if oS and oD are not equivalent, then S an D are not equivalent
    3419                 :            : 
    3420                 :            :              else if they are RTX vectors
    3421                 :            : 
    3422                 :            :                if any vector oS element is not equivalent to its respective oD,
    3423                 :            :                then S and D are not equivalent
    3424                 :            : 
    3425                 :            :    */
    3426                 :            : 
    3427                 :            : 
    3428                 :            :     }
    3429                 :   32441600 : }
    3430                 :            : 
    3431                 :            : /* Return -1 if X should be before Y in a location list for a 1-part
    3432                 :            :    variable, 1 if Y should be before X, and 0 if they're equivalent
    3433                 :            :    and should not appear in the list.  */
    3434                 :            : 
    3435                 :            : static int
    3436                 : 1059820000 : loc_cmp (rtx x, rtx y)
    3437                 :            : {
    3438                 : 1085380000 :   int i, j, r;
    3439                 : 1085380000 :   RTX_CODE code = GET_CODE (x);
    3440                 : 1085380000 :   const char *fmt;
    3441                 :            : 
    3442                 : 1085380000 :   if (x == y)
    3443                 :            :     return 0;
    3444                 :            : 
    3445                 :  967411000 :   if (REG_P (x))
    3446                 :            :     {
    3447                 :   39564400 :       if (!REG_P (y))
    3448                 :            :         return -1;
    3449                 :    2673830 :       gcc_assert (GET_MODE (x) == GET_MODE (y));
    3450                 :    2673830 :       if (REGNO (x) == REGNO (y))
    3451                 :            :         return 0;
    3452                 :    2579280 :       else if (REGNO (x) < REGNO (y))
    3453                 :            :         return -1;
    3454                 :            :       else
    3455                 :     480630 :         return 1;
    3456                 :            :     }
    3457                 :            : 
    3458                 :  927846000 :   if (REG_P (y))
    3459                 :            :     return 1;
    3460                 :            : 
    3461                 :  923961000 :   if (MEM_P (x))
    3462                 :            :     {
    3463                 :   35974400 :       if (!MEM_P (y))
    3464                 :            :         return -1;
    3465                 :   25554500 :       gcc_assert (GET_MODE (x) == GET_MODE (y));
    3466                 :   25554500 :       return loc_cmp (XEXP (x, 0), XEXP (y, 0));
    3467                 :            :     }
    3468                 :            : 
    3469                 :  887987000 :   if (MEM_P (y))
    3470                 :            :     return 1;
    3471                 :            : 
    3472                 :  886732000 :   if (GET_CODE (x) == VALUE)
    3473                 :            :     {
    3474                 :  886393000 :       if (GET_CODE (y) != VALUE)
    3475                 :            :         return -1;
    3476                 :            :       /* Don't assert the modes are the same, that is true only
    3477                 :            :          when not recursing.  (subreg:QI (value:SI 1:1) 0)
    3478                 :            :          and (subreg:QI (value:DI 2:2) 0) can be compared,
    3479                 :            :          even when the modes are different.  */
    3480                 :  886084000 :       if (canon_value_cmp (x, y))
    3481                 :  876875000 :         return -1;
    3482                 :            :       else
    3483                 :            :         return 1;
    3484                 :            :     }
    3485                 :            : 
    3486                 :     338523 :   if (GET_CODE (y) == VALUE)
    3487                 :            :     return 1;
    3488                 :            : 
    3489                 :            :   /* Entry value is the least preferable kind of expression.  */
    3490                 :      54715 :   if (GET_CODE (x) == ENTRY_VALUE)
    3491                 :            :     {
    3492                 :          0 :       if (GET_CODE (y) != ENTRY_VALUE)
    3493                 :            :         return 1;
    3494                 :          0 :       gcc_assert (GET_MODE (x) == GET_MODE (y));
    3495                 :          0 :       return loc_cmp (ENTRY_VALUE_EXP (x), ENTRY_VALUE_EXP (y));
    3496                 :            :     }
    3497                 :            : 
    3498                 :      54715 :   if (GET_CODE (y) == ENTRY_VALUE)
    3499                 :            :     return -1;
    3500                 :            : 
    3501                 :      54715 :   if (GET_CODE (x) == GET_CODE (y))
    3502                 :            :     /* Compare operands below.  */;
    3503                 :       9600 :   else if (GET_CODE (x) < GET_CODE (y))
    3504                 :            :     return -1;
    3505                 :            :   else
    3506                 :       7904 :     return 1;
    3507                 :            : 
    3508                 :      45115 :   gcc_assert (GET_MODE (x) == GET_MODE (y));
    3509                 :            : 
    3510                 :      45115 :   if (GET_CODE (x) == DEBUG_EXPR)
    3511                 :            :     {
    3512                 :          0 :       if (DEBUG_TEMP_UID (DEBUG_EXPR_TREE_DECL (x))
    3513                 :          0 :           < DEBUG_TEMP_UID (DEBUG_EXPR_TREE_DECL (y)))
    3514                 :            :         return -1;
    3515                 :          0 :       gcc_checking_assert (DEBUG_TEMP_UID (DEBUG_EXPR_TREE_DECL (x))
    3516                 :            :                            > DEBUG_TEMP_UID (DEBUG_EXPR_TREE_DECL (y)));
    3517                 :            :       return 1;
    3518                 :            :     }
    3519                 :            : 
    3520                 :      45115 :   fmt = GET_RTX_FORMAT (code);
    3521                 :      52918 :   for (i = 0; i < GET_RTX_LENGTH (code); i++)
    3522                 :      49037 :     switch (fmt[i])
    3523                 :            :       {
    3524                 :      39528 :       case 'w':
    3525                 :      39528 :         if (XWINT (x, i) == XWINT (y, i))
    3526                 :            :           break;
    3527                 :      39465 :         else if (XWINT (x, i) < XWINT (y, i))
    3528                 :            :           return -1;
    3529                 :            :         else
    3530                 :      22989 :           return 1;
    3531                 :            : 
    3532                 :          0 :       case 'n':
    3533                 :          0 :       case 'i':
    3534                 :          0 :         if (XINT (x, i) == XINT (y, i))
    3535                 :            :           break;
    3536                 :          0 :         else if (XINT (x, i) < XINT (y, i))
    3537                 :            :           return -1;
    3538                 :            :         else
    3539                 :          0 :           return 1;
    3540                 :            : 
    3541                 :          0 :       case 'p':
    3542                 :       7803 :         r = compare_sizes_for_sort (SUBREG_BYTE (x), SUBREG_BYTE (y));
    3543                 :          0 :         if (r != 0)
    3544                 :          0 :           return r;
    3545                 :            :         break;
    3546                 :            : 
    3547                 :          0 :       case 'V':
    3548                 :          0 :       case 'E':
    3549                 :            :         /* Compare the vector length first.  */
    3550                 :          0 :         if (XVECLEN (x, i) == XVECLEN (y, i))
    3551                 :            :           /* Compare the vectors elements.  */;
    3552                 :          0 :         else if (XVECLEN (x, i) < XVECLEN (y, i))
    3553                 :            :           return -1;
    3554                 :            :         else
    3555                 :          0 :           return 1;
    3556                 :            : 
    3557                 :          0 :         for (j = 0; j < XVECLEN (x, i); j++)
    3558                 :          0 :           if ((r = loc_cmp (XVECEXP (x, i, j),
    3559                 :          0 :                             XVECEXP (y, i, j))))
    3560                 :          0 :             return r;
    3561                 :            :         break;
    3562                 :            : 
    3563                 :          0 :       case 'e':
    3564                 :          0 :         if ((r = loc_cmp (XEXP (x, i), XEXP (y, i))))
    3565                 :          0 :           return r;
    3566                 :            :         break;
    3567                 :            : 
    3568                 :       5628 :       case 'S':
    3569                 :       5628 :       case 's':
    3570                 :       5628 :         if (XSTR (x, i) == XSTR (y, i))
    3571                 :            :           break;
    3572                 :       1769 :         if (!XSTR (x, i))
    3573                 :            :           return -1;
    3574                 :       1769 :         if (!XSTR (y, i))
    3575                 :            :           return 1;
    3576                 :       1769 :         if ((r = strcmp (XSTR (x, i), XSTR (y, i))) == 0)
    3577                 :            :           break;
    3578                 :       1769 :         else if (r < 0)
    3579                 :            :           return -1;
    3580                 :            :         else
    3581                 :        952 :           return 1;
    3582                 :            : 
    3583                 :            :       case 'u':
    3584                 :            :         /* These are just backpointers, so they don't matter.  */
    3585                 :            :         break;
    3586                 :            : 
    3587                 :            :       case '0':
    3588                 :            :       case 't':
    3589                 :            :         break;
    3590                 :            : 
    3591                 :            :         /* It is believed that rtx's at this level will never
    3592                 :            :            contain anything but integers and other rtx's,
    3593                 :            :            except for within LABEL_REFs and SYMBOL_REFs.  */
    3594                 :          0 :       default:
    3595                 :          0 :         gcc_unreachable ();
    3596                 :            :       }
    3597                 :       3881 :   if (CONST_WIDE_INT_P (x))
    3598                 :            :     {
    3599                 :            :       /* Compare the vector length first.  */
    3600                 :          0 :       if (CONST_WIDE_INT_NUNITS (x) >= CONST_WIDE_INT_NUNITS (y))
    3601                 :            :         return 1;
    3602                 :          0 :       else if (CONST_WIDE_INT_NUNITS (x) < CONST_WIDE_INT_NUNITS (y))
    3603                 :          0 :         return -1;
    3604                 :            : 
    3605                 :            :       /* Compare the vectors elements.  */;
    3606                 :            :       for (j = CONST_WIDE_INT_NUNITS (x) - 1; j >= 0 ; j--)
    3607                 :            :         {
    3608                 :            :           if (CONST_WIDE_INT_ELT (x, j) < CONST_WIDE_INT_ELT (y, j))
    3609                 :            :             return -1;
    3610                 :            :           if (CONST_WIDE_INT_ELT (x, j) > CONST_WIDE_INT_ELT (y, j))
    3611                 :            :             return 1;
    3612                 :            :         }
    3613                 :            :     }
    3614                 :            : 
    3615                 :            :   return 0;
    3616                 :            : }
    3617                 :            : 
    3618                 :            : /* Check the order of entries in one-part variables.   */
    3619                 :            : 
    3620                 :            : int
    3621                 :  398044000 : canonicalize_loc_order_check (variable **slot,
    3622                 :            :                               dataflow_set *data ATTRIBUTE_UNUSED)
    3623                 :            : {
    3624                 :  398044000 :   variable *var = *slot;
    3625                 :  398044000 :   location_chain *node, *next;
    3626                 :            : 
    3627                 :            : #ifdef ENABLE_RTL_CHECKING
    3628                 :            :   int i;
    3629                 :            :   for (i = 0; i < var->n_var_parts; i++)
    3630                 :            :     gcc_assert (var->var_part[0].cur_loc == NULL);
    3631                 :            :   gcc_assert (!var->in_changed_variables);
    3632                 :            : #endif
    3633                 :            : 
    3634                 :  398044000 :   if (!var->onepart)
    3635                 :            :     return 1;
    3636                 :            : 
    3637                 :  396216000 :   gcc_assert (var->n_var_parts == 1);
    3638                 :  396216000 :   node = var->var_part[0].loc_chain;
    3639                 :  396216000 :   gcc_assert (node);
    3640                 :            : 
    3641                 :  497698000 :   while ((next = node->next))
    3642                 :            :     {
    3643                 :  101482000 :       gcc_assert (loc_cmp (node->loc, next->loc) < 0);
    3644                 :            :       node = next;
    3645                 :            :     }
    3646                 :            : 
    3647                 :            :   return 1;
    3648                 :            : }
    3649                 :            : 
    3650                 :            : /* Mark with VALUE_RECURSED_INTO values that have neighbors that are
    3651                 :            :    more likely to be chosen as canonical for an equivalence set.
    3652                 :            :    Ensure less likely values can reach more likely neighbors, making
    3653                 :            :    the connections bidirectional.  */
    3654                 :            : 
    3655                 :            : int
    3656                 :  312842000 : canonicalize_values_mark (variable **slot, dataflow_set *set)
    3657                 :            : {
    3658                 :  312842000 :   variable *var = *slot;
    3659                 :  312842000 :   decl_or_value dv = var->dv;
    3660                 :  312842000 :   rtx val;
    3661                 :  312842000 :   location_chain *node;
    3662                 :            : 
    3663                 :  312842000 :   if (!dv_is_value_p (dv))
    3664                 :            :     return 1;
    3665                 :            : 
    3666                 :  206286000 :   gcc_checking_assert (var->n_var_parts == 1);
    3667                 :            : 
    3668                 :  206286000 :   val = dv_as_value (dv);
    3669                 :            : 
    3670                 :  494718000 :   for (node = var->var_part[0].loc_chain; node; node = node->next)
    3671                 :  288432000 :     if (GET_CODE (node->loc) == VALUE)
    3672                 :            :       {
    3673                 :  134079000 :         if (canon_value_cmp (node->loc, val))
    3674                 :   67039300 :           VALUE_RECURSED_INTO (val) = true;
    3675                 :            :         else
    3676                 :            :           {
    3677                 :   67039300 :             decl_or_value odv = dv_from_value (node->loc);
    3678                 :   67039300 :             variable **oslot;
    3679                 :   67039300 :             oslot = shared_hash_find_slot_noinsert (set->vars, odv);
    3680                 :            : 
    3681                 :   67039300 :             set_slot_part (set, val, oslot, odv, 0,
    3682                 :            :                            node->init, NULL_RTX);
    3683                 :            : 
    3684                 :   67039300 :             VALUE_RECURSED_INTO (node->loc) = true;
    3685                 :            :           }
    3686                 :            :       }
    3687                 :            : 
    3688                 :            :   return 1;
    3689                 :            : }
    3690                 :            : 
    3691                 :            : /* Remove redundant entries from equivalence lists in onepart
    3692                 :            :    variables, canonicalizing equivalence sets into star shapes.  */
    3693                 :            : 
    3694                 :            : int
    3695                 :  472238000 : canonicalize_values_star (variable **slot, dataflow_set *set)
    3696                 :            : {
    3697                 :  472238000 :   variable *var = *slot;
    3698                 :  472238000 :   decl_or_value dv = var->dv;
    3699                 :  472238000 :   location_chain *node;
    3700                 :  472238000 :   decl_or_value cdv;
    3701                 :  472238000 :   rtx val, cval;
    3702                 :  472238000 :   variable **cslot;
    3703                 :  472238000 :   bool has_value;
    3704                 :  472238000 :   bool has_marks;
    3705                 :            : 
    3706                 :  472238000 :   if (!var->onepart)
    3707                 :            :     return 1;
    3708                 :            : 
    3709                 :  470409000 :   gcc_checking_assert (var->n_var_parts == 1);
    3710                 :            : 
    3711                 :  470409000 :   if (dv_is_value_p (dv))
    3712                 :            :     {
    3713                 :  334171000 :       cval = dv_as_value (dv);
    3714                 :  334171000 :       if (!VALUE_RECURSED_INTO (cval))
    3715                 :            :         return 1;
    3716                 :  140408000 :       VALUE_RECURSED_INTO (cval) = false;
    3717                 :            :     }
    3718                 :            :   else
    3719                 :            :     cval = NULL_RTX;
    3720                 :            : 
    3721                 :  349184000 :  restart:
    3722                 :  349184000 :   val = cval;
    3723                 :  349184000 :   has_value = false;
    3724                 :  349184000 :   has_marks = false;
    3725                 :            : 
    3726                 :  349184000 :   gcc_assert (var->n_var_parts == 1);
    3727                 :            : 
    3728                 : 3828010000 :   for (node = var->var_part[0].loc_chain; node; node = node->next)
    3729                 : 3478820000 :     if (GET_CODE (node->loc) == VALUE)
    3730                 :            :       {
    3731                 : 3375380000 :         has_value = true;
    3732                 : 3375380000 :         if (VALUE_RECURSED_INTO (node->loc))
    3733                 :  883095000 :           has_marks = true;
    3734                 : 6854200000 :         if (canon_value_cmp (node->loc, cval))
    3735                 :  234367000 :           cval = node->loc;
    3736                 :            :       }
    3737                 :            : 
    3738                 :  349184000 :   if (!has_value)
    3739                 :            :     return 1;
    3740                 :            : 
    3741                 :  292367000 :   if (cval == val)
    3742                 :            :     {
    3743                 :   58000900 :       if (!has_marks || dv_is_decl_p (dv))
    3744                 :            :         return 1;
    3745                 :            : 
    3746                 :            :       /* Keep it marked so that we revisit it, either after visiting a
    3747                 :            :          child node, or after visiting a new parent that might be
    3748                 :            :          found out.  */
    3749                 :   23917200 :       VALUE_RECURSED_INTO (val) = true;
    3750                 :            : 
    3751                 :  853065000 :       for (node = var->var_part[0].loc_chain; node; node = node->next)
    3752                 :  853065000 :         if (GET_CODE (node->loc) == VALUE
    3753                 :  853065000 :             && VALUE_RECURSED_INTO (node->loc))
    3754                 :            :           {
    3755                 :            :             cval = node->loc;
    3756                 :   72537600 :           restart_with_cval:
    3757                 :   72537600 :             VALUE_RECURSED_INTO (cval) = false;
    3758                 :   72537600 :             dv = dv_from_value (cval);
    3759                 :   72537600 :             slot = shared_hash_find_slot_noinsert (set->vars, dv);
    3760                 :   72537600 :             if (!slot)
    3761                 :            :               {
    3762                 :          0 :                 gcc_assert (dv_is_decl_p (var->dv));
    3763                 :            :                 /* The canonical value was reset and dropped.
    3764                 :            :                    Remove it.  */
    3765                 :          0 :                 clobber_variable_part (set, NULL, var->dv, 0, NULL);
    3766                 :          0 :                 return 1;
    3767                 :            :               }
    3768                 :   72537600 :             var = *slot;
    3769                 :   72537600 :             gcc_assert (dv_is_value_p (var->dv));
    3770                 :   72537600 :             if (var->n_var_parts == 0)
    3771                 :            :               return 1;
    3772                 :   72537600 :             gcc_assert (var->n_var_parts == 1);
    3773                 :   72537600 :             goto restart;
    3774                 :            :           }
    3775                 :            : 
    3776                 :          0 :       VALUE_RECURSED_INTO (val) = false;
    3777                 :            : 
    3778                 :          0 :       return 1;
    3779                 :            :     }
    3780                 :            : 
    3781                 :            :   /* Push values to the canonical one.  */
    3782                 :  234367000 :   cdv = dv_from_value (cval);
    3783                 :  234367000 :   cslot = shared_hash_find_slot_noinsert (set->vars, cdv);
    3784                 :            : 
    3785                 :  469949000 :   for (node = var->var_part[0].loc_chain; node; node = node->next)
    3786                 :  235582000 :     if (node->loc != cval)
    3787                 :            :       {
    3788                 :    1215460 :         cslot = set_slot_part (set, node->loc, cslot, cdv, 0,
    3789                 :            :                                node->init, NULL_RTX);
    3790                 :    1215460 :         if (GET_CODE (node->loc) == VALUE)
    3791                 :            :           {
    3792                 :      99207 :             decl_or_value ndv = dv_from_value (node->loc);
    3793                 :            : 
    3794                 :      99207 :             set_variable_part (set, cval, ndv, 0, node->init, NULL_RTX,
    3795                 :            :                                NO_INSERT);
    3796                 :            : 
    3797                 :      99207 :             if (canon_value_cmp (node->loc, val))
    3798                 :            :               {
    3799                 :            :                 /* If it could have been a local minimum, it's not any more,
    3800                 :            :                    since it's now neighbor to cval, so it may have to push
    3801                 :            :                    to it.  Conversely, if it wouldn't have prevailed over
    3802                 :            :                    val, then whatever mark it has is fine: if it was to
    3803                 :            :                    push, it will now push to a more canonical node, but if
    3804                 :            :                    it wasn't, then it has already pushed any values it might
    3805                 :            :                    have to.  */
    3806                 :      49657 :                 VALUE_RECURSED_INTO (node->loc) = true;
    3807                 :            :                 /* Make sure we visit node->loc by ensuring we cval is
    3808                 :            :                    visited too.  */
    3809                 :      49657 :                 VALUE_RECURSED_INTO (cval) = true;
    3810                 :            :               }
    3811                 :      49550 :             else if (!VALUE_RECURSED_INTO (node->loc))
    3812                 :            :               /* If we have no need to "recurse" into this node, it's
    3813                 :            :                  already "canonicalized", so drop the link to the old
    3814                 :            :                  parent.  */
    3815                 :      21482 :               clobber_variable_part (set, cval, ndv, 0, NULL);
    3816                 :            :           }
    3817                 :    1116260 :         else if (GET_CODE (node->loc) == REG)
    3818                 :            :           {
    3819                 :     685950 :             attrs *list = set->regs[REGNO (node->loc)], **listp;
    3820                 :            : 
    3821                 :            :             /* Change an existing attribute referring to dv so that it
    3822                 :            :                refers to cdv, removing any duplicate this might
    3823                 :            :                introduce, and checking that no previous duplicates
    3824                 :            :                existed, all in a single pass.  */
    3825                 :            : 
    3826                 :     692703 :             while (list)
    3827                 :            :               {
    3828                 :     692703 :                 if (list->offset == 0
    3829                 :     692703 :                     && (dv_as_opaque (list->dv) == dv_as_opaque (dv)
    3830                 :       5352 :                         || dv_as_opaque (list->dv) == dv_as_opaque (cdv)))
    3831                 :            :                   break;
    3832                 :            : 
    3833                 :       6753 :                 list = list->next;
    3834                 :            :               }
    3835                 :            : 
    3836                 :     685950 :             gcc_assert (list);
    3837                 :     685950 :             if (dv_as_opaque (list->dv) == dv_as_opaque (dv))
    3838                 :            :               {
    3839                 :     685950 :                 list->dv = cdv;
    3840                 :     689217 :                 for (listp = &list->next; (list = *listp); listp = &list->next)
    3841                 :            :                   {
    3842                 :       3267 :                     if (list->offset)
    3843                 :        542 :                       continue;
    3844                 :            : 
    3845                 :       2725 :                     if (dv_as_opaque (list->dv) == dv_as_opaque (cdv))
    3846                 :            :                       {
    3847                 :          0 :                         *listp = list->next;
    3848                 :          0 :                         delete list;
    3849                 :          0 :                         list = *listp;
    3850                 :          0 :                         break;
    3851                 :            :                       }
    3852                 :            : 
    3853                 :       2725 :                     gcc_assert (dv_as_opaque (list->dv) != dv_as_opaque (dv));
    3854                 :            :                   }
    3855                 :            :               }
    3856                 :          0 :             else if (dv_as_opaque (list->dv) == dv_as_opaque (cdv))
    3857                 :            :               {
    3858                 :          0 :                 for (listp = &list->next; (list = *listp); listp = &list->next)
    3859                 :            :                   {
    3860                 :          0 :                     if (list->offset)
    3861                 :          0 :                       continue;
    3862                 :            : 
    3863                 :          0 :                     if (dv_as_opaque (list->dv) == dv_as_opaque (dv))
    3864                 :            :                       {
    3865                 :          0 :                         *listp = list->next;
    3866                 :          0 :                         delete list;
    3867                 :          0 :                         list = *listp;
    3868                 :          0 :                         break;
    3869                 :            :                       }
    3870                 :            : 
    3871                 :          0 :                     gcc_assert (dv_as_opaque (list->dv) != dv_as_opaque (cdv));
    3872                 :            :                   }
    3873                 :            :               }
    3874                 :            :             else
    3875                 :          0 :               gcc_unreachable ();
    3876                 :            : 
    3877                 :     685950 :             if (flag_checking)
    3878                 :     685950 :               while (list)
    3879                 :            :                 {
    3880                 :          0 :                   if (list->offset == 0
    3881                 :          0 :                       && (dv_as_opaque (list->dv) == dv_as_opaque (dv)
    3882                 :          0 :                           || dv_as_opaque (list->dv) == dv_as_opaque (cdv)))
    3883                 :          0 :                     gcc_unreachable ();
    3884                 :            : 
    3885                 :          0 :                   list = list->next;
    3886                 :            :                 }
    3887                 :            :           }
    3888                 :            :       }
    3889                 :            : 
    3890                 :  234367000 :   if (val)
    3891                 :  114812000 :     set_slot_part (set, val, cslot, cdv, 0,
    3892                 :            :                    VAR_INIT_STATUS_INITIALIZED, NULL_RTX);
    3893                 :            : 
    3894                 :  234367000 :   slot = clobber_slot_part (set, cval, slot, 0, NULL);
    3895                 :            : 
    3896                 :            :   /* Variable may have been unshared.  */
    3897                 :  234367000 :   var = *slot;
    3898                 :  234367000 :   gcc_checking_assert (var->n_var_parts && var->var_part[0].loc_chain->loc == cval
    3899                 :            :                        && var->var_part[0].loc_chain->next == NULL);
    3900                 :            : 
    3901                 :  234367000 :   if (VALUE_RECURSED_INTO (cval))
    3902                 :   48620500 :     goto restart_with_cval;
    3903                 :            : 
    3904                 :            :   return 1;
    3905                 :            : }
    3906                 :            : 
    3907                 :            : /* Bind one-part variables to the canonical value in an equivalence
    3908                 :            :    set.  Not doing this causes dataflow convergence failure in rare
    3909                 :            :    circumstances, see PR42873.  Unfortunately we can't do this
    3910                 :            :    efficiently as part of canonicalize_values_star, since we may not
    3911                 :            :    have determined or even seen the canonical value of a set when we
    3912                 :            :    get to a variable that references another member of the set.  */
    3913                 :            : 
    3914                 :            : int
    3915                 :   85202000 : canonicalize_vars_star (variable **slot, dataflow_set *set)
    3916                 :            : {
    3917                 :   85202000 :   variable *var = *slot;
    3918                 :   85202000 :   decl_or_value dv = var->dv;
    3919                 :   85202000 :   location_chain *node;
    3920                 :   85202000 :   rtx cval;
    3921                 :   85202000 :   decl_or_value cdv;
    3922                 :   85202000 :   variable **cslot;
    3923                 :   85202000 :   variable *cvar;
    3924                 :   85202000 :   location_chain *cnode;
    3925                 :            : 
    3926                 :   85202000 :   if (!var->onepart || var->onepart == ONEPART_VALUE)
    3927                 :            :     return 1;
    3928                 :            : 
    3929                 :   31024500 :   gcc_assert (var->n_var_parts == 1);
    3930                 :            : 
    3931                 :   31024500 :   node = var->var_part[0].loc_chain;
    3932                 :            : 
    3933                 :   31024500 :   if (GET_CODE (node->loc) != VALUE)
    3934                 :            :     return 1;
    3935                 :            : 
    3936                 :   27295400 :   gcc_assert (!node->next);
    3937                 :   27295400 :   cval = node->loc;
    3938                 :            : 
    3939                 :            :   /* Push values to the canonical one.  */
    3940                 :   27295400 :   cdv = dv_from_value (cval);
    3941                 :   27295400 :   cslot = shared_hash_find_slot_noinsert (set->vars, cdv);
    3942                 :   27295400 :   if (!cslot)
    3943                 :            :     return 1;
    3944                 :   10109300 :   cvar = *cslot;
    3945                 :   10109300 :   gcc_assert (cvar->n_var_parts == 1);
    3946                 :            : 
    3947                 :   10109300 :   cnode = cvar->var_part[0].loc_chain;
    3948                 :            : 
    3949                 :            :   /* CVAL is canonical if its value list contains non-VALUEs or VALUEs
    3950                 :            :      that are not “more canonical” than it.  */
    3951                 :   10109300 :   if (GET_CODE (cnode->loc) != VALUE
    3952                 :   10109300 :       || !canon_value_cmp (cnode->loc, cval))
    3953                 :            :     return 1;
    3954                 :            : 
    3955                 :            :   /* CVAL was found to be non-canonical.  Change the variable to point
    3956                 :            :      to the canonical VALUE.  */
    3957                 :     380851 :   gcc_assert (!cnode->next);
    3958                 :     380851 :   cval = cnode->loc;
    3959                 :            : 
    3960                 :     380851 :   slot = set_slot_part (set, cval, slot, dv, 0,
    3961                 :            :                         node->init, node->set_src);
    3962                 :     380851 :   clobber_slot_part (set, cval, slot, 0, node->set_src);
    3963                 :            : 
    3964                 :     380851 :   return 1;
    3965                 :            : }
    3966                 :            : 
    3967                 :            : /* Combine variable or value in *S1SLOT (in DSM->cur) with the
    3968                 :            :    corresponding entry in DSM->src.  Multi-part variables are combined
    3969                 :            :    with variable_union, whereas onepart dvs are combined with
    3970                 :            :    intersection.  */
    3971                 :            : 
    3972                 :            : static int
    3973                 :  135121000 : variable_merge_over_cur (variable *s1var, struct dfset_merge *dsm)
    3974                 :            : {
    3975                 :  135121000 :   dataflow_set *dst = dsm->dst;
    3976                 :  135121000 :   variable **dstslot;
    3977                 :  135121000 :   variable *s2var, *dvar = NULL;
    3978                 :  135121000 :   decl_or_value dv = s1var->dv;
    3979                 :  135121000 :   onepart_enum onepart = s1var->onepart;
    3980                 :  135121000 :   rtx val;
    3981                 :  135121000 :   hashval_t dvhash;
    3982                 :  135121000 :   location_chain *node, **nodep;
    3983                 :            : 
    3984                 :            :   /* If the incoming onepart variable has an empty location list, then
    3985                 :            :      the intersection will be just as empty.  For other variables,
    3986                 :            :      it's always union.  */
    3987                 :  135121000 :   gcc_checking_assert (s1var->n_var_parts
    3988                 :            :                        && s1var->var_part[0].loc_chain);
    3989                 :            : 
    3990                 :  135121000 :   if (!onepart)
    3991                 :    1099130 :     return variable_union (s1var, dst);
    3992                 :            : 
    3993                 :  134022000 :   gcc_checking_assert (s1var->n_var_parts == 1);
    3994                 :            : 
    3995                 :  134022000 :   dvhash = dv_htab_hash (dv);
    3996                 :  134022000 :   if (dv_is_value_p (dv))
    3997                 :   85788200 :     val = dv_as_value (dv);
    3998                 :            :   else
    3999                 :            :     val = NULL;
    4000                 :            : 
    4001                 :  134022000 :   s2var = shared_hash_find_1 (dsm->src->vars, dv, dvhash);
    4002                 :  134022000 :   if (!s2var)
    4003                 :            :     {
    4004                 :   13734200 :       dst_can_be_shared = false;
    4005                 :   13734200 :       return 1;
    4006                 :            :     }
    4007                 :            : 
    4008                 :  120288000 :   dsm->src_onepart_cnt--;
    4009                 :  120288000 :   gcc_assert (s2var->var_part[0].loc_chain
    4010                 :            :               && s2var->onepart == onepart
    4011                 :            :               && s2var->n_var_parts == 1);
    4012                 :            : 
    4013                 :  120288000 :   dstslot = shared_hash_find_slot_noinsert_1 (dst->vars, dv, dvhash);
    4014                 :  120288000 :   if (dstslot)
    4015                 :            :     {
    4016                 :   21644400 :       dvar = *dstslot;
    4017                 :   21644400 :       gcc_assert (dvar->refcount == 1
    4018                 :            :                   && dvar->onepart == onepart
    4019                 :            :                   && dvar->n_var_parts == 1);
    4020                 :   21644400 :       nodep = &dvar->var_part[0].loc_chain;
    4021                 :            :     }
    4022                 :            :   else
    4023                 :            :     {
    4024                 :   98643400 :       nodep = &node;
    4025                 :   98643400 :       node = NULL;
    4026                 :            :     }
    4027                 :            : 
    4028                 :  120288000 :   if (!dstslot && !onepart_variable_different_p (s1var, s2var))
    4029                 :            :     {
    4030                 :   91121700 :       dstslot = shared_hash_find_slot_unshare_1 (&dst->vars, dv,
    4031                 :            :                                                  dvhash, INSERT);
    4032                 :   91121700 :       *dstslot = dvar = s2var;
    4033                 :   91121700 :       dvar->refcount++;
    4034                 :            :     }
    4035                 :            :   else
    4036                 :            :     {
    4037                 :   29166200 :       dst_can_be_shared = false;
    4038                 :            : 
    4039                 :   29166200 :       intersect_loc_chains (val, nodep, dsm,
    4040                 :            :                             s1var->var_part[0].loc_chain, s2var);
    4041                 :            : 
    4042                 :   29166200 :       if (!dstslot)
    4043                 :            :         {
    4044                 :    7521770 :           if (node)
    4045                 :            :             {
    4046                 :    5971790 :               dvar = onepart_pool_allocate (onepart);
    4047                 :    5971790 :               dvar->dv = dv;
    4048                 :    5971790 :               dvar->refcount = 1;
    4049                 :    5971790 :               dvar->n_var_parts = 1;
    4050                 :    5971790 :               dvar->onepart = onepart;
    4051                 :    5971790 :               dvar->in_changed_variables = false;
    4052                 :    5971790 :               dvar->var_part[0].loc_chain = node;
    4053                 :    5971790 :               dvar->var_part[0].cur_loc = NULL;
    4054                 :    5971790 :               if (onepart)
    4055                 :    5971790 :                 VAR_LOC_1PAUX (dvar) = NULL;
    4056                 :            :               else
    4057                 :            :                 VAR_PART_OFFSET (dvar, 0) = 0;
    4058                 :            : 
    4059                 :    5971790 :               dstslot
    4060                 :    5971790 :                 = shared_hash_find_slot_unshare_1 (&dst->vars, dv, dvhash,
    4061                 :            :                                                    INSERT);
    4062                 :    5971790 :               gcc_assert (!*dstslot);
    4063                 :    5971790 :               *dstslot = dvar;
    4064                 :            :             }
    4065                 :            :           else
    4066                 :            :             return 1;
    4067                 :            :         }
    4068                 :            :     }
    4069                 :            : 
    4070                 :  118738000 :   nodep = &dvar->var_part[0].loc_chain;
    4071                 :  132794000 :   while ((node = *nodep))
    4072                 :            :     {
    4073                 :  124037000 :       location_chain **nextp = &node->next;
    4074                 :            : 
    4075                 :  124037000 :       if (GET_CODE (node->loc) == REG)
    4076                 :            :         {
    4077                 :   14056500 :           attrs *list;
    4078                 :            : 
    4079                 :   14529700 :           for (list = dst->regs[REGNO (node->loc)]; list; list = list->next)
    4080                 :     496014 :             if (GET_MODE (node->loc) == GET_MODE (list->loc)
    4081                 :     779336 :                 && dv_is_value_p (list->dv))
    4082                 :            :               break;
    4083                 :            : 
    4084                 :   14056500 :           if (!list)
    4085                 :  146828000 :             attrs_list_insert (&dst->regs[REGNO (node->loc)],
    4086                 :            :                                dv, 0, node->loc);
    4087                 :            :           /* If this value became canonical for another value that had
    4088                 :            :              this register, we want to leave it alone.  */
    4089                 :      45626 :           else if (dv_as_value (list->dv) != val)
    4090                 :            :             {
    4091                 :      14044 :               dstslot = set_slot_part (dst, dv_as_value (list->dv),
    4092                 :            :                                        dstslot, dv, 0,
    4093                 :            :                                        node->init, NULL_RTX);
    4094                 :      14044 :               dstslot = delete_slot_part (dst, node->loc, dstslot, 0);
    4095                 :            : 
    4096                 :            :               /* Since nextp points into the removed node, we can't
    4097                 :            :                  use it.  The pointer to the next node moved to nodep.
    4098                 :            :                  However, if the variable we're walking is unshared
    4099                 :            :                  during our walk, we'll keep walking the location list
    4100                 :            :                  of the previously-shared variable, in which case the
    4101                 :            :                  node won't have been removed, and we'll want to skip
    4102                 :            :                  it.  That's why we test *nodep here.  */
    4103                 :      14044 :               if (*nodep != node)
    4104                 :      14044 :                 nextp = nodep;
    4105                 :            :             }
    4106                 :            :         }
    4107                 :            :       else
    4108                 :            :         /* Canonicalization puts registers first, so we don't have to
    4109                 :            :            walk it all.  */
    4110                 :            :         break;
    4111                 :            :       nodep = nextp;
    4112                 :            :     }
    4113                 :            : 
    4114                 :  118738000 :   if (dvar != *dstslot)
    4115                 :          0 :     dvar = *dstslot;
    4116                 :  118738000 :   nodep = &dvar->var_part[0].loc_chain;
    4117                 :            : 
    4118                 :  118738000 :   if (val)
    4119                 :            :     {
    4120                 :            :       /* Mark all referenced nodes for canonicalization, and make sure
    4121                 :            :          we have mutual equivalence links.  */
    4122                 :   74183100 :       VALUE_RECURSED_INTO (val) = true;
    4123                 :  174212000 :       for (node = *nodep; node; node = node->next)
    4124                 :  100029000 :         if (GET_CODE (node->loc) == VALUE)
    4125                 :            :           {
    4126                 :   47733200 :             VALUE_RECURSED_INTO (node->loc) = true;
    4127                 :   95466500 :             set_variable_part (dst, val, dv_from_value (node->loc), 0,
    4128                 :            :                                node->init, NULL, INSERT);
    4129                 :            :           }
    4130                 :            : 
    4131                 :   74183100 :       dstslot = shared_hash_find_slot_noinsert_1 (dst->vars, dv, dvhash);
    4132                 :   74183100 :       gcc_assert (*dstslot == dvar);
    4133                 :   74183100 :       canonicalize_values_star (dstslot, dst);
    4134                 :   74183100 :       gcc_checking_assert (dstslot
    4135                 :            :                            == shared_hash_find_slot_noinsert_1 (dst->vars,
    4136                 :            :                                                                 dv, dvhash));
    4137                 :   74183100 :       dvar = *dstslot;
    4138                 :            :     }
    4139                 :            :   else
    4140                 :            :     {
    4141                 :   44554800 :       bool has_value = false, has_other = false;
    4142                 :            : 
    4143                 :            :       /* If we have one value and anything else, we're going to
    4144                 :            :          canonicalize this, so make sure all values have an entry in
    4145                 :            :          the table and are marked for canonicalization.  */
    4146                 :   89139400 :       for (node = *nodep; node; node = node->next)
    4147                 :            :         {
    4148                 :   44595300 :           if (GET_CODE (node->loc) == VALUE)
    4149                 :            :             {
    4150                 :            :               /* If this was marked during register canonicalization,
    4151                 :            :                  we know we have to canonicalize values.  */
    4152                 :   38236500 :               if (has_value)
    4153                 :            :                 has_other = true;
    4154                 :   38233100 :               has_value = true;
    4155                 :   38233100 :               if (has_other)
    4156                 :            :                 break;
    4157                 :            :             }
    4158                 :            :           else
    4159                 :            :             {
    4160                 :    6358850 :               has_other = true;
    4161                 :    6358850 :               if (has_value)
    4162                 :            :                 break;
    4163                 :            :             }
    4164                 :            :         }
    4165                 :            : 
    4166                 :   44554800 :       if (has_value && has_other)
    4167                 :            :         {
    4168                 :      35979 :           for (node = *nodep; node; node = node->next)
    4169                 :            :             {
    4170                 :      25263 :               if (GET_CODE (node->loc) == VALUE)
    4171                 :            :                 {
    4172                 :      17024 :                   decl_or_value dv = dv_from_value (node->loc);
    4173                 :      17024 :                   variable **slot = NULL;
    4174                 :            : 
    4175                 :      17024 :                   if (shared_hash_shared (dst->vars))
    4176                 :          0 :                     slot = shared_hash_find_slot_noinsert (dst->vars, dv);
    4177                 :          0 :                   if (!slot)
    4178                 :      17024 :                     slot = shared_hash_find_slot_unshare (&dst->vars, dv,
    4179                 :            :                                                           INSERT);
    4180                 :      17024 :                   if (!*slot)
    4181                 :            :                     {
    4182                 :       7773 :                       variable *var = onepart_pool_allocate (ONEPART_VALUE);
    4183                 :       7773 :                       var->dv = dv;
    4184                 :       7773 :                       var->refcount = 1;
    4185                 :       7773 :                       var->n_var_parts = 1;
    4186                 :       7773 :                       var->onepart = ONEPART_VALUE;
    4187                 :       7773 :                       var->in_changed_variables = false;
    4188                 :       7773 :                       var->var_part[0].loc_chain = NULL;
    4189                 :       7773 :                       var->var_part[0].cur_loc = NULL;
    4190                 :       7773 :                       VAR_LOC_1PAUX (var) = NULL;
    4191                 :       7773 :                       *slot = var;
    4192                 :            :                     }
    4193                 :            : 
    4194                 :      17024 :                   VALUE_RECURSED_INTO (node->loc) = true;
    4195                 :            :                 }
    4196                 :            :             }
    4197                 :            : 
    4198                 :      10716 :           dstslot = shared_hash_find_slot_noinsert_1 (dst->vars, dv, dvhash);
    4199                 :      10716 :           gcc_assert (*dstslot == dvar);
    4200                 :      10716 :           canonicalize_values_star (dstslot, dst);
    4201                 :      10716 :           gcc_checking_assert (dstslot
    4202                 :            :                                == shared_hash_find_slot_noinsert_1 (dst->vars,
    4203                 :            :                                                                     dv, dvhash));
    4204                 :      10716 :           dvar = *dstslot;
    4205                 :            :         }
    4206                 :            :     }
    4207                 :            : 
    4208                 :  118738000 :   if (!onepart_variable_different_p (dvar, s2var))
    4209                 :            :     {
    4210                 :  113828000 :       variable_htab_free (dvar);
    4211                 :  113828000 :       *dstslot = dvar = s2var;
    4212                 :  113828000 :       dvar->refcount++;
    4213                 :            :     }
    4214                 :    4909390 :   else if (s2var != s1var && !onepart_variable_different_p (dvar, s1var))
    4215                 :            :     {
    4216                 :    3584080 :       variable_htab_free (dvar);
    4217                 :    3584080 :       *dstslot = dvar = s1var;
    4218                 :    3584080 :       dvar->refcount++;
    4219                 :    3584080 :       dst_can_be_shared = false;
    4220                 :            :     }
    4221                 :            :   else
    4222                 :    1325320 :     dst_can_be_shared = false;
    4223                 :            : 
    4224                 :            :   return 1;
    4225                 :            : }
    4226                 :            : 
    4227                 :            : /* Copy s2slot (in DSM->src) to DSM->dst if the variable is a
    4228                 :            :    multi-part variable.  Unions of multi-part variables and
    4229                 :            :    intersections of one-part ones will be handled in
    4230                 :            :    variable_merge_over_cur().  */
    4231                 :            : 
    4232                 :            : static int
    4233                 :  167299000 : variable_merge_over_src (variable *s2var, struct dfset_merge *dsm)
    4234                 :            : {
    4235                 :  167299000 :   dataflow_set *dst = dsm->dst;
    4236                 :  167299000 :   decl_or_value dv = s2var->dv;
    4237                 :            : 
    4238                 :  167299000 :   if (!s2var->onepart)
    4239                 :            :     {
    4240                 :     754404 :       variable **dstp = shared_hash_find_slot (dst->vars, dv);
    4241                 :     754404 :       *dstp = s2var;
    4242                 :     754404 :       s2var->refcount++;
    4243                 :     754404 :       return 1;
    4244                 :            :     }
    4245                 :            : 
    4246                 :  166545000 :   dsm->src_onepart_cnt++;
    4247                 :  166545000 :   return 1;
    4248                 :            : }
    4249                 :            : 
    4250                 :            : /* Combine dataflow set information from SRC2 into DST, using PDST
    4251                 :            :    to carry over information across passes.  */
    4252                 :            : 
    4253                 :            : static void
    4254                 :    3198460 : dataflow_set_merge (dataflow_set *dst, dataflow_set *src2)
    4255                 :            : {
    4256                 :    3198460 :   dataflow_set cur = *dst;
    4257                 :    3198460 :   dataflow_set *src1 = &cur;
    4258                 :    3198460 :   struct dfset_merge dsm;
    4259                 :    3198460 :   int i;
    4260                 :    3198460 :   size_t src1_elems, src2_elems;
    4261                 :    3198460 :   variable_iterator_type hi;
    4262                 :    3198460 :   variable *var;
    4263                 :            : 
    4264                 :    3198460 :   src1_elems = shared_hash_htab (src1->vars)->elements ();
    4265                 :    3198460 :   src2_elems = shared_hash_htab (src2->vars)->elements ();
    4266                 :    3198460 :   dataflow_set_init (dst);
    4267                 :    3198460 :   dst->stack_adjust = cur.stack_adjust;
    4268                 :    3198460 :   shared_hash_destroy (dst->vars);
    4269                 :    3198460 :   dst->vars = new shared_hash;
    4270                 :    3198460 :   dst->vars->refcount = 1;
    4271                 :    3198460 :   dst->vars->htab = new variable_table_type (MAX (src1_elems, src2_elems));
    4272                 :            : 
    4273                 :  246281000 :   for (i = 0; i < FIRST_PSEUDO_REGISTER; i++)
    4274                 :  243083000 :     attrs_list_mpdv_union (&dst->regs[i], src1->regs[i], src2->regs[i]);
    4275                 :            : 
    4276                 :    3198460 :   dsm.dst = dst;
    4277                 :    3198460 :   dsm.src = src2;
    4278                 :    3198460 :   dsm.cur = src1;
    4279                 :    3198460 :   dsm.src_onepart_cnt = 0;
    4280                 :            : 
    4281                 :  173696000 :   FOR_EACH_HASH_TABLE_ELEMENT (*shared_hash_htab (dsm.src->vars),
    4282                 :            :                                var, variable, hi)
    4283                 :  167299000 :     variable_merge_over_src (var, &dsm);
    4284                 :  141518000 :   FOR_EACH_HASH_TABLE_ELEMENT (*shared_hash_htab (dsm.cur->vars),
    4285                 :            :                                var, variable, hi)
    4286                 :  135121000 :     variable_merge_over_cur (var, &dsm);
    4287                 :            : 
    4288                 :    3198460 :   if (dsm.src_onepart_cnt)
    4289                 :    3040640 :     dst_can_be_shared = false;
    4290                 :            : 
    4291                 :    3198460 :   dataflow_set_destroy (src1);
    4292                 :    3198460 : }
    4293                 :            : 
    4294                 :            : /* Mark register equivalences.  */
    4295                 :            : 
    4296                 :            : static void
    4297                 :    6425440 : dataflow_set_equiv_regs (dataflow_set *set)
    4298                 :            : {
    4299                 :    6425440 :   int i;
    4300                 :    6425440 :   attrs *list, **listp;
    4301                 :            : 
    4302                 :  494759000 :   for (i = 0; i < FIRST_PSEUDO_REGISTER; i++)
    4303                 :            :     {
    4304                 :  488333000 :       rtx canon[NUM_MACHINE_MODES];
    4305                 :            : 
    4306                 :            :       /* If the list is empty or one entry, no need to canonicalize
    4307                 :            :          anything.  */
    4308                 :  488333000 :       if (set->regs[i] == NULL || set->regs[i]->next == NULL)
    4309                 :  486793000 :         continue;
    4310                 :            : 
    4311                 :    1539780 :       memset (canon, 0, sizeof (canon));
    4312                 :            : 
    4313                 :    4658170 :       for (list = set->regs[i]; list; list = list->next)
    4314                 :    3118400 :         if (list->offset == 0 && dv_is_value_p (list->dv))
    4315                 :            :           {
    4316                 :    2364770 :             rtx val = dv_as_value (list->dv);
    4317                 :    2364770 :             rtx *cvalp = &canon[(int)GET_MODE (val)];
    4318                 :    2364770 :             rtx cval = *cvalp;
    4319                 :            : 
    4320                 :    5483170 :             if (canon_value_cmp (val, cval))
    4321                 :    2364770 :               *cvalp = val;
    4322                 :            :           }
    4323                 :            : 
    4324                 :    4658170 :       for (list = set->regs[i]; list; list = list->next)
    4325                 :    3118400 :         if (list->offset == 0 && dv_onepart_p (list->dv))
    4326                 :            :           {
    4327                 :    2364770 :             rtx cval = canon[(int)GET_MODE (list->loc)];
    4328                 :            : 
    4329                 :    2364770 :             if (!cval)
    4330                 :          0 :               continue;
    4331                 :            : 
    4332                 :    2364770 :             if (dv_is_value_p (list->dv))
    4333                 :            :               {
    4334                 :    2364770 :                 rtx val = dv_as_value (list->dv);
    4335                 :            : 
    4336                 :    2364770 :                 if (val == cval)
    4337                 :    2364770 :                   continue;
    4338                 :            : 
    4339                 :          0 :                 VALUE_RECURSED_INTO (val) = true;
    4340                 :          0 :                 set_variable_part (set, val, dv_from_value (cval), 0,
    4341                 :            :                                    VAR_INIT_STATUS_INITIALIZED,
    4342                 :            :                                    NULL, NO_INSERT);
    4343                 :            :               }
    4344                 :            : 
    4345                 :          0 :             VALUE_RECURSED_INTO (cval) = true;
    4346                 :          0 :             set_variable_part (set, cval, list->dv, 0,
    4347                 :            :                                VAR_INIT_STATUS_INITIALIZED, NULL, NO_INSERT);
    4348                 :            :           }
    4349                 :            : 
    4350                 :    4658170 :       for (listp = &set->regs[i]; (list = *listp);
    4351                 :    3118400 :            listp = list ? &list->next : listp)
    4352                 :    3118400 :         if (list->offset == 0 && dv_onepart_p (list->dv))
    4353                 :            :           {
    4354                 :    2364770 :             rtx cval = canon[(int)GET_MODE (list->loc)];
    4355                 :    2364770 :             variable **slot;
    4356                 :            : 
    4357                 :    2364770 :             if (!cval)
    4358                 :          0 :               continue;
    4359                 :            : 
    4360                 :    2364770 :             if (dv_is_value_p (list->dv))
    4361                 :            :               {
    4362                 :    2364770 :                 rtx val = dv_as_value (list->dv);
    4363                 :    2364770 :                 if (!VALUE_RECURSED_INTO (val))
    4364                 :    2364770 :                   continue;
    4365                 :            :               }
    4366                 :            : 
    4367                 :          0 :             slot = shared_hash_find_slot_noinsert (set->vars, list->dv);
    4368                 :          0 :             canonicalize_values_star (slot, set);
    4369                 :          0 :             if (*listp != list)
    4370                 :            :               list = NULL;
    4371                 :            :           }
    4372                 :            :     }
    4373                 :    6425440 : }
    4374                 :            : 
    4375                 :            : /* Remove any redundant values in the location list of VAR, which must
    4376                 :            :    be unshared and 1-part.  */
    4377                 :            : 
    4378                 :            : static void
    4379                 :     407264 : remove_duplicate_values (variable *var)
    4380                 :            : {
    4381                 :     407264 :   location_chain *node, **nodep;
    4382                 :            : 
    4383                 :     407264 :   gcc_assert (var->onepart);
    4384                 :     407264 :   gcc_assert (var->n_var_parts == 1);
    4385                 :     407264 :   gcc_assert (var->refcount == 1);
    4386                 :            : 
    4387                 :     833465 :   for (nodep = &var->var_part[0].loc_chain; (node = *nodep); )
    4388                 :            :     {
    4389                 :     426201 :       if (GET_CODE (node->loc) == VALUE)
    4390                 :            :         {
    4391                 :     411894 :           if (VALUE_RECURSED_INTO (node->loc))
    4392                 :            :             {
    4393                 :            :               /* Remove duplicate value node.  */
    4394                 :          0 :               *nodep = node->next;
    4395                 :          0 :               delete node;
    4396                 :          0 :               continue;
    4397                 :            :             }
    4398                 :            :           else
    4399                 :     411894 :             VALUE_RECURSED_INTO (node->loc) = true;
    4400                 :            :         }
    4401                 :     426201 :       nodep = &node->next;
    4402                 :            :     }
    4403                 :            : 
    4404                 :     833465 :   for (node = var->var_part[0].loc_chain; node; node = node->next)
    4405                 :     426201 :     if (GET_CODE (node->loc) == VALUE)
    4406                 :            :       {
    4407                 :     411894 :         gcc_assert (VALUE_RECURSED_INTO (node->loc));
    4408                 :     411894 :         VALUE_RECURSED_INTO (node->loc) = false;
    4409                 :            :       }
    4410                 :     407264 : }
    4411                 :            : 
    4412                 :            : 
    4413                 :            : /* Hash table iteration argument passed to variable_post_merge.  */
    4414                 :            : struct dfset_post_merge
    4415                 :            : {
    4416                 :            :   /* The new input set for the current block.  */
    4417                 :            :   dataflow_set *set;
    4418                 :            :   /* Pointer to the permanent input set for the current block, or
    4419                 :            :      NULL.  */
    4420                 :            :   dataflow_set **permp;
    4421                 :            : };
    4422                 :            : 
    4423                 :            : /* Create values for incoming expressions associated with one-part
    4424                 :            :    variables that don't have value numbers for them.  */
    4425                 :            : 
    4426                 :            : int
    4427                 :   84820300 : variable_post_merge_new_vals (variable **slot, dfset_post_merge *dfpm)
    4428                 :            : {
    4429                 :   84820300 :   dataflow_set *set = dfpm->set;
    4430                 :   84820300 :   variable *var = *slot;
    4431                 :   84820300 :   location_chain *node;
    4432                 :            : 
    4433                 :   84820300 :   if (!var->onepart || !var->n_var_parts)
    4434                 :            :     return 1;
    4435                 :            : 
    4436                 :   84345200 :   gcc_assert (var->n_var_parts == 1);
    4437                 :            : 
    4438                 :   84345200 :   if (dv_is_decl_p (var->dv))
    4439                 :            :     {
    4440                 :            :       bool check_dupes = false;
    4441                 :            : 
    4442                 :   31024500 :     restart:
    4443                 :   62070500 :       for (node = var->var_part[0].loc_chain; node; node = node->next)
    4444                 :            :         {
    4445                 :   31046000 :           if (GET_CODE (node->loc) == VALUE)
    4446                 :   26888100 :             gcc_assert (!VALUE_RECURSED_INTO (node->loc));
    4447                 :    4157870 :           else if (GET_CODE (node->loc) == REG)
    4448                 :            :             {
    4449                 :     411894 :               attrs *att, **attp, **curp = NULL;
    4450                 :            : 
    4451                 :     411894 :               if (var->refcount != 1)
    4452                 :            :                 {
    4453                 :          0 :                   slot = unshare_variable (set, slot, var,
    4454                 :            :                                            VAR_INIT_STATUS_INITIALIZED);
    4455                 :          0 :                   var = *slot;
    4456                 :          0 :                   goto restart;
    4457                 :            :                 }
    4458                 :            : 
    4459                 :     878791 :               for (attp = &set->regs[REGNO (node->loc)]; (att = *attp);
    4460                 :     466897 :                    attp = &att->next)
    4461                 :     466897 :                 if (att->offset == 0
    4462                 :     466396 :                     && GET_MODE (att->loc) == GET_MODE (node->loc))
    4463                 :            :                   {
    4464                 :     466070 :                     if (dv_is_value_p (att->dv))
    4465                 :            :                       {
    4466                 :          0 :                         rtx cval = dv_as_value (att->dv);
    4467                 :          0 :                         node->loc = cval;
    4468                 :          0 :                         check_dupes = true;
    4469                 :          0 :                         break;
    4470                 :            :                       }
    4471                 :     466070 :                     else if (dv_as_opaque (att->dv) == dv_as_opaque (var->dv))
    4472                 :     411894 :                       curp = attp;
    4473                 :            :                   }
    4474                 :            : 
    4475                 :     411894 :               if (!curp)
    4476                 :            :                 {
    4477                 :            :                   curp = attp;
    4478                 :          0 :                   while (*curp)
    4479                 :          0 :                     if ((*curp)->offset == 0
    4480                 :          0 :                         && GET_MODE ((*curp)->loc) == GET_MODE (node->loc)
    4481                 :          0 :                         && dv_as_opaque ((*curp)->dv) == dv_as_opaque (var->dv))
    4482                 :            :                       break;
    4483                 :            :                     else
    4484                 :          0 :                       curp = &(*curp)->next;
    4485                 :          0 :                   gcc_assert (*curp);
    4486                 :            :                 }
    4487                 :            : 
    4488                 :     411894 :               if (!att)
    4489                 :            :                 {
    4490                 :     411894 :                   decl_or_value cdv;
    4491                 :     411894 :                   rtx cval;
    4492                 :            : 
    4493                 :     411894 :                   if (!*dfpm->permp)
    4494                 :            :                     {
    4495                 :     147028 :                       *dfpm->permp = XNEW (dataflow_set);
    4496                 :     147028 :                       dataflow_set_init (*dfpm->permp);
    4497                 :            :                     }
    4498                 :            : 
    4499                 :     411894 :                   for (att = (*dfpm->permp)->regs[REGNO (node->loc)];
    4500                 :     411995 :                        att; att = att->next)
    4501                 :     206769 :                     if (GET_MODE (att->loc) == GET_MODE (node->loc))
    4502                 :            :                       {
    4503                 :     206668 :                         gcc_assert (att->offset == 0
    4504                 :            :                                     && dv_is_value_p (att->dv));
    4505                 :     206668 :                         val_reset (set, att->dv);
    4506                 :     206668 :                         break;
    4507                 :            :                       }
    4508                 :            : 
    4509                 :     411894 :                   if (att)
    4510                 :            :                     {
    4511                 :     206668 :                       cdv = att->dv;
    4512                 :     206668 :                       cval = dv_as_value (cdv);
    4513                 :            :                     }
    4514                 :            :                   else
    4515                 :            :                     {
    4516                 :            :                       /* Create a unique value to hold this register,
    4517                 :            :                          that ought to be found and reused in
    4518                 :            :                          subsequent rounds.  */
    4519                 :     205226 :                       cselib_val *v;
    4520                 :     205226 :                       gcc_assert (!cselib_lookup (node->loc,
    4521                 :            :                                                   GET_MODE (node->loc), 0,
    4522                 :            :                                                   VOIDmode));
    4523                 :     205226 :                       v = cselib_lookup (node->loc, GET_MODE (node->loc), 1,
    4524                 :            :                                          VOIDmode);
    4525                 :     205226 :                       cselib_preserve_value (v);
    4526                 :     205226 :                       cselib_invalidate_rtx (node->loc);
    4527                 :     205226 :                       cval = v->val_rtx;
    4528                 :     205226 :                       cdv = dv_from_value (cval);
    4529                 :     205226 :                       if (dump_file)
    4530                 :          2 :                         fprintf (dump_file,
    4531                 :            :                                  "Created new value %u:%u for reg %i\n",
    4532                 :          2 :                                  v->uid, v->hash, REGNO (node->loc));
    4533                 :            :                     }
    4534                 :            : 
    4535                 :     411894 :                   var_reg_decl_set (*dfpm->permp, node->loc,
    4536                 :            :                                     VAR_INIT_STATUS_INITIALIZED,
    4537                 :            :                                     cdv, 0, NULL, INSERT);
    4538                 :            : 
    4539                 :     411894 :                   node->loc = cval;
    4540                 :     411894 :                   check_dupes = true;
    4541                 :            :                 }
    4542                 :            : 
    4543                 :            :               /* Remove attribute referring to the decl, which now
    4544                 :            :                  uses the value for the register, already existing or
    4545                 :            :                  to be added when we bring perm in.  */
    4546                 :     411894 :               att = *curp;
    4547                 :     411894 :               *curp = att->next;
    4548                 :     411894 :               delete att;
    4549                 :            :             }
    4550                 :            :         }
    4551                 :            : 
    4552                 :   31024500 :       if (check_dupes)
    4553                 :     407264 :         remove_duplicate_values (var);
    4554                 :            :     }
    4555                 :            : 
    4556                 :            :   return 1;
    4557                 :            : }
    4558                 :            : 
    4559                 :            : /* Reset values in the permanent set that are not associated with the
    4560                 :            :    chosen expression.  */
    4561                 :            : 
    4562                 :            : int
    4563                 :     381638 : variable_post_merge_perm_vals (variable **pslot, dfset_post_merge *dfpm)
    4564                 :            : {
    4565                 :     381638 :   dataflow_set *set = dfpm->set;
    4566                 :     381638 :   variable *pvar = *pslot, *var;
    4567                 :     381638 :   location_chain *pnode;
    4568                 :     381638 :   decl_or_value dv;
    4569                 :     381638 :   attrs *att;
    4570                 :            : 
    4571                 :     763276 :   gcc_assert (dv_is_value_p (pvar->dv)
    4572                 :            :               && pvar->n_var_parts == 1);
    4573                 :     381638 :   pnode = pvar->var_part[0].loc_chain;
    4574                 :     381638 :   gcc_assert (pnode
    4575                 :            :               && !pnode->next
    4576                 :            :               && REG_P (pnode->loc));
    4577                 :            : 
    4578                 :     381638 :   dv = pvar->dv;
    4579                 :            : 
    4580                 :     381638 :   var = shared_hash_find (set->vars, dv);
    4581                 :     381638 :   if (var)
    4582                 :            :     {
    4583                 :            :       /* Although variable_post_merge_new_vals may have made decls
    4584                 :            :          non-star-canonical, values that pre-existed in canonical form
    4585                 :            :          remain canonical, and newly-created values reference a single
    4586                 :            :          REG, so they are canonical as well.  Since VAR has the
    4587                 :            :          location list for a VALUE, using find_loc_in_1pdv for it is
    4588                 :            :          fine, since VALUEs don't map back to DECLs.  */
    4589                 :          0 :       if (find_loc_in_1pdv (pnode->loc, var, shared_hash_htab (set->vars)))
    4590                 :            :         return 1;
    4591                 :          0 :       val_reset (set, dv);
    4592                 :            :     }
    4593                 :            : 
    4594                 :     383221 :   for (att = set->regs[REGNO (pnode->loc)]; att; att = att->next)
    4595                 :       1583 :     if (att->offset == 0
    4596                 :       1146 :         && GET_MODE (att->loc) == GET_MODE (pnode->loc)
    4597                 :       3581 :         && dv_is_value_p (att->dv))
    4598                 :            :       break;
    4599                 :            : 
    4600                 :            :   /* If there is a value associated with this register already, create
    4601                 :            :      an equivalence.  */
    4602                 :     381638 :   if (att && dv_as_value (att->dv) != dv_as_value (dv))
    4603                 :            :     {
    4604                 :          0 :       rtx cval = dv_as_value (att->dv);
    4605                 :          0 :       set_variable_part (set, cval, dv, 0, pnode->init, NULL, INSERT);
    4606                 :          0 :       set_variable_part (set, dv_as_value (dv), att->dv, 0, pnode->init,
    4607                 :            :                          NULL, INSERT);
    4608                 :            :     }
    4609                 :     381638 :   else if (!att)
    4610                 :            :     {
    4611                 :     381638 :       attrs_list_insert (&set->regs[REGNO (pnode->loc)],
    4612                 :            :                          dv, 0, pnode->loc);
    4613                 :     381638 :       variable_union (pvar, set);
    4614                 :            :     }
    4615                 :            : 
    4616                 :            :   return 1;
    4617                 :            : }
    4618                 :            : 
    4619                 :            : /* Just checking stuff and registering register attributes for
    4620                 :            :    now.  */
    4621                 :            : 
    4622                 :            : static void
    4623                 :    1956900 : dataflow_post_merge_adjust (dataflow_set *set, dataflow_set **permp)
    4624                 :            : {
    4625                 :    1956900 :   struct dfset_post_merge dfpm;
    4626                 :            : 
    4627                 :    1956900 :   dfpm.set = set;
    4628                 :    1956900 :   dfpm.permp = permp;
    4629                 :            : 
    4630                 :    1956900 :   shared_hash_htab (set->vars)
    4631                 :    1956900 :     ->traverse <dfset_post_merge*, variable_post_merge_new_vals> (&dfpm);
    4632                 :    1956900 :   if (*permp)
    4633                 :     271459 :     shared_hash_htab ((*permp)->vars)
    4634                 :     271459 :       ->traverse <dfset_post_merge*, variable_post_merge_perm_vals> (&dfpm);
    4635                 :    1956900 :   shared_hash_htab (set->vars)
    4636                 :    1956900 :     ->traverse <dataflow_set *, canonicalize_values_star> (set);
    4637                 :    1956900 :   shared_hash_htab (set->vars)
    4638                 :    1956900 :     ->traverse <dataflow_set *, canonicalize_vars_star> (set);
    4639                 :    1956900 : }
    4640                 :            : 
    4641                 :            : /* Return a node whose loc is a MEM that refers to EXPR in the
    4642                 :            :    location list of a one-part variable or value VAR, or in that of
    4643                 :            :    any values recursively mentioned in the location lists.  */
    4644                 :            : 
    4645                 :            : static location_chain *
    4646                 :   82756400 : find_mem_expr_in_1pdv (tree expr, rtx val, variable_table_type *vars)
    4647                 :            : {
    4648                 :   82756400 :   location_chain *node;
    4649                 :   82756400 :   decl_or_value dv;
    4650                 :   82756400 :   variable *var;
    4651                 :   82756400 :   location_chain *where = NULL;
    4652                 :            : 
    4653                 :   82756400 :   if (!val)
    4654                 :            :     return NULL;
    4655                 :            : 
    4656                 :   82756400 :   gcc_assert (GET_CODE (val) == VALUE
    4657                 :            :               && !VALUE_RECURSED_INTO (val));
    4658                 :            : 
    4659                 :   82756400 :   dv = dv_from_value (val);
    4660                 :   82756400 :   var = vars->find_with_hash (dv, dv_htab_hash (dv));
    4661                 :            : 
    4662                 :   82756400 :   if (!var)
    4663                 :            :     return NULL;
    4664                 :            : 
    4665                 :   43719100 :   gcc_assert (var->onepart);
    4666                 :            : 
    4667                 :   43719100 :   if (!var->n_var_parts)
    4668                 :            :     return NULL;
    4669                 :            : 
    4670                 :   43719100 :   VALUE_RECURSED_INTO (val) = true;
    4671                 :            : 
    4672                 :  109877000 :   for (node = var->var_part[0].loc_chain; node; node = node->next)
    4673                 :   66893200 :     if (MEM_P (node->loc)
    4674                 :   14452700 :         && MEM_EXPR (node->loc) == expr
    4675                 :   67628200 :         && int_mem_offset (node->loc) == 0)
    4676                 :            :       {
    4677                 :            :         where = node;
    4678                 :            :         break;
    4679                 :            :       }
    4680                 :   66158300 :     else if (GET_CODE (node->loc) == VALUE
    4681                 :   42203900 :              && !VALUE_RECURSED_INTO (node->loc)
    4682                 :   87260500 :              && (where = find_mem_expr_in_1pdv (expr, node->loc, vars)))
    4683                 :            :       break;
    4684                 :            : 
    4685                 :   43719100 :   VALUE_RECURSED_INTO (val) = false;
    4686                 :            : 
    4687                 :   43719100 :   return where;
    4688                 :            : }
    4689                 :            : 
    4690                 :            : /* Return TRUE if the value of MEM may vary across a call.  */
    4691                 :            : 
    4692                 :            : static bool
    4693                 :   98646700 : mem_dies_at_call (rtx mem)
    4694                 :            : {
    4695                 :   98646700 :   tree expr = MEM_EXPR (mem);
    4696                 :   98646700 :   tree decl;
    4697                 :            : 
    4698                 :   98646700 :   if (!expr)
    4699                 :            :     return true;
    4700                 :            : 
    4701                 :   90638000 :   decl = get_base_address (expr);
    4702                 :            : 
    4703                 :   90638000 :   if (!decl)
    4704                 :            :     return true;
    4705                 :            : 
    4706                 :   90638000 :   if (!DECL_P (decl))
    4707                 :            :     return true;
    4708                 :            : 
    4709                 :   84950300 :   return (may_be_aliased (decl)
    4710                 :   84950300 :           || (!TREE_READONLY (decl) && is_global_var (decl)));
    4711                 :            : }
    4712                 :            : 
    4713                 :            : /* Remove all MEMs from the location list of a hash table entry for a
    4714                 :            :    one-part variable, except those whose MEM attributes map back to
    4715                 :            :    the variable itself, directly or within a VALUE.  */
    4716                 :            : 
    4717                 :            : int
    4718                 :  260530000 : dataflow_set_preserve_mem_locs (variable **slot, dataflow_set *set)
    4719                 :            : {
    4720                 :  260530000 :   variable *var = *slot;
    4721                 :            : 
    4722                 :  260530000 :   if (var->onepart == ONEPART_VDECL || var->onepart == ONEPART_DEXPR)
    4723                 :            :     {
    4724                 :  111209000 :       tree decl = dv_as_decl (var->dv);
    4725                 :  111209000 :       location_chain *loc, **locp;
    4726                 :  111209000 :       bool changed = false;
    4727                 :            : 
    4728                 :  111209000 :       if (!var->n_var_parts)
    4729                 :            :         return 1;
    4730                 :            : 
    4731                 :  111209000 :       gcc_assert (var->n_var_parts == 1);
    4732                 :            : 
    4733                 :  111209000 :       if (shared_var_p (var, set->vars))
    4734                 :            :         {
    4735                 :  126571000 :           for (loc = var->var_part[0].loc_chain; loc; loc = loc->next)
    4736                 :            :             {
    4737                 :            :               /* We want to remove dying MEMs that don't refer to DECL.  */
    4738                 :   63471800 :               if (GET_CODE (loc->loc) == MEM
    4739                 :    1834870 :                   && (MEM_EXPR (loc->loc) != decl
    4740                 :    1655910 :                       || int_mem_offset (loc->loc) != 0)
    4741                 :   63650700 :                   && mem_dies_at_call (loc->loc))
    4742                 :            :                 break;
    4743                 :            :               /* We want to move here MEMs that do refer to DECL.  */
    4744                 :   63469800 :               else if (GET_CODE (loc->loc) == VALUE
    4745                 :   63469800 :                        && find_mem_expr_in_1pdv (decl, loc->loc,
    4746                 :            :                                                  shared_hash_htab (set->vars)))
    4747                 :            :                 break;
    4748                 :            :             }
    4749                 :            : 
    4750                 :   63467800 :           if (!loc)
    4751                 :            :             return 1;
    4752                 :            : 
    4753                 :     368340 :           slot = unshare_variable (set, slot, var, VAR_INIT_STATUS_UNKNOWN);
    4754                 :     368340 :           var = *slot;
    4755                 :     368340 :           gcc_assert (var->n_var_parts == 1);
    4756                 :            :         }
    4757                 :            : 
    4758                 :   48109900 :       for (locp = &var->var_part[0].loc_chain, loc = *locp;
    4759                 :   96220000 :            loc; loc = *locp)
    4760                 :            :         {
    4761                 :   48110000 :           rtx old_loc = loc->loc;
    4762                 :   48110000 :           if (GET_CODE (old_loc) == VALUE)
    4763                 :            :             {
    4764                 :    6786750 :               location_chain *mem_node
    4765                 :    6786750 :                 = find_mem_expr_in_1pdv (decl, loc->loc,
    4766                 :            :                                          shared_hash_htab (set->vars));
    4767                 :            : 
    4768                 :            :               /* ??? This picks up only one out of multiple MEMs that
    4769                 :            :                  refer to the same variable.  Do we ever need to be
    4770                 :            :                  concerned about dealing with more than one, or, given
    4771                 :            :                  that they should all map to the same variable
    4772                 :            :                  location, their addresses will have been merged and
    4773                 :            :                  they will be regarded as equivalent?  */
    4774                 :    6786750 :               if (mem_node)
    4775                 :            :                 {
    4776                 :     368556 :                   loc->loc = mem_node->loc;
    4777                 :     368556 :                   loc->set_src = mem_node->set_src;
    4778                 :     737112 :                   loc->init = MIN (loc->init, mem_node->init);
    4779                 :            :                 }
    4780                 :            :             }
    4781                 :            : 
    4782                 :   96218100 :           if (GET_CODE (loc->loc) != MEM
    4783                 :     406964 :               || (MEM_EXPR (loc->loc) == decl
    4784                 :     404860 :                   && int_mem_offset (loc->loc) == 0)
    4785                 :   48112100 :               || !mem_dies_at_call (loc->loc))
    4786                 :            :             {
    4787                 :   48108100 :               if (old_loc != loc->loc && emit_notes)
    4788                 :            :                 {
    4789                 :     179492 :                   if (old_loc == var->var_part[0].cur_loc)
    4790                 :            :                     {
    4791                 :          0 :                       changed = true;
    4792                 :          0 :                       var->var_part[0].cur_loc = NULL;
    4793                 :            :                     }
    4794                 :            :                 }
    4795                 :   48108100 :               locp = &loc->next;
    4796                 :   48108100 :               continue;
    4797                 :            :             }
    4798                 :            : 
    4799                 :       1958 :           if (emit_notes)
    4800                 :            :             {
    4801                 :        788 :               if (old_loc == var->var_part[0].cur_loc)
    4802                 :            :                 {
    4803                 :          0 :                   changed = true;
    4804                 :          0 :                   var->var_part[0].cur_loc = NULL;
    4805                 :            :                 }
    4806                 :            :             }
    4807                 :       1958 :           *locp = loc->next;
    4808                 :       1958 :           delete loc;
    4809                 :            :         }
    4810                 :            : 
    4811                 :   48109900 :       if (!var->var_part[0].loc_chain)
    4812                 :            :         {
    4813                 :       1875 :           var->n_var_parts--;
    4814                 :       1875 :           changed = true;
    4815                 :            :         }
    4816                 :   48109900 :       if (changed)
    4817                 :       1875 :         variable_was_changed (var, set);
    4818                 :            :     }
    4819                 :            : 
    4820                 :            :   return 1;
    4821                 :            : }
    4822                 :            : 
    4823                 :            : /* Remove all MEMs from the location list of a hash table entry for a
    4824                 :            :    onepart variable.  */
    4825                 :            : 
    4826                 :            : int
    4827                 :  260528000 : dataflow_set_remove_mem_locs (variable **slot, dataflow_set *set)
    4828                 :            : {
    4829                 :  260528000 :   variable *var = *slot;
    4830                 :            : 
    4831                 :  260528000 :   if (var->onepart != NOT_ONEPART)
    4832                 :            :     {
    4833                 :  259605000 :       location_chain *loc, **locp;
    4834                 :  259605000 :       bool changed = false;
    4835                 :  259605000 :       rtx cur_loc;
    4836                 :            : 
    4837                 :  259605000 :       gcc_assert (var->n_var_parts == 1);
    4838                 :            : 
    4839                 :  259605000 :       if (shared_var_p (var, set->vars))
    4840                 :            :         {
    4841                 :  407954000 :           for (loc = var->var_part[0].loc_chain; loc; loc = loc->next)
    4842                 :  227190000 :             if (GET_CODE (loc->loc) == MEM
    4843                 :  227190000 :                 && mem_dies_at_call (loc->loc))
    4844                 :            :               break;
    4845                 :            : 
    4846                 :  185744000 :           if (!loc)
    4847                 :            :             return 1;
    4848                 :            : 
    4849                 :    4979940 :           slot = unshare_variable (set, slot, var, VAR_INIT_STATUS_UNKNOWN);
    4850                 :    4979940 :           var = *slot;
    4851                 :    4979940 :           gcc_assert (var->n_var_parts == 1);
    4852                 :            :         }
    4853                 :            : 
    4854                 :   78840900 :       if (VAR_LOC_1PAUX (var))
    4855                 :   26043300 :         cur_loc = VAR_LOC_FROM (var);
    4856                 :            :       else
    4857                 :   52797600 :         cur_loc = var->var_part[0].cur_loc;
    4858                 :            : 
    4859                 :   78840900 :       for (locp = &var->var_part[0].loc_chain, loc = *locp;
    4860                 :  181040000 :            loc; loc = *locp)
    4861                 :            :         {
    4862                 :  188993000 :           if (GET_CODE (loc->loc) != MEM
    4863                 :  102199000 :               || !mem_dies_at_call (loc->loc))
    4864                 :            :             {
    4865                 :   86793600 :               locp = &loc->next;
    4866                 :   86793600 :               continue;
    4867                 :            :             }
    4868                 :            : 
    4869                 :   15405900 :           *locp = loc->next;
    4870                 :            :           /* If we have deleted the location which was last emitted
    4871                 :            :              we have to emit new location so add the variable to set
    4872                 :            :              of changed variables.  */
    4873                 :   15405900 :           if (cur_loc == loc->loc)
    4874                 :            :             {
    4875                 :     193222 :               changed = true;
    4876                 :     193222 :               var->var_part[0].cur_loc = NULL;
    4877                 :     193222 :               if (VAR_LOC_1PAUX (var))
    4878                 :     193222 :                 VAR_LOC_FROM (var) = NULL;
    4879                 :            :             }
    4880                 :   15405900 :           delete loc;
    4881                 :            :         }
    4882                 :            : 
    4883                 :   78840900 :       if (!var->var_part[0].loc_chain)
    4884                 :            :         {
    4885                 :    9659060 :           var->n_var_parts--;
    4886                 :    9659060 :           changed = true;
    4887                 :            :         }
    4888                 :   78840900 :       if (changed)
    4889                 :    9676200 :         variable_was_changed (var, set);
    4890                 :            :     }
    4891                 :            : 
    4892                 :            :   return 1;
    4893                 :            : }
    4894                 :            : 
    4895                 :            : /* Remove all variable-location information about call-clobbered
    4896                 :            :    registers, as well as associations between MEMs and VALUEs.  */
    4897                 :            : 
    4898                 :            : static void
    4899                 :    5212650 : dataflow_set_clear_at_call (dataflow_set *set, rtx_insn *call_insn)
    4900                 :            : {
    4901                 :    5212650 :   unsigned int r;
    4902                 :    5212650 :   hard_reg_set_iterator hrsi;
    4903                 :            : 
    4904                 :    5212650 :   HARD_REG_SET callee_clobbers
    4905                 :    5212650 :     = insn_callee_abi (call_insn).full_reg_clobbers ();
    4906                 :            : 
    4907                 :  356835000 :   EXECUTE_IF_SET_IN_HARD_REG_SET (callee_clobbers, 0, r, hrsi)
    4908                 :  351622000 :     var_regno_delete (set, r);
    4909                 :            : 
    4910                 :    5212650 :   if (MAY_HAVE_DEBUG_BIND_INSNS)
    4911                 :            :     {
    4912                 :    5212560 :       set->traversed_vars = set->vars;
    4913                 :    5212560 :       shared_hash_htab (set->vars)
    4914                 :    5212560 :         ->traverse <dataflow_set *, dataflow_set_preserve_mem_locs> (set);
    4915                 :    5212560 :       set->traversed_vars = set->vars;
    4916                 :    5212560 :       shared_hash_htab (set->vars)
    4917                 :    5212560 :         ->traverse <dataflow_set *, dataflow_set_remove_mem_locs> (set);
    4918                 :    5212560 :       set->traversed_vars = NULL;
    4919                 :            :     }
    4920                 :    5212650 : }
    4921                 :            : 
    4922                 :            : static bool
    4923                 :     472686 : variable_part_different_p (variable_part *vp1, variable_part *vp2)
    4924                 :            : {
    4925                 :     472686 :   location_chain *lc1, *lc2;
    4926                 :            : 
    4927                 :    1037210 :   for (lc1 = vp1->loc_chain; lc1; lc1 = lc1->next)
    4928                 :            :     {
    4929                 :     798942 :       for (lc2 = vp2->loc_chain; lc2; lc2 = lc2->next)
    4930                 :            :         {
    4931                 :     766568 :           if (REG_P (lc1->loc) && REG_P (lc2->loc))
    4932                 :            :             {
    4933                 :     498954 :               if (REGNO (lc1->loc) == REGNO (lc2->loc))
    4934                 :            :                 break;
    4935                 :            :             }
    4936                 :     337269 :           if (rtx_equal_p (lc1->loc, lc2->loc))
    4937                 :            :             break;
    4938                 :            :         }
    4939                 :     596895 :       if (!lc2)
    4940                 :            :         return true;
    4941                 :            :     }
    4942                 :            :   return false;
    4943                 :            : }
    4944                 :            : 
    4945                 :            : /* Return true if one-part variables VAR1 and VAR2 are different.
    4946                 :            :    They must be in canonical order.  */
    4947                 :            : 
    4948                 :            : static bool
    4949                 :  248631000 : onepart_variable_different_p (variable *var1, variable *var2)
    4950                 :            : {
    4951                 :  248631000 :   location_chain *lc1, *lc2;
    4952                 :            : 
    4953                 :  248631000 :   if (var1 == var2)
    4954                 :            :     return false;
    4955                 :            : 
    4956                 :   70271100 :   gcc_assert (var1->n_var_parts == 1
    4957                 :            :               && var2->n_var_parts == 1);
    4958                 :            : 
    4959                 :   70271100 :   lc1 = var1->var_part[0].loc_chain;
    4960                 :   70271100 :   lc2 = var2->var_part[0].loc_chain;
    4961                 :            : 
    4962                 :   70271100 :   gcc_assert (lc1 && lc2);
    4963                 :            : 
    4964                 :  164454000 :   while (lc1 && lc2)
    4965                 :            :     {
    4966                 :  106287000 :       if (loc_cmp (lc1->loc, lc2->loc))
    4967                 :            :         return true;
    4968                 :   94183300 :       lc1 = lc1->next;
    4969                 :   94183300 :       lc2 = lc2->next;
    4970                 :            :     }
    4971                 :            : 
    4972                 :   58167400 :   return lc1 != lc2;
    4973                 :            : }
    4974                 :            : 
    4975                 :            : /* Return true if one-part variables VAR1 and VAR2 are different.
    4976                 :            :    They must be in canonical order.  */
    4977                 :            : 
    4978                 :            : static void
    4979                 :          0 : dump_onepart_variable_differences (variable *var1, variable *var2)
    4980                 :            : {
    4981                 :          0 :   location_chain *lc1, *lc2;
    4982                 :            : 
    4983                 :          0 :   gcc_assert (var1 != var2);
    4984                 :          0 :   gcc_assert (dump_file);
    4985                 :          0 :   gcc_assert (dv_as_opaque (var1->dv) == dv_as_opaque (var2->dv));
    4986                 :          0 :   gcc_assert (var1->n_var_parts == 1
    4987                 :            :               && var2->n_var_parts == 1);
    4988                 :            : 
    4989                 :          0 :   lc1 = var1->var_part[0].loc_chain;
    4990                 :          0 :   lc2 = var2->var_part[0].loc_chain;
    4991                 :            : 
    4992                 :          0 :   gcc_assert (lc1 && lc2);
    4993                 :            : 
    4994                 :          0 :   while (lc1 && lc2)
    4995                 :            :     {
    4996                 :          0 :       switch (loc_cmp (lc1->loc, lc2->loc))
    4997                 :            :         {
    4998                 :          0 :         case -1:
    4999                 :          0 :           fprintf (dump_file, "removed: ");
    5000                 :          0 :           print_rtl_single (dump_file, lc1->loc);
    5001                 :          0 :           lc1 = lc1->next;
    5002                 :          0 :           continue;
    5003                 :          0 :         case 0:
    5004                 :          0 :           break;
    5005                 :          0 :         case 1:
    5006                 :          0 :           fprintf (dump_file, "added: ");
    5007                 :          0 :           print_rtl_single (dump_file, lc2->loc);
    5008                 :          0 :           lc2 = lc2->next;
    5009                 :          0 :           continue;
    5010                 :          0 :         default:
    5011                 :          0 :           gcc_unreachable ();
    5012                 :            :         }
    5013                 :          0 :       lc1 = lc1->next;
    5014                 :          0 :       lc2 = lc2->next;
    5015                 :            :     }
    5016                 :            : 
    5017                 :          0 :   while (lc1)
    5018                 :            :     {
    5019                 :          0 :       fprintf (dump_file, "removed: ");
    5020                 :          0 :       print_rtl_single (dump_file, lc1->loc);
    5021                 :          0 :       lc1 = lc1->next;
    5022                 :            :     }
    5023                 :            : 
    5024                 :          0 :   while (lc2)
    5025                 :            :     {
    5026                 :          0 :       fprintf (dump_file, "added: ");
    5027                 :          0 :       print_rtl_single (dump_file, lc2->loc);
    5028                 :          0 :       lc2 = lc2->next;
    5029                 :            :     }
    5030                 :          0 : }
    5031                 :            : 
    5032                 :            : /* Return true if variables VAR1 and VAR2 are different.  */
    5033                 :            : 
    5034                 :            : static bool
    5035                 :  183979000 : variable_different_p (variable *var1, variable *var2)
    5036                 :            : {
    5037                 :  183979000 :   int i;
    5038                 :            : 
    5039                 :  183979000 :   if (var1 == var2)
    5040                 :            :     return false;
    5041                 :            : 
    5042                 :   26550300 :   if (var1->onepart != var2->onepart)
    5043                 :            :     return true;
    5044                 :            : 
    5045                 :   26550300 :   if (var1->n_var_parts != var2->n_var_parts)
    5046                 :            :     return true;
    5047                 :            : 
    5048                 :   26517600 :   if (var1->onepart && var1->n_var_parts)
    5049                 :            :     {
    5050                 :   26339900 :       gcc_checking_assert (dv_as_opaque (var1->dv) == dv_as_opaque (var2->dv)
    5051                 :            :                            && var1->n_var_parts == 1);
    5052                 :            :       /* One-part values have locations in a canonical order.  */
    5053                 :   26339900 :       return onepart_variable_different_p (var1, var2);
    5054                 :            :     }
    5055                 :            : 
    5056                 :     388083 :   for (i = 0; i < var1->n_var_parts; i++)
    5057                 :            :     {
    5058                 :     245190 :       if (VAR_PART_OFFSET (var1, i) != VAR_PART_OFFSET (var2, i))
    5059                 :            :         return true;
    5060                 :     242726 :       if (variable_part_different_p (&var1->var_part[i], &var2->var_part[i]))
    5061                 :            :         return true;
    5062                 :     229960 :       if (variable_part_different_p (&var2->var_part[i], &var1->var_part[i]))
    5063                 :            :         return true;
    5064                 :            :     }
    5065                 :            :   return false;
    5066                 :            : }
    5067                 :            : 
    5068                 :            : /* Return true if dataflow sets OLD_SET and NEW_SET differ.  */
    5069                 :            : 
    5070                 :            : static bool
    5071                 :    6425520 : dataflow_set_different (dataflow_set *old_set, dataflow_set *new_set)
    5072                 :            : {
    5073                 :    6425520 :   variable_iterator_type hi;
    5074                 :    6425520 :   variable *var1;
    5075                 :    6425520 :   bool diffound = false;
    5076                 :    6425520 :   bool details = (dump_file && (dump_flags & TDF_DETAILS));
    5077                 :            : 
    5078                 :            : #define RETRUE                                  \
    5079                 :            :   do                                            \
    5080                 :            :     {                                           \
    5081                 :            :       if (!details)                             \
    5082                 :            :         return true;                            \
    5083                 :            :       else                                      \
    5084                 :            :         diffound = true;                        \
    5085                 :            :     }                                           \
    5086                 :            :   while (0)
    5087                 :            : 
    5088                 :    6425520 :   if (old_set->vars == new_set->vars)
    5089                 :            :     return false;
    5090                 :            : 
    5091                 :    6422940 :   if (shared_hash_htab (old_set->vars)->elements ()
    5092                 :    6422940 :       != shared_hash_htab (new_set->vars)->elements ())
    5093                 :    6006230 :     RETRUE;
    5094                 :            : 
    5095                 :   28303000 :   FOR_EACH_HASH_TABLE_ELEMENT (*shared_hash_htab (old_set->vars),
    5096                 :            :                                var1, variable, hi)
    5097                 :            :     {
    5098                 :   13849300 :       variable_table_type *htab = shared_hash_htab (new_set->vars);
    5099                 :   13849300 :       variable *var2 = htab->find_with_hash (var1->dv, dv_htab_hash (var1->dv));
    5100                 :            : 
    5101                 :   13849300 :       if (!var2)
    5102                 :            :         {
    5103                 :      30874 :           if (dump_file && (dump_flags & TDF_DETAILS))
    5104                 :            :             {
    5105                 :          0 :               fprintf (dump_file, "dataflow difference found: removal of:\n");
    5106                 :          0 :               dump_var (var1);
    5107                 :            :             }
    5108                 :      30874 :           RETRUE;
    5109                 :            :         }
    5110                 :   13818400 :       else if (variable_different_p (var1, var2))
    5111                 :            :         {
    5112                 :      83646 :           if (details)
    5113                 :            :             {
    5114                 :          0 :               fprintf (dump_file, "dataflow difference found: "
    5115                 :            :                        "old and new follow:\n");
    5116                 :          0 :               dump_var (var1);
    5117                 :          0 :               if (dv_onepart_p (var1->dv))
    5118                 :          0 :                 dump_onepart_variable_differences (var1, var2);
    5119                 :          0 :               dump_var (var2);
    5120                 :            :             }
    5121                 :      83646 :           RETRUE;
    5122                 :            :         }
    5123                 :            :     }
    5124                 :            : 
    5125                 :            :   /* There's no need to traverse the second hashtab unless we want to
    5126                 :            :      print the details.  If both have the same number of elements and
    5127                 :            :      the second one had all entries found in the first one, then the
    5128                 :            :      second can't have any extra entries.  */
    5129                 :     302193 :   if (!details)
    5130                 :            :     return diffound;
    5131                 :            : 
    5132                 :         10 :   FOR_EACH_HASH_TABLE_ELEMENT (*shared_hash_htab (new_set->vars),
    5133                 :            :                                var1, variable, hi)
    5134                 :            :     {
    5135                 :          4 :       variable_table_type *htab = shared_hash_htab (old_set->vars);
    5136                 :          4 :       variable *var2 = htab->find_with_hash (var1->dv, dv_htab_hash (var1->dv));
    5137                 :          4 :       if (!var2)
    5138                 :            :         {
    5139                 :          4 :           if (details)
    5140                 :            :             {
    5141                 :          4 :               fprintf (dump_file, "dataflow difference found: addition of:\n");
    5142                 :          4 :               dump_var (var1);
    5143                 :            :             }
    5144                 :          4 :           RETRUE;
    5145                 :            :         }
    5146                 :            :     }
    5147                 :            : 
    5148                 :            : #undef RETRUE
    5149                 :            : 
    5150                 :            :   return diffound;
    5151                 :            : }
    5152                 :            : 
    5153                 :            : /* Free the contents of dataflow set SET.  */
    5154                 :            : 
    5155                 :            : static void
    5156                 :   20917300 : dataflow_set_destroy (dataflow_set *set)
    5157                 :            : {
    5158                 :   20917300 :   int i;
    5159                 :            : 
    5160                 : 1610630000 :   for (i = 0; i < FIRST_PSEUDO_REGISTER; i++)
    5161                 : 3179420000 :     attrs_list_clear (&set->regs[i]);
    5162                 :            : 
    5163                 :   20917300 :   shared_hash_destroy (set->vars);
    5164                 :   20917300 :   set->vars = NULL;
    5165                 :   20917300 : }
    5166                 :            : 
    5167                 :            : /* Return true if T is a tracked parameter with non-degenerate record type.  */
    5168                 :            : 
    5169                 :            : static bool
    5170                 :    2497670 : tracked_record_parameter_p (tree t)
    5171                 :            : {
    5172                 :    2497670 :   if (TREE_CODE (t) != PARM_DECL)
    5173                 :            :     return false;
    5174                 :            : 
    5175                 :     231908 :   if (DECL_MODE (t) == BLKmode)
    5176                 :            :     return false;
    5177                 :            : 
    5178                 :     118037 :   tree type = TREE_TYPE (t);
    5179                 :     118037 :   if (TREE_CODE (type) != RECORD_TYPE)
    5180                 :            :     return false;
    5181                 :            : 
    5182                 :     117927 :   if (TYPE_FIELDS (type) == NULL_TREE
    5183                 :     117927 :       || DECL_CHAIN (TYPE_FIELDS (type)) == NULL_TREE)
    5184                 :        585 :     return false;
    5185                 :            : 
    5186                 :            :   return true;
    5187                 :            : }
    5188                 :            : 
    5189                 :            : /* Shall EXPR be tracked?  */
    5190                 :            : 
    5191                 :            : static bool
    5192                 :   47405400 : track_expr_p (tree expr, bool need_rtl)
    5193                 :            : {
    5194                 :   47405400 :   rtx decl_rtl;
    5195                 :   47405400 :   tree realdecl;
    5196                 :            : 
    5197                 :   47405400 :   if (TREE_CODE (expr) == DEBUG_EXPR_DECL)
    5198                 :    2199700 :     return DECL_RTL_SET_P (expr);
    5199                 :            : 
    5200                 :            :   /* If EXPR is not a parameter or a variable do not track it.  */
    5201                 :   45205700 :   if (!VAR_P (expr) && TREE_CODE (expr) != PARM_DECL)
    5202                 :            :     return 0;
    5203                 :            : 
    5204                 :            :   /* It also must have a name...  */
    5205                 :   27922400 :   if (!DECL_NAME (expr) && need_rtl)
    5206                 :            :     return 0;
    5207                 :            : 
    5208                 :            :   /* ... and a RTL assigned to it.  */
    5209                 :   27030200 :   decl_rtl = DECL_RTL_IF_SET (expr);
    5210                 :   27030200 :   if (!decl_rtl && need_rtl)
    5211                 :            :     return 0;
    5212                 :            : 
    5213                 :            :   /* If this expression is really a debug alias of some other declaration, we
    5214                 :            :      don't need to track this expression if the ultimate declaration is
    5215                 :            :      ignored.  */
    5216                 :   26930600 :   realdecl = expr;
    5217                 :   26930600 :   if (VAR_P (realdecl) && DECL_HAS_DEBUG_EXPR_P (realdecl))
    5218                 :            :     {
    5219                 :    2186950 :       realdecl = DECL_DEBUG_EXPR (realdecl);
    5220                 :    2186950 :       if (!DECL_P (realdecl))
    5221                 :            :         {
    5222                 :    2186950 :           if (handled_component_p (realdecl)
    5223                 :     172463 :               || (TREE_CODE (realdecl) == MEM_REF
    5224                 :     172463 :                   && TREE_CODE (TREE_OPERAND (realdecl, 0)) == ADDR_EXPR))
    5225                 :            :             {
    5226                 :    2186950 :               HOST_WIDE_INT bitsize, bitpos;
    5227                 :    2186950 :               bool reverse;
    5228                 :    2186950 :               tree innerdecl
    5229                 :    2186950 :                 = get_ref_base_and_extent_hwi (realdecl, &bitpos,
    5230                 :            :                                                &bitsize, &reverse);
    5231                 :    2186950 :               if (!innerdecl
    5232                 :    2186950 :                   || !DECL_P (innerdecl)
    5233                 :    2186950 :                   || DECL_IGNORED_P (innerdecl)
    5234                 :            :                   /* Do not track declarations for parts of tracked record
    5235                 :            :                      parameters since we want to track them as a whole.  */
    5236                 :    2186950 :                   || tracked_record_parameter_p (innerdecl)
    5237                 :    2128230 :                   || TREE_STATIC (innerdecl)
    5238                 :    2128230 :                   || bitsize == 0
    5239                 :    4315180 :                   || bitpos + bitsize > 256)
    5240                 :     108282 :                 return 0;
    5241                 :            :               else
    5242                 :    2078660 :                 realdecl = expr;
    5243                 :            :             }
    5244                 :            :           else
    5245                 :            :             return 0;
    5246                 :            :         }
    5247                 :            :     }
    5248                 :            : 
    5249                 :            :   /* Do not track EXPR if REALDECL it should be ignored for debugging
    5250                 :            :      purposes.  */
    5251                 :   26822300 :   if (DECL_IGNORED_P (realdecl))
    5252                 :            :     return 0;
    5253                 :            : 
    5254                 :            :   /* Do not track global variables until we are able to emit correct location
    5255                 :            :      list for them.  */
    5256                 :   21015300 :   if (TREE_STATIC (realdecl))
    5257                 :            :     return 0;
    5258                 :            : 
    5259                 :            :   /* When the EXPR is a DECL for alias of some variable (see example)
    5260                 :            :      the TREE_STATIC flag is not used.  Disable tracking all DECLs whose
    5261                 :            :      DECL_RTL contains SYMBOL_REF.
    5262                 :            : 
    5263                 :            :      Example:
    5264                 :            :      extern char **_dl_argv_internal __attribute__ ((alias ("_dl_argv")));
    5265                 :            :      char **_dl_argv;
    5266                 :            :   */
    5267                 :    3180040 :   if (decl_rtl && MEM_P (decl_rtl)
    5268                 :   21191800 :       && contains_symbol_ref_p (XEXP (decl_rtl, 0)))
    5269                 :            :     return 0;
    5270                 :            : 
    5271                 :            :   /* If RTX is a memory it should not be very large (because it would be
    5272                 :            :      an array or struct).  */
    5273                 :   20938400 :   if (decl_rtl && MEM_P (decl_rtl))
    5274                 :            :     {
    5275                 :            :       /* Do not track structures and arrays.  */
    5276                 :     216056 :       if ((GET_MODE (decl_rtl) == BLKmode
    5277                 :      31379 :            || AGGREGATE_TYPE_P (TREE_TYPE (realdecl)))
    5278                 :     230974 :           && !tracked_record_parameter_p (realdecl))
    5279                 :            :         return 0;
    5280                 :      22699 :       if (MEM_SIZE_KNOWN_P (decl_rtl)
    5281                 :      22699 :           && maybe_gt (MEM_SIZE (decl_rtl), MAX_VAR_PARTS))
    5282                 :            :         return 0;
    5283                 :            :     }
    5284                 :            : 
    5285                 :   20744900 :   DECL_CHANGED (expr) = 0;
    5286                 :   20744900 :   DECL_CHANGED (realdecl) = 0;
    5287                 :   20744900 :   return 1;
    5288                 :            : }
    5289                 :            : 
    5290                 :            : /* Determine whether a given LOC refers to the same variable part as
    5291                 :            :    EXPR+OFFSET.  */
    5292                 :            : 
    5293                 :            : static bool
    5294                 :     110007 : same_variable_part_p (rtx loc, tree expr, poly_int64 offset)
    5295                 :            : {
    5296                 :     110007 :   tree expr2;
    5297                 :     110007 :   poly_int64 offset2;
    5298                 :            : 
    5299                 :     110007 :   if (! DECL_P (expr))
    5300                 :            :     return false;
    5301                 :            : 
    5302                 :     110007 :   if (REG_P (loc))
    5303                 :            :     {
    5304                 :      45115 :       expr2 = REG_EXPR (loc);
    5305                 :      45115 :       offset2 = REG_OFFSET (loc);
    5306                 :            :     }
    5307                 :      64892 :   else if (MEM_P (loc))
    5308                 :            :     {
    5309                 :      58788 :       expr2 = MEM_EXPR (loc);
    5310                 :      58788 :       offset2 = int_mem_offset (loc);
    5311                 :            :     }
    5312                 :            :   else
    5313                 :            :     return false;
    5314                 :            : 
    5315                 :     103903 :   if (! expr2 || ! DECL_P (expr2))
    5316                 :            :     return false;
    5317                 :            : 
    5318                 :      39595 :   expr = var_debug_decl (expr);
    5319                 :      39595 :   expr2 = var_debug_decl (expr2);
    5320                 :            : 
    5321                 :      39595 :   return (expr == expr2 && known_eq (offset, offset2));
    5322                 :            : }
    5323                 :            : 
    5324                 :            : /* LOC is a REG or MEM that we would like to track if possible.
    5325                 :            :    If EXPR is null, we don't know what expression LOC refers to,
    5326                 :            :    otherwise it refers to EXPR + OFFSET.  STORE_REG_P is true if
    5327                 :            :    LOC is an lvalue register.
    5328                 :            : 
    5329                 :            :    Return true if EXPR is nonnull and if LOC, or some lowpart of it,
    5330                 :            :    is something we can track.  When returning true, store the mode of
    5331                 :            :    the lowpart we can track in *MODE_OUT (if nonnull) and its offset
    5332                 :            :    from EXPR in *OFFSET_OUT (if nonnull).  */
    5333                 :            : 
    5334                 :            : static bool
    5335                 :   25572600 : track_loc_p (rtx loc, tree expr, poly_int64 offset, bool store_reg_p,
    5336                 :            :              machine_mode *mode_out, HOST_WIDE_INT *offset_out)
    5337                 :            : {
    5338                 :   25572600 :   machine_mode mode;
    5339                 :            : 
    5340                 :   25572600 :   if (expr == NULL || !track_expr_p (expr, true))
    5341                 :   24349800 :     return false;
    5342                 :            : 
    5343                 :            :   /* If REG was a paradoxical subreg, its REG_ATTRS will describe the
    5344                 :            :      whole subreg, but only the old inner part is really relevant.  */
    5345                 :    1222770 :   mode = GET_MODE (loc);
    5346                 :    1222770 :   if (REG_P (loc) && !HARD_REGISTER_NUM_P (ORIGINAL_REGNO (loc)))
    5347                 :            :     {
    5348                 :     488603 :       machine_mode pseudo_mode;
    5349                 :            : 
    5350                 :     488603 :       pseudo_mode = PSEUDO_REGNO_MODE (ORIGINAL_REGNO (loc));
    5351                 :     488603 :       if (paradoxical_subreg_p (mode, pseudo_mode))
    5352                 :            :         {
    5353                 :         27 :           offset += byte_lowpart_offset (pseudo_mode, mode);
    5354                 :         27 :           mode = pseudo_mode;
    5355                 :            :         }
    5356                 :            :     }
    5357                 :            : 
    5358                 :            :   /* If LOC is a paradoxical lowpart of EXPR, refer to EXPR itself.
    5359                 :            :      Do the same if we are storing to a register and EXPR occupies
    5360                 :            :      the whole of register LOC; in that case, the whole of EXPR is
    5361                 :            :      being changed.  We exclude complex modes from the second case
    5362                 :            :      because the real and imaginary parts are represented as separate
    5363                 :            :      pseudo registers, even if the whole complex value fits into one
    5364                 :            :      hard register.  */
    5365                 :    1222770 :   if ((paradoxical_subreg_p (mode, DECL_MODE (expr))
    5366                 :    1215490 :        || (store_reg_p
    5367                 :          0 :            && !COMPLEX_MODE_P (DECL_MODE (expr))
    5368                 :          0 :            && hard_regno_nregs (REGNO (loc), DECL_MODE (expr)) == 1))
    5369                 :    2438260 :       && known_eq (offset + byte_lowpart_offset (DECL_MODE (expr), mode), 0))
    5370                 :            :     {
    5371                 :       7278 :       mode = DECL_MODE (expr);
    5372                 :       7278 :       offset = 0;
    5373                 :            :     }
    5374                 :            : 
    5375                 :    1222770 :   HOST_WIDE_INT const_offset;
    5376                 :    2445530 :   if (!track_offset_p (offset, &const_offset))
    5377                 :            :     return false;
    5378                 :            : 
    5379                 :    1222770 :   if (mode_out)
    5380                 :    1222770 :     *mode_out = mode;
    5381                 :    1222770 :   if (offset_out)
    5382                 :     664716 :     *offset_out = const_offset;
    5383                 :            :   return true;
    5384                 :            : }
    5385                 :            : 
    5386                 :            : /* Return the MODE lowpart of LOC, or null if LOC is not something we
    5387                 :            :    want to track.  When returning nonnull, make sure that the attributes
    5388                 :            :    on the returned value are updated.  */
    5389                 :            : 
    5390                 :            : static rtx
    5391                 :    1871380 : var_lowpart (machine_mode mode, rtx loc)
    5392                 :            : {
    5393                 :    1871380 :   unsigned int regno;
    5394                 :            : 
    5395                 :    1871380 :   if (GET_MODE (loc) == mode)
    5396                 :            :     return loc;
    5397                 :            : 
    5398                 :      18612 :   if (!REG_P (loc) && !MEM_P (loc))
    5399                 :            :     return NULL;
    5400                 :            : 
    5401                 :      14578 :   poly_uint64 offset = byte_lowpart_offset (mode, GET_MODE (loc));
    5402                 :            : 
    5403                 :      14578 :   if (MEM_P (loc))
    5404                 :       1769 :     return adjust_address_nv (loc, mode, offset);
    5405                 :            : 
    5406                 :      12809 :   poly_uint64 reg_offset = subreg_lowpart_offset (mode, GET_MODE (loc));
    5407                 :      12809 :   regno = REGNO (loc) + subreg_regno_offset (REGNO (loc), GET_MODE (loc),
    5408                 :            :                                              reg_offset, mode);
    5409                 :      12809 :   return gen_rtx_REG_offset (loc, mode, regno, offset);
    5410                 :            : }
    5411                 :            : 
    5412                 :            : /* Carry information about uses and stores while walking rtx.  */
    5413                 :            : 
    5414                 :            : struct count_use_info
    5415                 :            : {
    5416                 :            :   /* The insn where the RTX is.  */
    5417                 :            :   rtx_insn *insn;
    5418                 :            : 
    5419                 :            :   /* The basic block where insn is.  */
    5420                 :            :   basic_block bb;
    5421                 :            : 
    5422                 :            :   /* The array of n_sets sets in the insn, as determined by cselib.  */
    5423                 :            :   struct cselib_set *sets;
    5424                 :            :   int n_sets;
    5425                 :            : 
    5426                 :            :   /* True if we're counting stores, false otherwise.  */
    5427                 :            :   bool store_p;
    5428                 :            : };
    5429                 :            : 
    5430                 :            : /* Find a VALUE corresponding to X.   */
    5431                 :            : 
    5432                 :            : static inline cselib_val *
    5433                 :  124075000 : find_use_val (rtx x, machine_mode mode, struct count_use_info *cui)
    5434                 :            : {
    5435                 :  124075000 :   int i;
    5436                 :            : 
    5437                 :  124075000 :   if (cui->sets)
    5438                 :            :     {
    5439                 :            :       /* This is called after uses are set up and before stores are
    5440                 :            :          processed by cselib, so it's safe to look up srcs, but not
    5441                 :            :          dsts.  So we look up expressions that appear in srcs or in
    5442                 :            :          dest expressions, but we search the sets array for dests of
    5443                 :            :          stores.  */
    5444                 :  124074000 :       if (cui->store_p)
    5445                 :            :         {
    5446                 :            :           /* Some targets represent memset and memcpy patterns
    5447                 :            :              by (set (mem:BLK ...) (reg:[QHSD]I ...)) or
    5448                 :            :              (set (mem:BLK ...) (const_int ...)) or
    5449                 :            :              (set (mem:BLK ...) (mem:BLK ...)).  Don't return anything
    5450                 :            :              in that case, otherwise we end up with mode mismatches.  */
    5451                 :   56622500 :           if (mode == BLKmode && MEM_P (x))
    5452                 :            :             return NULL;
    5453                 :   66258900 :           for (i = 0; i < cui->n_sets; i++)
    5454                 :   63153000 :             if (cui->sets[i].dest == x)
    5455                 :   52957800 :               return cui->sets[i].src_elt;
    5456                 :            :         }
    5457                 :            :       else
    5458                 :   67452000 :         return cselib_lookup (x, mode, 0, VOIDmode);
    5459                 :            :     }
    5460                 :            : 
    5461                 :            :   return NULL;
    5462                 :            : }
    5463                 :            : 
    5464                 :            : /* Replace all registers and addresses in an expression with VALUE
    5465                 :            :    expressions that map back to them, unless the expression is a
    5466                 :            :    register.  If no mapping is or can be performed, returns NULL.  */
    5467                 :            : 
    5468                 :            : static rtx
    5469                 :   39615600 : replace_expr_with_values (rtx loc)
    5470                 :            : {
    5471                 :   39615600 :   if (REG_P (loc) || GET_CODE (loc) == ENTRY_VALUE)
    5472                 :            :     return NULL;
    5473                 :   12828000 :   else if (MEM_P (loc))
    5474                 :            :     {
    5475                 :   12828000 :       cselib_val *addr = cselib_lookup (XEXP (loc, 0),
    5476                 :   12828000 :                                         get_address_mode (loc), 0,
    5477                 :   12828000 :                                         GET_MODE (loc));
    5478                 :   12828000 :       if (addr)
    5479                 :   12828000 :         return replace_equiv_address_nv (loc, addr->val_rtx);
    5480                 :            :       else
    5481                 :            :         return NULL;
    5482                 :            :     }
    5483                 :            :   else
    5484                 :          0 :     return cselib_subst_to_values (loc, VOIDmode);
    5485                 :            : }
    5486                 :            : 
    5487                 :            : /* Return true if X contains a DEBUG_EXPR.  */
    5488                 :            : 
    5489                 :            : static bool
    5490                 :      30807 : rtx_debug_expr_p (const_rtx x)
    5491                 :            : {
    5492                 :      30807 :   subrtx_iterator::array_type array;
    5493                 :     116204 :   FOR_EACH_SUBRTX (iter, array, x, ALL)
    5494                 :      85397 :     if (GET_CODE (*iter) == DEBUG_EXPR)
    5495                 :          0 :       return true;
    5496                 :      30807 :   return false;
    5497                 :            : }
    5498                 :            : 
    5499                 :            : /* Determine what kind of micro operation to choose for a USE.  Return
    5500                 :            :    MO_CLOBBER if no micro operation is to be generated.  */
    5501                 :            : 
    5502                 :            : static enum micro_operation_type
    5503                 :  251484000 : use_type (rtx loc, struct count_use_info *cui, machine_mode *modep)
    5504                 :            : {
    5505                 :  251484000 :   tree expr;
    5506                 :            : 
    5507                 :  251484000 :   if (cui && cui->sets)
    5508                 :            :     {
    5509                 :  201733000 :       if (GET_CODE (loc) == VAR_LOCATION)
    5510                 :            :         {
    5511                 :   21832800 :           if (track_expr_p (PAT_VAR_LOCATION_DECL (loc), false))
    5512                 :            :             {
    5513                 :   21666100 :               rtx ploc = PAT_VAR_LOCATION_LOC (loc);
    5514                 :   21666100 :               if (! VAR_LOC_UNKNOWN_P (ploc))
    5515                 :            :                 {
    5516                 :   10988000 :                   cselib_val *val = cselib_lookup (ploc, GET_MODE (loc), 1,
    5517                 :            :                                                    VOIDmode);
    5518                 :            : 
    5519                 :            :                   /* ??? flag_float_store and volatile mems are never
    5520                 :            :                      given values, but we could in theory use them for
    5521                 :            :                      locations.  */
    5522                 :   21666100 :                   gcc_assert (val || 1);
    5523                 :            :                 }
    5524                 :   21666100 :               return MO_VAL_LOC;
    5525                 :            :             }
    5526                 :            :           else
    5527                 :            :             return MO_CLOBBER;
    5528                 :            :         }
    5529                 :            : 
    5530                 :  179900000 :       if (REG_P (loc) || MEM_P (loc))
    5531                 :            :         {
    5532                 :   77546200 :           if (modep)
    5533                 :   77546200 :             *modep = GET_MODE (loc);
    5534                 :   77546200 :           if (cui->store_p)
    5535                 :            :             {
    5536                 :   30210300 :               if (REG_P (loc)
    5537                 :   30210300 :                   || (find_use_val (loc, GET_MODE (loc), cui)
    5538                 :    6630590 :                       && cselib_lookup (XEXP (loc, 0),
    5539                 :    7207710 :                                         get_address_mode (loc), 0,
    5540                 :    6630590 :                                         GET_MODE (loc))))
    5541                 :   29633200 :                 return MO_VAL_SET;
    5542                 :            :             }
    5543                 :            :           else
    5544                 :            :             {
    5545                 :   47335900 :               cselib_val *val = find_use_val (loc, GET_MODE (loc), cui);
    5546                 :            : 
    5547                 :   47335900 :               if (val && !cselib_preserved_value_p (val))
    5548                 :            :                 return MO_VAL_USE;
    5549                 :            :             }
    5550                 :            :         }
    5551                 :            :     }
    5552                 :            : 
    5553                 :  189437000 :   if (REG_P (loc))
    5554                 :            :     {
    5555                 :   63593000 :       gcc_assert (REGNO (loc) < FIRST_PSEUDO_REGISTER);
    5556                 :            : 
    5557                 :   63593000 :       if (loc == cfa_base_rtx)
    5558                 :            :         return MO_CLOBBER;
    5559                 :   49995400 :       expr = REG_EXPR (loc);
    5560                 :            : 
    5561                 :   21064400 :       if (!expr)
    5562                 :            :         return MO_USE_NO_VAR;
    5563                 :   20905200 :       else if (target_for_debug_bind (var_debug_decl (expr)))
    5564                 :            :         return MO_CLOBBER;
    5565                 :   12941500 :       else if (track_loc_p (loc, expr, REG_OFFSET (loc),
    5566                 :            :                             false, modep, NULL))
    5567                 :            :         return MO_USE;
    5568                 :            :       else
    5569                 :   12414200 :         return MO_USE_NO_VAR;
    5570                 :            :     }
    5571                 :  125844000 :   else if (MEM_P (loc))
    5572                 :            :     {
    5573                 :   17437600 :       expr = MEM_EXPR (loc);
    5574                 :            : 
    5575                 :   17437600 :       if (!expr)
    5576                 :            :         return MO_CLOBBER;
    5577                 :   12587600 :       else if (target_for_debug_bind (var_debug_decl (expr)))
    5578                 :            :         return MO_CLOBBER;
    5579                 :   23918200 :       else if (track_loc_p (loc, expr, int_mem_offset (loc),
    5580                 :            :                             false, modep, NULL)
    5581                 :            :                /* Multi-part variables shouldn't refer to one-part
    5582                 :            :                   variable names such as VALUEs (never happens) or
    5583                 :            :                   DEBUG_EXPRs (only happens in the presence of debug
    5584                 :            :                   insns).  */
    5585                 :   11959100 :                && (!MAY_HAVE_DEBUG_BIND_INSNS
    5586                 :      30807 :                    || !rtx_debug_expr_p (XEXP (loc, 0))))
    5587                 :      30809 :         return MO_USE;
    5588                 :            :       else
    5589                 :   11928300 :         return MO_CLOBBER;
    5590                 :            :     }
    5591                 :            : 
    5592                 :            :   return MO_CLOBBER;
    5593                 :            : }
    5594                 :            : 
    5595                 :            : /* Log to OUT information about micro-operation MOPT involving X in
    5596                 :            :    INSN of BB.  */
    5597                 :            : 
    5598                 :            : static inline void
    5599                 :            : log_op_type (rtx x, basic_block bb, rtx_insn *insn,
    5600                 :            :              enum micro_operation_type mopt, FILE *out)
    5601                 :            : {
    5602                 :            :   fprintf (out, "bb %i op %i insn %i %s ",
    5603                 :            :            bb->index, VTI (bb)->mos.length (),
    5604                 :            :            INSN_UID (insn), micro_operation_type_name[mopt]);
    5605                 :            :   print_inline_rtx (out, x, 2);
    5606                 :            :   fputc ('\n', out);
    5607                 :            : }
    5608                 :            : 
    5609                 :            : /* Tell whether the CONCAT used to holds a VALUE and its location
    5610                 :            :    needs value resolution, i.e., an attempt of mapping the location
    5611                 :            :    back to other incoming values.  */
    5612                 :            : #define VAL_NEEDS_RESOLUTION(x) \
    5613                 :            :   (RTL_FLAG_CHECK1 ("VAL_NEEDS_RESOLUTION", (x), CONCAT)->volatil)
    5614                 :            : /* Whether the location in the CONCAT is a tracked expression, that
    5615                 :            :    should also be handled like a MO_USE.  */
    5616                 :            : #define VAL_HOLDS_TRACK_EXPR(x) \
    5617                 :            :   (RTL_FLAG_CHECK1 ("VAL_HOLDS_TRACK_EXPR", (x), CONCAT)->used)
    5618                 :            : /* Whether the location in the CONCAT should be handled like a MO_COPY
    5619                 :            :    as well.  */
    5620                 :            : #define VAL_EXPR_IS_COPIED(x) \
    5621                 :            :   (RTL_FLAG_CHECK1 ("VAL_EXPR_IS_COPIED", (x), CONCAT)->jump)
    5622                 :            : /* Whether the location in the CONCAT should be handled like a
    5623                 :            :    MO_CLOBBER as well.  */
    5624                 :            : #define VAL_EXPR_IS_CLOBBERED(x) \
    5625                 :            :   (RTL_FLAG_CHECK1 ("VAL_EXPR_IS_CLOBBERED", (x), CONCAT)->unchanging)
    5626                 :            : 
    5627                 :            : /* All preserved VALUEs.  */
    5628                 :            : static vec<rtx> preserved_values;
    5629                 :            : 
    5630                 :            : /* Ensure VAL is preserved and remember it in a vector for vt_emit_notes.  */
    5631                 :            : 
    5632                 :            : static void
    5633                 :   28784000 : preserve_value (cselib_val *val)
    5634                 :            : {
    5635                 :          0 :   cselib_preserve_value (val);
    5636                 :   28784000 :   preserved_values.safe_push (val->val_rtx);
    5637                 :   26895000 : }
    5638                 :            : 
    5639                 :            : /* Helper function for MO_VAL_LOC handling.  Return non-zero if
    5640                 :            :    any rtxes not suitable for CONST use not replaced by VALUEs
    5641                 :            :    are discovered.  */
    5642                 :            : 
    5643                 :            : static bool
    5644                 :      27081 : non_suitable_const (const_rtx x)
    5645                 :            : {
    5646                 :      27081 :   subrtx_iterator::array_type array;
    5647                 :     135405 :   FOR_EACH_SUBRTX (iter, array, x, ALL)
    5648                 :            :     {
    5649                 :     108324 :       const_rtx x = *iter;
    5650                 :     108324 :       switch (GET_CODE (x))
    5651                 :            :         {
    5652                 :            :         case REG:
    5653                 :            :         case DEBUG_EXPR:
    5654                 :            :         case PC:
    5655                 :            :         case SCRATCH:
    5656                 :            :         case CC0:
    5657                 :            :         case ASM_INPUT:
    5658                 :            :         case ASM_OPERANDS:
    5659                 :          0 :           return true;
    5660                 :          0 :         case MEM:
    5661                 :          0 :           if (!MEM_READONLY_P (x))
    5662                 :            :             return true;
    5663                 :            :           break;
    5664                 :            :         default:
    5665                 :            :           break;
    5666                 :            :         }
    5667                 :            :     }
    5668                 :      27081 :   return false;
    5669                 :            : }
    5670                 :            : 
    5671                 :            : /* Add uses (register and memory references) LOC which will be tracked
    5672                 :            :    to VTI (bb)->mos.  */
    5673                 :            : 
    5674                 :            : static void
    5675                 :  168531000 : add_uses (rtx loc, struct count_use_info *cui)
    5676                 :            : {
    5677                 :  168531000 :   machine_mode mode = VOIDmode;
    5678                 :  168531000 :   enum micro_operation_type type = use_type (loc, cui, &mode);
    5679                 :            : 
    5680                 :  168531000 :   if (type != MO_CLOBBER)
    5681                 :            :     {
    5682                 :   47058200 :       basic_block bb = cui->bb;
    5683                 :   47058200 :       micro_operation mo;
    5684                 :            : 
    5685                 :   47058200 :       mo.type = type;
    5686                 :   47058200 :       mo.u.loc = type == MO_USE ? var_lowpart (mode, loc) : loc;
    5687                 :   47058200 :       mo.insn = cui->insn;
    5688                 :            : 
    5689                 :   47058200 :       if (type == MO_VAL_LOC)
    5690                 :            :         {
    5691                 :   21666100 :           rtx oloc = loc;
    5692                 :   21666100 :           rtx vloc = PAT_VAR_LOCATION_LOC (oloc);
    5693                 :   21666100 :           cselib_val *val;
    5694                 :            : 
    5695                 :   21666100 :           gcc_assert (cui->sets);
    5696                 :            : 
    5697                 :   21666100 :           if (MEM_P (vloc)
    5698                 :     768759 :               && !REG_P (XEXP (vloc, 0))
    5699                 :     727772 :               && !MEM_P (XEXP (vloc, 0)))
    5700                 :            :             {
    5701                 :     723868 :               rtx mloc = vloc;
    5702                 :     723868 :               machine_mode address_mode = get_address_mode (mloc);
    5703                 :     723868 :               cselib_val *val
    5704                 :    1447740 :                 = cselib_lookup (XEXP (mloc, 0), address_mode, 0,
    5705                 :     723868 :                                  GET_MODE (mloc));
    5706                 :            : 
    5707                 :     723868 :               if (val && !cselib_preserved_value_p (val))
    5708                 :     216442 :                 preserve_value (val);
    5709                 :            :             }
    5710                 :            : 
    5711                 :   21666100 :           if (CONSTANT_P (vloc)
    5712                 :   21666100 :               && (GET_CODE (vloc) != CONST || non_suitable_const (vloc)))
    5713                 :            :             /* For constants don't look up any value.  */;
    5714                 :   10678100 :           else if (!VAR_LOC_UNKNOWN_P (vloc) && !unsuitable_loc (vloc)
    5715                 :   29748500 :                    && (val = find_use_val (vloc, GET_MODE (oloc), cui)))
    5716                 :            :             {
    5717                 :    9534830 :               machine_mode mode2;
    5718                 :    9534830 :               enum micro_operation_type type2;
    5719                 :    9534830 :               rtx nloc = NULL;
    5720                 :    9534830 :               bool resolvable = REG_P (vloc) || MEM_P (vloc);
    5721                 :            : 
    5722                 :    9534830 :               if (resolvable)
    5723                 :    3483260 :                 nloc = replace_expr_with_values (vloc);
    5724                 :            : 
    5725                 :    3483260 :               if (nloc)
    5726                 :            :                 {
    5727                 :     768417 :                   oloc = shallow_copy_rtx (oloc);
    5728                 :     768417 :                   PAT_VAR_LOCATION_LOC (oloc) = nloc;
    5729                 :            :                 }
    5730                 :            : 
    5731                 :    9534830 :               oloc = gen_rtx_CONCAT (mode, val->val_rtx, oloc);
    5732                 :            : 
    5733                 :    9534830 :               type2 = use_type (vloc, 0, &mode2);
    5734                 :            : 
    5735                 :    9534830 :               gcc_assert (type2 == MO_USE || type2 == MO_USE_NO_VAR
    5736                 :            :                           || type2 == MO_CLOBBER);
    5737                 :            : 
    5738                 :    9534830 :               if (type2 == MO_CLOBBER
    5739                 :    9534830 :                   && !cselib_preserved_value_p (val))
    5740                 :            :                 {
    5741                 :    3025330 :                   VAL_NEEDS_RESOLUTION (oloc) = resolvable;
    5742                 :   12560200 :                   preserve_value (val);
    5743                 :            :                 }
    5744                 :            :             }
    5745                 :   10678500 :           else if (!VAR_LOC_UNKNOWN_P (vloc))
    5746                 :            :             {
    5747                 :        345 :               oloc = shallow_copy_rtx (oloc);
    5748                 :        345 :               PAT_VAR_LOCATION_LOC (oloc) = gen_rtx_UNKNOWN_VAR_LOC ();
    5749                 :            :             }
    5750                 :            : 
    5751                 :   21666100 :           mo.u.loc = oloc;
    5752                 :            :         }
    5753                 :   25392100 :       else if (type == MO_VAL_USE)
    5754                 :            :         {
    5755                 :   10581000 :           machine_mode mode2 = VOIDmode;
    5756                 :   10581000 :           enum micro_operation_type type2;
    5757                 :   10581000 :           cselib_val *val = find_use_val (loc, GET_MODE (loc), cui);
    5758                 :   10581000 :           rtx vloc, oloc = loc, nloc;
    5759                 :            : 
    5760                 :   10581000 :           gcc_assert (cui->sets);
    5761                 :            : 
    5762                 :   10581000 :           if (MEM_P (oloc)
    5763                 :    5429030 :               && !REG_P (XEXP (oloc, 0))
    5764                 :    4731230 :               && !MEM_P (XEXP (oloc, 0)))
    5765                 :            :             {
    5766                 :    4730640 :               rtx mloc = oloc;
    5767                 :    4730640 :               machine_mode address_mode = get_address_mode (mloc);
    5768                 :    4730640 :               cselib_val *val
    5769                 :    9461290 :                 = cselib_lookup (XEXP (mloc, 0), address_mode, 0,
    5770                 :    4730640 :                                  GET_MODE (mloc));
    5771                 :            : 
    5772                 :    4730640 :               if (val && !cselib_preserved_value_p (val))
    5773                 :    1993600 :                 preserve_value (val);
    5774                 :            :             }
    5775                 :            : 
    5776                 :   10581000 :           type2 = use_type (loc, 0, &mode2);
    5777                 :            : 
    5778                 :   10581000 :           gcc_assert (type2 == MO_USE || type2 == MO_USE_NO_VAR
    5779                 :            :                       || type2 == MO_CLOBBER);
    5780                 :            : 
    5781                 :   10581000 :           if (type2 == MO_USE)
    5782                 :     142777 :             vloc = var_lowpart (mode2, loc);
    5783                 :            :           else
    5784                 :            :             vloc = oloc;
    5785                 :            : 
    5786                 :            :           /* The loc of a MO_VAL_USE may have two forms:
    5787                 :            : 
    5788                 :            :              (concat val src): val is at src, a value-based
    5789                 :            :              representation.
    5790                 :            : 
    5791                 :            :              (concat (concat val use) src): same as above, with use as
    5792                 :            :              the MO_USE tracked value, if it differs from src.
    5793                 :            : 
    5794                 :            :           */
    5795                 :            : 
    5796                 :   10581000 :           gcc_checking_assert (REG_P (loc) || MEM_P (loc));
    5797                 :   10581000 :           nloc = replace_expr_with_values (loc);
    5798                 :   10581000 :           if (!nloc)
    5799                 :    5151940 :             nloc = oloc;
    5800                 :            : 
    5801                 :   10581000 :           if (vloc != nloc)
    5802                 :    5429040 :             oloc = gen_rtx_CONCAT (mode2, val->val_rtx, vloc);
    5803                 :            :           else
    5804                 :    5151930 :             oloc = val->val_rtx;
    5805                 :            : 
    5806                 :   10581000 :           mo.u.loc = gen_rtx_CONCAT (mode, oloc, nloc);
    5807                 :            : 
    5808                 :   10581000 :           if (type2 == MO_USE)
    5809                 :     142777 :             VAL_HOLDS_TRACK_EXPR (mo.u.loc) = 1;
    5810                 :   10581000 :           if (!cselib_preserved_value_p (val))
    5811                 :            :             {
    5812                 :   10581000 :               VAL_NEEDS_RESOLUTION (mo.u.loc) = 1;
    5813                 :   21161900 :               preserve_value (val);
    5814                 :            :             }
    5815                 :            :         }
    5816                 :            :       else
    5817                 :   14811100 :         gcc_assert (type == MO_USE || type == MO_USE_NO_VAR);
    5818                 :            : 
    5819                 :   47058200 :       if (dump_file && (dump_flags & TDF_DETAILS))
    5820                 :          5 :         log_op_type (mo.u.loc, cui->bb, cui->insn, mo.type, dump_file);
    5821                 :   47058200 :       VTI (bb)->mos.safe_push (mo);
    5822                 :            :     }
    5823                 :  168531000 : }
    5824                 :            : 
    5825                 :            : /* Helper function for finding all uses of REG/MEM in X in insn INSN.  */
    5826                 :            : 
    5827                 :            : static void
    5828                 :   61182300 : add_uses_1 (rtx *x, void *cui)
    5829                 :            : {
    5830                 :   61182300 :   subrtx_var_iterator::array_type array;
    5831                 :  229713000 :   FOR_EACH_SUBRTX_VAR (iter, array, *x, NONCONST)
    5832                 :  168531000 :     add_uses (*iter, (struct count_use_info *) cui);
    5833                 :   61182300 : }
    5834                 :            : 
    5835                 :            : /* This is the value used during expansion of locations.  We want it
    5836                 :            :    to be unbounded, so that variables expanded deep in a recursion
    5837                 :            :    nest are fully evaluated, so that their values are cached
    5838                 :            :    correctly.  We avoid recursion cycles through other means, and we
    5839                 :            :    don't unshare RTL, so excess complexity is not a problem.  */
    5840                 :            : #define EXPR_DEPTH (INT_MAX)
    5841                 :            : /* We use this to keep too-complex expressions from being emitted as
    5842                 :            :    location notes, and then to debug information.  Users can trade
    5843                 :            :    compile time for ridiculously complex expressions, although they're
    5844                 :            :    seldom useful, and they may often have to be discarded as not
    5845                 :            :    representable anyway.  */
    5846                 :            : #define EXPR_USE_DEPTH (param_max_vartrack_expr_depth)
    5847                 :            : 
    5848                 :            : /* Attempt to reverse the EXPR operation in the debug info and record
    5849                 :            :    it in the cselib table.  Say for reg1 = reg2 + 6 even when reg2 is
    5850                 :            :    no longer live we can express its value as VAL - 6.  */
    5851                 :            : 
    5852                 :            : static void
    5853                 :   25551400 : reverse_op (rtx val, const_rtx expr, rtx_insn *insn)
    5854                 :            : {
    5855                 :   25551400 :   rtx src, arg, ret;
    5856                 :   25551400 :   cselib_val *v;
    5857                 :   25551400 :   struct elt_loc_list *l;
    5858                 :   25551400 :   enum rtx_code code;
    5859                 :   25551400 :   int count;
    5860                 :            : 
    5861                 :   25551400 :   if (GET_CODE (expr) != SET)
    5862                 :            :     return;
    5863                 :            : 
    5864                 :   25551400 :   if (!REG_P (SET_DEST (expr)) || GET_MODE (val) != GET_MODE (SET_DEST (expr)))
    5865                 :            :     return;
    5866                 :            : 
    5867                 :   18908900 :   src = SET_SRC (expr);
    5868                 :   18908900 :   switch (GET_CODE (src))
    5869                 :            :     {
    5870                 :    6957750 :     case PLUS:
    5871                 :    6957750 :     case MINUS:
    5872                 :    6957750 :     case XOR:
    5873                 :    6957750 :     case NOT:
    5874                 :    6957750 :     case NEG:
    5875                 :    6957750 :       if (!REG_P (XEXP (src, 0)))
    5876                 :            :         return;
    5877                 :            :       break;
    5878                 :     124411 :     case SIGN_EXTEND:
    5879                 :     124411 :     case ZERO_EXTEND:
    5880                 :     124411 :       if (!REG_P (XEXP (src, 0)) && !MEM_P (XEXP (src, 0)))
    5881                 :            :         return;
    5882                 :            :       break;
    5883                 :            :     default:
    5884                 :            :       return;
    5885                 :            :     }
    5886                 :            : 
    5887                 :    6914960 :   if (!SCALAR_INT_MODE_P (GET_MODE (src)) || XEXP (src, 0) == cfa_base_rtx)
    5888                 :            :     return;
    5889                 :            : 
    5890                 :    2240070 :   v = cselib_lookup (XEXP (src, 0), GET_MODE (XEXP (src, 0)), 0, VOIDmode);
    5891                 :    2240070 :   if (!v || !cselib_preserved_value_p (v))
    5892                 :          0 :     return;
    5893                 :            : 
    5894                 :            :   /* Use canonical V to avoid creating multiple redundant expressions
    5895                 :            :      for different VALUES equivalent to V.  */
    5896                 :    2240070 :   v = canonical_cselib_val (v);
    5897                 :            : 
    5898                 :            :   /* Adding a reverse op isn't useful if V already has an always valid
    5899                 :            :      location.  Ignore ENTRY_VALUE, while it is always constant, we should
    5900                 :            :      prefer non-ENTRY_VALUE locations whenever possible.  */
    5901                 :    6499730 :   for (l = v->locs, count = 0; l; l = l->next, count++)
    5902                 :    4279600 :     if (CONSTANT_P (l->loc)
    5903                 :    4279600 :         && (GET_CODE (l->loc) != CONST || !references_value_p (l->loc, 0)))
    5904                 :      18654 :       return;
    5905                 :            :     /* Avoid creating too large locs lists.  */
    5906                 :    4260950 :     else if (count == param_max_vartrack_reverse_op_size)
    5907                 :            :       return;
    5908                 :            : 
    5909                 :    2220120 :   switch (GET_CODE (src))
    5910                 :            :     {
    5911                 :      20942 :     case NOT:
    5912                 :      20942 :     case NEG:
    5913                 :      20942 :       if (GET_MODE (v->val_rtx) != GET_MODE (val))
    5914                 :            :         return;
    5915                 :      20942 :       ret = gen_rtx_fmt_e (GET_CODE (src), GET_MODE (val), val);
    5916                 :      20942 :       break;
    5917                 :     114137 :     case SIGN_EXTEND:
    5918                 :     114137 :     case ZERO_EXTEND:
    5919                 :     114137 :       ret = gen_lowpart_SUBREG (GET_MODE (v->val_rtx), val);
    5920                 :     114137 :       break;
    5921                 :      23882 :     case XOR:
    5922                 :      23882 :       code = XOR;
    5923                 :      23882 :       goto binary;
    5924                 :    1909750 :     case PLUS:
    5925                 :    1909750 :       code = MINUS;
    5926                 :    1909750 :       goto binary;
    5927                 :     151415 :     case MINUS:
    5928                 :     151415 :       code = PLUS;
    5929                 :     151415 :       goto binary;
    5930                 :    2085050 :     binary:
    5931                 :    2085050 :       if (GET_MODE (v->val_rtx) != GET_MODE (val))
    5932                 :            :         return;
    5933                 :    2085050 :       arg = XEXP (src, 1);
    5934                 :    2085050 :       if (!CONST_INT_P (arg) && GET_CODE (arg) != SYMBOL_REF)
    5935                 :            :         {
    5936                 :     454088 :           arg = cselib_expand_value_rtx (arg, scratch_regs, 5);
    5937                 :     454088 :           if (arg == NULL_RTX)
    5938                 :            :             return;
    5939                 :     454088 :           if (!CONST_INT_P (arg) && GET_CODE (arg) != SYMBOL_REF)
    5940                 :            :             return;
    5941                 :            :         }
    5942                 :    1634110 :       ret = simplify_gen_binary (code, GET_MODE (val), val, arg);
    5943                 :    1634110 :       break;
    5944                 :          0 :     default:
    5945                 :          0 :       gcc_unreachable ();
    5946                 :            :     }
    5947                 :            : 
    5948                 :    1769190 :   cselib_add_permanent_equiv (v, ret, insn);
    5949                 :            : }
    5950                 :            : 
    5951                 :            : /* Add stores (register and memory references) LOC which will be tracked
    5952                 :            :    to VTI (bb)->mos.  EXPR is the RTL expression containing the store.
    5953                 :            :    CUIP->insn is instruction which the LOC is part of.  */
    5954                 :            : 
    5955                 :            : static void
    5956                 :   33203400 : add_stores (rtx loc, const_rtx expr, void *cuip)
    5957                 :            : {
    5958                 :   33203400 :   machine_mode mode = VOIDmode, mode2;
    5959                 :   33203400 :   struct count_use_info *cui = (struct count_use_info *)cuip;
    5960                 :   33203400 :   basic_block bb = cui->bb;
    5961                 :   33203400 :   micro_operation mo;
    5962                 :   33203400 :   rtx oloc = loc, nloc, src = NULL;
    5963                 :   33203400 :   enum micro_operation_type type = use_type (loc, cui, &mode);
    5964                 :   33203400 :   bool track_p = false;
    5965                 :   33203400 :   cselib_val *v;
    5966                 :   33203400 :   bool resolve, preserve;
    5967                 :            : 
    5968                 :   33203400 :   if (type == MO_CLOBBER)
    5969                 :    3569840 :     return;
    5970                 :            : 
    5971                 :   29633600 :   mode2 = mode;
    5972                 :            : 
    5973                 :   29633600 :   if (REG_P (loc))
    5974                 :            :     {
    5975                 :   23003000 :       gcc_assert (loc != cfa_base_rtx);
    5976                 :    3096120 :       if ((GET_CODE (expr) == CLOBBER && type != MO_VAL_SET)
    5977                 :   23002900 :           || !(track_p = use_type (loc, NULL, &mode2) == MO_USE)
    5978                 :   23114300 :           || GET_CODE (expr) == CLOBBER)
    5979                 :            :         {
    5980                 :   22891800 :           mo.type = MO_CLOBBER;
    5981                 :   22891800 :           mo.u.loc = loc;
    5982                 :   22891800 :           if (GET_CODE (expr) == SET
    5983                 :   19795700 :               && (SET_DEST (expr) == loc
    5984                 :      19784 :                   || (GET_CODE (SET_DEST (expr)) == STRICT_LOW_PART
    5985                 :      11853 :                       && XEXP (SET_DEST (expr), 0) == loc))
    5986                 :   19787700 :               && !unsuitable_loc (SET_SRC (expr))
    5987                 :   42673600 :               && find_use_val (loc, mode, cui))
    5988                 :            :             {
    5989                 :   18859200 :               gcc_checking_assert (type == MO_VAL_SET);
    5990                 :   18859200 :               mo.u.loc = gen_rtx_SET (loc, SET_SRC (expr));
    5991                 :            :             }
    5992                 :            :         }
    5993                 :            :       else
    5994                 :            :         {
    5995                 :     111196 :           if (GET_CODE (expr) == SET
    5996                 :     111196 :               && SET_DEST (expr) == loc
    5997                 :     110978 :               && GET_CODE (SET_SRC (expr)) != ASM_OPERANDS)
    5998                 :     110976 :             src = var_lowpart (mode2, SET_SRC (expr));
    5999                 :     111196 :           loc = var_lowpart (mode2, loc);
    6000                 :            : 
    6001                 :     111196 :           if (src == NULL)
    6002                 :            :             {
    6003                 :       4240 :               mo.type = MO_SET;
    6004                 :       4240 :               mo.u.loc = loc;
    6005                 :            :             }
    6006                 :            :           else
    6007                 :            :             {
    6008                 :     106956 :               rtx xexpr = gen_rtx_SET (loc, src);
    6009                 :     106956 :               if (same_variable_part_p (src, REG_EXPR (loc), REG_OFFSET (loc)))
    6010                 :            :                 {
    6011                 :            :                   /* If this is an instruction copying (part of) a parameter
    6012                 :            :                      passed by invisible reference to its register location,
    6013                 :            :                      pretend it's a SET so that the initial memory location
    6014                 :            :                      is discarded, as the parameter register can be reused
    6015                 :            :                      for other purposes and we do not track locations based
    6016                 :            :                      on generic registers.  */
    6017                 :      11572 :                   if (MEM_P (src)
    6018                 :      10280 :                       && REG_EXPR (loc)
    6019                 :      10280 :                       && TREE_CODE (REG_EXPR (loc)) == PARM_DECL
    6020                 :      10278 :                       && DECL_MODE (REG_EXPR (loc)) != BLKmode
    6021                 :      10278 :                       && MEM_P (DECL_INCOMING_RTL (REG_EXPR (loc)))
    6022                 :      11572 :                       && XEXP (DECL_INCOMING_RTL (REG_EXPR (loc)), 0)
    6023                 :      10166 :                          != arg_pointer_rtx)
    6024                 :       7155 :                     mo.type = MO_SET;
    6025                 :            :                   else
    6026                 :       4417 :                     mo.type = MO_COPY;
    6027                 :            :                 }
    6028                 :            :               else
    6029                 :      95384 :                 mo.type = MO_SET;
    6030                 :     106956 :               mo.u.loc = xexpr;
    6031                 :            :             }
    6032                 :            :         }
    6033                 :   23003000 :       mo.insn = cui->insn;
    6034                 :            :     }
    6035                 :    6630600 :   else if (MEM_P (loc)
    6036                 :    6630600 :            && ((track_p = use_type (loc, NULL, &mode2) == MO_USE)
    6037                 :    6627520 :                || cui->sets))
    6038                 :            :     {
    6039                 :    6630600 :       if (MEM_P (loc) && type == MO_VAL_SET
    6040                 :    6630590 :           && !REG_P (XEXP (loc, 0))
    6041                 :    6219270 :           && !MEM_P (XEXP (loc, 0)))
    6042                 :            :         {
    6043                 :    6219270 :           rtx mloc = loc;
    6044                 :    6219270 :           machine_mode address_mode = get_address_mode (mloc);
    6045                 :   12438500 :           cselib_val *val = cselib_lookup (XEXP (mloc, 0),
    6046                 :            :                                            address_mode, 0,
    6047                 :    6219270 :                                            GET_MODE (mloc));
    6048                 :            : 
    6049                 :    6219270 :           if (val && !cselib_preserved_value_p (val))
    6050                 :    2615080 :             preserve_value (val);
    6051                 :            :         }
    6052                 :            : 
    6053                 :    6630600 :       if (GET_CODE (expr) == CLOBBER || !track_p)
    6054                 :            :         {
    6055                 :    6627540 :           mo.type = MO_CLOBBER;
    6056                 :    6627540 :           mo.u.loc = track_p ? var_lowpart (mode2, loc) : loc;
    6057                 :            :         }
    6058                 :            :       else
    6059                 :            :         {
    6060                 :       3065 :           if (GET_CODE (expr) == SET
    6061                 :       3065 :               && SET_DEST (expr) == loc
    6062                 :       3065 :               && GET_CODE (SET_SRC (expr)) != ASM_OPERANDS)
    6063                 :       3065 :             src = var_lowpart (mode2, SET_SRC (expr));
    6064                 :       3065 :           loc = var_lowpart (mode2, loc);
    6065                 :            : 
    6066                 :       3065 :           if (src == NULL)
    6067                 :            :             {
    6068                 :         14 :               mo.type = MO_SET;
    6069                 :         14 :               mo.u.loc = loc;
    6070                 :            :             }
    6071                 :            :           else
    6072                 :            :             {
    6073                 :       3051 :               rtx xexpr = gen_rtx_SET (loc, src);
    6074                 :       6102 :               if (same_variable_part_p (SET_SRC (xexpr),
    6075                 :       3051 :                                         MEM_EXPR (loc),
    6076                 :       3051 :                                         int_mem_offset (loc)))
    6077                 :        638 :                 mo.type = MO_COPY;
    6078                 :            :               else
    6079                 :       2413 :                 mo.type = MO_SET;
    6080                 :       3051 :               mo.u.loc = xexpr;
    6081                 :            :             }
    6082                 :            :         }
    6083                 :    6630600 :       mo.insn = cui->insn;
    6084                 :            :     }
    6085                 :            :   else
    6086                 :          0 :     return;
    6087                 :            : 
    6088                 :   29633600 :   if (type != MO_VAL_SET)
    6089                 :        369 :     goto log_and_return;
    6090                 :            : 
    6091                 :   29633200 :   v = find_use_val (oloc, mode, cui);
    6092                 :            : 
    6093                 :   29633200 :   if (!v)
    6094                 :    4029420 :     goto log_and_return;
    6095                 :            : 
    6096                 :   25603800 :   resolve = preserve = !cselib_preserved_value_p (v);
    6097                 :            : 
    6098                 :            :   /* We cannot track values for multiple-part variables, so we track only
    6099                 :            :      locations for tracked record parameters.  */
    6100                 :   25603800 :   if (track_p
    6101                 :     114190 :       && REG_P (loc)
    6102                 :     111125 :       && REG_EXPR (loc)
    6103                 :   25714900 :       && tracked_record_parameter_p (REG_EXPR (loc)))
    6104                 :            :     {
    6105                 :            :       /* Although we don't use the value here, it could be used later by the
    6106                 :            :          mere virtue of its existence as the operand of the reverse operation
    6107                 :            :          that gave rise to it (typically extension/truncation).  Make sure it
    6108                 :            :          is preserved as required by vt_expand_var_loc_chain.  */
    6109                 :      52387 :       if (preserve)
    6110                 :       1142 :         preserve_value (v);
    6111                 :      52387 :       goto log_and_return;
    6112                 :            :     }
    6113                 :            : 
    6114                 :   25551400 :   if (loc == stack_pointer_rtx
    6115                 :    4844460 :       && (maybe_ne (hard_frame_pointer_adjustment, -1)
    6116                 :    4685240 :           || (!frame_pointer_needed && !ACCUMULATE_OUTGOING_ARGS))
    6117                 :   29707100 :       && preserve)
    6118                 :    1385290 :     cselib_set_value_sp_based (v);
    6119                 :            : 
    6120                 :   25551400 :   nloc = replace_expr_with_values (oloc);
    6121                 :   25551400 :   if (nloc)
    6122                 :    6630590 :     oloc = nloc;
    6123                 :            : 
    6124                 :   25551400 :   if (GET_CODE (PATTERN (cui->insn)) == COND_EXEC)
    6125                 :            :     {
    6126                 :          0 :       cselib_val *oval = cselib_lookup (oloc, GET_MODE (oloc), 0, VOIDmode);
    6127                 :            : 
    6128                 :          0 :       if (oval == v)
    6129                 :            :         return;
    6130                 :          0 :       gcc_assert (REG_P (oloc) || MEM_P (oloc));
    6131                 :            : 
    6132                 :          0 :       if (oval && !cselib_preserved_value_p (oval))
    6133                 :            :         {
    6134                 :          0 :           micro_operation moa;
    6135                 :            : 
    6136                 :          0 :           preserve_value (oval);
    6137                 :            : 
    6138                 :          0 :           moa.type = MO_VAL_USE;
    6139                 :          0 :           moa.u.loc = gen_rtx_CONCAT (mode, oval->val_rtx, oloc);
    6140                 :          0 :           VAL_NEEDS_RESOLUTION (moa.u.loc) = 1;
    6141                 :          0 :           moa.insn = cui->insn;
    6142                 :            : 
    6143                 :          0 :           if (dump_file && (dump_flags & TDF_DETAILS))
    6144                 :          0 :             log_op_type (moa.u.loc, cui->bb, cui->insn,
    6145                 :            :                          moa.type, dump_file);
    6146                 :          0 :           VTI (bb)->mos.safe_push (moa);
    6147                 :            :         }
    6148                 :            : 
    6149                 :            :       resolve = false;
    6150                 :            :     }
    6151                 :   25551400 :   else if (resolve && GET_CODE (mo.u.loc) == SET)
    6152                 :            :     {
    6153                 :    7668010 :       if (REG_P (SET_SRC (expr)) || MEM_P (SET_SRC (expr)))
    6154                 :          0 :         nloc = replace_expr_with_values (SET_SRC (expr));
    6155                 :            :       else
    6156                 :            :         nloc = NULL_RTX;
    6157                 :            : 
    6158                 :            :       /* Avoid the mode mismatch between oexpr and expr.  */
    6159                 :    7668010 :       if (!nloc && mode != mode2)
    6160                 :            :         {
    6161                 :          0 :           nloc = SET_SRC (expr);
    6162                 :          0 :           gcc_assert (oloc == SET_DEST (expr));
    6163                 :            :         }
    6164                 :            : 
    6165                 :    7668010 :       if (nloc && nloc != SET_SRC (mo.u.loc))
    6166                 :          0 :         oloc = gen_rtx_SET (oloc, nloc);
    6167                 :            :       else
    6168                 :            :         {
    6169                 :    7668010 :           if (oloc == SET_DEST (mo.u.loc))
    6170                 :            :             /* No point in duplicating.  */
    6171                 :    7668000 :             oloc = mo.u.loc;
    6172                 :    7668010 :           if (!REG_P (SET_SRC (mo.u.loc)))
    6173                 :    7668010 :             resolve = false;
    6174                 :            :         }
    6175                 :            :     }
    6176                 :   17883400 :   else if (!resolve)
    6177                 :            :     {
    6178                 :   17097500 :       if (GET_CODE (mo.u.loc) == SET
    6179                 :   11248900 :           && oloc == SET_DEST (mo.u.loc))
    6180                 :            :         /* No point in duplicating.  */
    6181                 :   11245800 :         oloc = mo.u.loc;
    6182                 :            :     }
    6183                 :            :   else
    6184                 :            :     resolve = false;
    6185                 :            : 
    6186                 :   25551400 :   loc = gen_rtx_CONCAT (mode, v->val_rtx, oloc);
    6187                 :            : 
    6188                 :   25551400 :   if (mo.u.loc != oloc)
    6189                 :    6630600 :     loc = gen_rtx_CONCAT (GET_MODE (mo.u.loc), loc, mo.u.loc);
    6190                 :            : 
    6191                 :            :   /* The loc of a MO_VAL_SET may have various forms:
    6192                 :            : 
    6193                 :            :      (concat val dst): dst now holds val
    6194                 :            : 
    6195                 :            :      (concat val (set dst src)): dst now holds val, copied from src
    6196                 :            : 
    6197                 :            :      (concat (concat val dstv) dst): dst now holds val; dstv is dst
    6198                 :            :      after replacing mems and non-top-level regs with values.
    6199                 :            : 
    6200                 :            :      (concat (concat val dstv) (set dst src)): dst now holds val,
    6201                 :            :      copied from src.  dstv is a value-based representation of dst, if
    6202                 :            :      it differs from dst.  If resolution is needed, src is a REG, and
    6203                 :            :      its mode is the same as that of val.
    6204                 :            : 
    6205                 :            :      (concat (concat val (set dstv srcv)) (set dst src)): src
    6206                 :            :      copied to dst, holding val.  dstv and srcv are value-based
    6207                 :            :      representations of dst and src, respectively.
    6208                 :            : 
    6209                 :            :   */
    6210                 :            : 
    6211                 :   25551400 :   if (GET_CODE (PATTERN (cui->insn)) != COND_EXEC)
    6212                 :   25551400 :     reverse_op (v->val_rtx, expr, cui->insn);
    6213                 :            : 
    6214                 :   25551400 :   mo.u.loc = loc;
    6215                 :            : 
    6216                 :   25551400 :   if (track_p)
    6217                 :      61803 :     VAL_HOLDS_TRACK_EXPR (loc) = 1;
    6218                 :   25551400 :   if (preserve)
    6219                 :            :     {
    6220                 :    8453900 :       VAL_NEEDS_RESOLUTION (loc) = resolve;
    6221                 :    8453900 :       preserve_value (v);
    6222                 :            :     }
    6223                 :   25551400 :   if (mo.type == MO_CLOBBER)
    6224                 :   25489600 :     VAL_EXPR_IS_CLOBBERED (loc) = 1;
    6225                 :   25551400 :   if (mo.type == MO_COPY)
    6226                 :       1117 :     VAL_EXPR_IS_COPIED (loc) = 1;
    6227                 :            : 
    6228                 :   25551400 :   mo.type = MO_VAL_SET;
    6229                 :            : 
    6230                 :   29633600 :  log_and_return:
    6231                 :   29633600 :   if (dump_file && (dump_flags & TDF_DETAILS))
    6232                 :         11 :     log_op_type (mo.u.loc, cui->bb, cui->insn, mo.type, dump_file);
    6233                 :   29633600 :   VTI (bb)->mos.safe_push (mo);
    6234                 :            : }
    6235                 :            : 
    6236                 :            : /* Arguments to the call.  */
    6237                 :            : static rtx call_arguments;
    6238                 :            : 
    6239                 :            : /* Compute call_arguments.  */
    6240                 :            : 
    6241                 :            : static void
    6242                 :    2290490 : prepare_call_arguments (basic_block bb, rtx_insn *insn)
    6243                 :            : {
    6244                 :    2290490 :   rtx link, x, call;
    6245                 :    2290490 :   rtx prev, cur, next;
    6246                 :    2290490 :   rtx this_arg = NULL_RTX;
    6247                 :    2290490 :   tree type = NULL_TREE, t, fndecl = NULL_TREE;
    6248                 :    2290490 :   tree obj_type_ref = NULL_TREE;
    6249                 :    2290490 :   CUMULATIVE_ARGS args_so_far_v;
    6250                 :    2290490 :   cumulative_args_t args_so_far;
    6251                 :            : 
    6252                 :    2290490 :   memset (&args_so_far_v, 0, sizeof (args_so_far_v));
    6253                 :    2290490 :   args_so_far = pack_cumulative_args (&args_so_far_v);
    6254                 :    2290490 :   call = get_call_rtx_from (insn);
    6255                 :    2290490 :   if (call)
    6256                 :            :     {
    6257                 :    2290490 :       if (GET_CODE (XEXP (XEXP (call, 0), 0)) == SYMBOL_REF)
    6258                 :            :         {
    6259                 :    2196840 :           rtx symbol = XEXP (XEXP (call, 0), 0);
    6260                 :    2196840 :           if (SYMBOL_REF_DECL (symbol))
    6261                 :    2032140 :             fndecl = SYMBOL_REF_DECL (symbol);
    6262                 :            :         }
    6263                 :    2032140 :       if (fndecl == NULL_TREE)
    6264                 :     425884 :         fndecl = MEM_EXPR (XEXP (call, 0));
    6265                 :    2290490 :       if (fndecl
    6266                 :    2122960 :           && TREE_CODE (TREE_TYPE (fndecl)) != FUNCTION_TYPE
    6267                 :    2636230 :           && TREE_CODE (TREE_TYPE (fndecl)) != METHOD_TYPE)
    6268                 :            :         fndecl = NULL_TREE;
    6269                 :    4759180 :       if (fndecl && TYPE_ARG_TYPES (TREE_TYPE (fndecl)))
    6270                 :    2290490 :         type = TREE_TYPE (fndecl);
    6271                 :    2290490 :       if (fndecl && TREE_CODE (fndecl) != FUNCTION_DECL)
    6272                 :            :         {
    6273                 :      90814 :           if (TREE_CODE (fndecl) == INDIRECT_REF
    6274                 :      90814 :               && TREE_CODE (TREE_OPERAND (fndecl, 0)) == OBJ_TYPE_REF)
    6275                 :          0 :             obj_type_ref = TREE_OPERAND (fndecl, 0);
    6276                 :            :           fndecl = NULL_TREE;
    6277                 :            :         }
    6278                 :    2290490 :       if (type)
    6279                 :            :         {
    6280                 :    9924100 :           for (t = TYPE_ARG_TYPES (type); t && t != void_list_node;
    6281                 :    3745580 :                t = TREE_CHAIN (t))
    6282                 :    3764750 :             if (TREE_CODE (TREE_VALUE (t)) == REFERENCE_TYPE
    6283                 :    3764750 :                 && INTEGRAL_TYPE_P (TREE_TYPE (TREE_VALUE (t))))
    6284                 :            :               break;
    6285                 :    2087220 :           if ((t == NULL || t == void_list_node) && obj_type_ref == NULL_TREE)
    6286                 :            :             type = NULL;
    6287                 :            :           else
    6288                 :            :             {
    6289                 :      33995 :               int nargs ATTRIBUTE_UNUSED = list_length (TYPE_ARG_TYPES (type));
    6290                 :      19175 :               link = CALL_INSN_FUNCTION_USAGE (insn);
    6291                 :            : #ifndef PCC_STATIC_STRUCT_RETURN
    6292                 :      19175 :               if (aggregate_value_p (TREE_TYPE (type), type)
    6293                 :      19175 :                   && targetm.calls.struct_value_rtx (type, 0) == 0)
    6294                 :            :                 {
    6295                 :        359 :                   tree struct_addr = build_pointer_type (TREE_TYPE (type));
    6296                 :        359 :                   function_arg_info arg (struct_addr, /*named=*/true);
    6297                 :        359 :                   rtx reg;
    6298                 :        359 :                   INIT_CUMULATIVE_ARGS (args_so_far_v, type, NULL_RTX, fndecl,
    6299                 :            :                                         nargs + 1);
    6300                 :        359 :                   reg = targetm.calls.function_arg (args_so_far, arg);
    6301                 :        359 :                   targetm.calls.function_arg_advance (args_so_far, arg);
    6302                 :        359 :                   if (reg == NULL_RTX)
    6303                 :            :                     {
    6304                 :        456 :                       for (; link; link = XEXP (link, 1))
    6305                 :        168 :                         if (GET_CODE (XEXP (link, 0)) == USE
    6306                 :        168 :                             && MEM_P (XEXP (XEXP (link, 0), 0)))
    6307                 :            :                           {
    6308                 :          0 :                             link = XEXP (link, 1);
    6309                 :          0 :                             break;
    6310                 :            :                           }
    6311                 :            :                     }
    6312                 :            :                 }
    6313                 :            :               else
    6314                 :            : #endif
    6315                 :      18816 :                 INIT_CUMULATIVE_ARGS (args_so_far_v, type, NULL_RTX, fndecl,
    6316                 :            :                                       nargs);
    6317                 :      19175 :               if (obj_type_ref && TYPE_ARG_TYPES (type) != void_list_node)
    6318                 :            :                 {
    6319                 :          0 :                   t = TYPE_ARG_TYPES (type);
    6320                 :          0 :                   function_arg_info arg (TREE_VALUE (t), /*named=*/true);
    6321                 :          0 :                   this_arg = targetm.calls.function_arg (args_so_far, arg);
    6322                 :          0 :                   if (this_arg && !REG_P (this_arg))
    6323                 :            :                     this_arg = NULL_RTX;
    6324                 :          0 :                   else if (this_arg == NULL_RTX)
    6325                 :            :                     {
    6326                 :          0 :                       for (; link; link = XEXP (link, 1))
    6327                 :          0 :                         if (GET_CODE (XEXP (link, 0)) == USE
    6328                 :          0 :                             && MEM_P (XEXP (XEXP (link, 0), 0)))
    6329                 :            :                           {
    6330                 :            :                             this_arg = XEXP (XEXP (link, 0), 0);
    6331                 :            :                             break;
    6332                 :            :                           }
    6333                 :            :                     }
    6334                 :            :                 }
    6335                 :            :             }
    6336                 :            :         }
    6337                 :            :     }
    6338                 :    2309670 :   t = type ? TYPE_ARG_TYPES (type) : NULL_TREE;
    6339                 :            : 
    6340                 :    5636320 :   for (link = CALL_INSN_FUNCTION_USAGE (insn); link; link = XEXP (link, 1))
    6341                 :    3345830 :     if (GET_CODE (XEXP (link, 0)) == USE)
    6342                 :            :       {
    6343                 :    3329900 :         rtx item = NULL_RTX;
    6344                 :    3329900 :         x = XEXP (XEXP (link, 0), 0);
    6345                 :    3329900 :         if (GET_MODE (link) == VOIDmode
    6346                 :    2673810 :             || GET_MODE (link) == BLKmode
    6347                 :    2673770 :             || (GET_MODE (link) != GET_MODE (x)
    6348                 :          2 :                 && ((GET_MODE_CLASS (GET_MODE (link)) != MODE_INT
    6349                 :          2 :                      && GET_MODE_CLASS (GET_MODE (link)) != MODE_PARTIAL_INT)
    6350                 :          2 :                     || (GET_MODE_CLASS (GET_MODE (x)) != MODE_INT
    6351                 :          2 :                         && GET_MODE_CLASS (GET_MODE (x)) != MODE_PARTIAL_INT))))
    6352                 :            :           /* Can't do anything for these, if the original type mode
    6353                 :            :              isn't known or can't be converted.  */;
    6354                 :    2673770 :         else if (REG_P (x))
    6355                 :            :           {
    6356                 :    2665420 :             cselib_val *val = cselib_lookup (x, GET_MODE (x), 0, VOIDmode);
    6357                 :    2665420 :             scalar_int_mode mode;
    6358                 :    2665420 :             if (val && cselib_preserved_value_p (val))
    6359                 :    2443600 :               item = val->val_rtx;
    6360                 :     221822 :             else if (is_a <scalar_int_mode> (GET_MODE (x), &mode))
    6361                 :            :               {
    6362                 :     219413 :                 opt_scalar_int_mode mode_iter;
    6363                 :     264724 :                 FOR_EACH_WIDER_MODE (mode_iter, mode)
    6364                 :            :                   {
    6365                 :     264724 :                     mode = mode_iter.require ();
    6366                 :     532220 :                     if (GET_MODE_BITSIZE (mode) > BITS_PER_WORD)
    6367                 :            :                       break;
    6368                 :            : 
    6369                 :      88189 :                     rtx reg = simplify_subreg (mode, x, GET_MODE (x), 0);
    6370                 :      88189 :                     if (reg == NULL_RTX || !REG_P (reg))
    6371                 :          0 :                       continue;
    6372                 :      88189 :                     val = cselib_lookup (reg, mode, 0, VOIDmode);
    6373                 :      88189 :                     if (val && cselib_preserved_value_p (val))
    6374                 :            :                       {
    6375                 :      42878 :                         item = val->val_rtx;
    6376                 :      42878 :                         break;
    6377                 :            :                       }
    6378                 :            :                   }
    6379                 :            :               }
    6380                 :            :           }
    6381                 :       8349 :         else if (MEM_P (x))
    6382                 :            :           {
    6383                 :       8349 :             rtx mem = x;
    6384                 :       8349 :             cselib_val *val;
    6385                 :            : 
    6386                 :       8349 :             if (!frame_pointer_needed)
    6387                 :            :               {
    6388                 :      16390 :                 class adjust_mem_data amd;
    6389                 :       8195 :                 amd.mem_mode = VOIDmode;
    6390                 :       8195 :                 amd.stack_adjust = -VTI (bb)->out.stack_adjust;
    6391                 :       8195 :                 amd.store = true;
    6392                 :       8195 :                 mem = simplify_replace_fn_rtx (mem, NULL_RTX, adjust_mems,
    6393                 :            :                                                &amd);
    6394                 :       8195 :                 gcc_assert (amd.side_effects.is_empty ());
    6395                 :            :               }
    6396                 :       8349 :             val = cselib_lookup (mem, GET_MODE (mem), 0, VOIDmode);
    6397                 :       8349 :             if (val && cselib_preserved_value_p (val))
    6398                 :       2845 :               item = val->val_rtx;
    6399                 :       5504 :             else if (GET_MODE_CLASS (GET_MODE (mem)) != MODE_INT
    6400                 :       5504 :                      && GET_MODE_CLASS (GET_MODE (mem)) != MODE_PARTIAL_INT)
    6401                 :            :               {
    6402                 :            :                 /* For non-integer stack argument see also if they weren't
    6403                 :            :                    initialized by integers.  */
    6404                 :        148 :                 scalar_int_mode imode;
    6405                 :        148 :                 if (int_mode_for_mode (GET_MODE (mem)).exists (&imode)
    6406                 :        133 :                     && imode != GET_MODE (mem))
    6407                 :            :                   {
    6408                 :        133 :                     val = cselib_lookup (adjust_address_nv (mem, imode, 0),
    6409                 :            :                                          imode, 0, VOIDmode);
    6410                 :        133 :                     if (val && cselib_preserved_value_p (val))
    6411                 :          0 :                       item = lowpart_subreg (GET_MODE (x), val->val_rtx,
    6412                 :            :                                              imode);
    6413                 :            :                   }
    6414                 :            :               }
    6415                 :            :           }
    6416                 :    2665870 :         if (item)
    6417                 :            :           {
    6418                 :    2489320 :             rtx x2 = x;
    6419                 :    2489320 :             if (GET_MODE (item) != GET_MODE (link))
    6420                 :      42880 :               item = lowpart_subreg (GET_MODE (link), item, GET_MODE (item));
    6421                 :    2489320 :             if (GET_MODE (x2) != GET_MODE (link))
    6422                 :          2 :               x2 = lowpart_subreg (GET_MODE (link), x2, GET_MODE (x2));
    6423                 :    2489320 :             item = gen_rtx_CONCAT (GET_MODE (link), x2, item);
    6424                 :    2489320 :             call_arguments
    6425                 :    2489320 :               = gen_rtx_EXPR_LIST (VOIDmode, item, call_arguments);
    6426                 :            :           }
    6427                 :    3329900 :         if (t && t != void_list_node)
    6428                 :            :           {
    6429                 :      59964 :             rtx reg;
    6430                 :      59964 :             function_arg_info arg (TREE_VALUE (t), /*named=*/true);
    6431                 :      59964 :             apply_pass_by_reference_rules (&args_so_far_v, arg);
    6432                 :      59964 :             reg = targetm.calls.function_arg (args_so_far, arg);
    6433                 :      59964 :             if (TREE_CODE (arg.type) == REFERENCE_TYPE
    6434                 :      25058 :                 && INTEGRAL_TYPE_P (TREE_TYPE (arg.type))
    6435                 :      20019 :                 && reg
    6436                 :      18534 :                 && REG_P (reg)
    6437                 :      18534 :                 && GET_MODE (reg) == arg.mode
    6438                 :      18534 :                 && (GET_MODE_CLASS (arg.mode) == MODE_INT
    6439                 :      18534 :                     || GET_MODE_CLASS (arg.mode) == MODE_PARTIAL_INT)
    6440                 :      18534 :                 && REG_P (x)
    6441                 :      18534 :                 && REGNO (x) == REGNO (reg)
    6442                 :      18301 :                 && GET_MODE (x) == arg.mode
    6443                 :      78265 :                 && item)
    6444                 :            :               {
    6445                 :      18111 :                 machine_mode indmode
    6446                 :      18111 :                   = TYPE_MODE (TREE_TYPE (arg.type));
    6447                 :      18111 :                 rtx mem = gen_rtx_MEM (indmode, x);
    6448                 :      18111 :                 cselib_val *val = cselib_lookup (mem, indmode, 0, VOIDmode);
    6449                 :      18111 :                 if (val && cselib_preserved_value_p (val))
    6450                 :            :                   {
    6451                 :       5022 :                     item = gen_rtx_CONCAT (indmode, mem, val->val_rtx);
    6452                 :       5022 :                     call_arguments = gen_rtx_EXPR_LIST (VOIDmode, item,
    6453                 :            :                                                         call_arguments);
    6454                 :            :                   }
    6455                 :            :                 else
    6456                 :            :                   {
    6457                 :      13089 :                     struct elt_loc_list *l;
    6458                 :      13089 :                     tree initial;
    6459                 :            : 
    6460                 :            :                     /* Try harder, when passing address of a constant
    6461                 :            :                        pool integer it can be easily read back.  */
    6462                 :      13089 :                     item = XEXP (item, 1);
    6463                 :      13089 :                     if (GET_CODE (item) == SUBREG)
    6464                 :          0 :                       item = SUBREG_REG (item);
    6465                 :      13089 :                     gcc_assert (GET_CODE (item) == VALUE);
    6466                 :      13089 :                     val = CSELIB_VAL_PTR (item);
    6467                 :      38575 :                     for (l = val->locs; l; l = l->next)
    6468                 :      27610 :                       if (GET_CODE (l->loc) == SYMBOL_REF
    6469                 :       2158 :                           && TREE_CONSTANT_POOL_ADDRESS_P (l->loc)
    6470                 :       2124 :                           && SYMBOL_REF_DECL (l->loc)
    6471                 :      29734 :                           && DECL_INITIAL (SYMBOL_REF_DECL (l->loc)))
    6472                 :            :                         {
    6473                 :       2124 :                           initial = DECL_INITIAL (SYMBOL_REF_DECL (l->loc));
    6474                 :       2124 :                           if (tree_fits_shwi_p (initial))
    6475                 :            :                             {
    6476                 :       2123 :                               item = GEN_INT (tree_to_shwi (initial));
    6477                 :       2123 :                               item = gen_rtx_CONCAT (indmode, mem, item);
    6478                 :       2123 :                               call_arguments
    6479                 :       2123 :                                 = gen_rtx_EXPR_LIST (VOIDmode, item,
    6480                 :            :                                                      call_arguments);
    6481                 :            :                             }
    6482                 :            :                           break;
    6483                 :            :                         }
    6484                 :            :                   }
    6485                 :            :               }
    6486                 :      59964 :             targetm.calls.function_arg_advance (args_so_far, arg);
    6487                 :      59964 :             t = TREE_CHAIN (t);
    6488                 :            :           }
    6489                 :            :       }
    6490                 :            : 
    6491                 :            :   /* Add debug arguments.  */
    6492                 :    2290490 :   if (fndecl
    6493                 :    2032140 :       && TREE_CODE (fndecl) == FUNCTION_DECL
    6494                 :    4322640 :       && DECL_HAS_DEBUG_ARGS_P (fndecl))
    6495                 :            :     {
    6496                 :      34840 :       vec<tree, va_gc> **debug_args = decl_debug_args_lookup (fndecl);
    6497                 :      34840 :       if (debug_args)
    6498                 :            :         {
    6499                 :            :           unsigned int ix;
    6500                 :            :           tree param;
    6501                 :      74791 :           for (ix = 0; vec_safe_iterate (*debug_args, ix, &param); ix += 2)
    6502                 :            :             {
    6503                 :      39951 :               rtx item;
    6504                 :      39951 :               tree dtemp = (**debug_args)[ix + 1];
    6505                 :      39951 :               machine_mode mode = DECL_MODE (dtemp);
    6506                 :      39951 :               item = gen_rtx_DEBUG_PARAMETER_REF (mode, param);
    6507                 :      39951 :               item = gen_rtx_CONCAT (mode, item, DECL_RTL_KNOWN_SET (dtemp));
    6508                 :      39951 :               call_arguments = gen_rtx_EXPR_LIST (VOIDmode, item,
    6509                 :            :                                                   call_arguments);
    6510                 :            :             }
    6511                 :            :         }
    6512                 :            :     }
    6513                 :            : 
    6514                 :            :   /* Reverse call_arguments chain.  */
    6515                 :    2290490 :   prev = NULL_RTX;
    6516                 :    4826910 :   for (cur = call_arguments; cur; cur = next)
    6517                 :            :     {
    6518                 :    2536420 :       next = XEXP (cur, 1);
    6519                 :    2536420 :       XEXP (cur, 1) = prev;
    6520                 :    2536420 :       prev = cur;
    6521                 :            :     }
    6522                 :    2290490 :   call_arguments = prev;
    6523                 :            : 
    6524                 :    2290490 :   x = get_call_rtx_from (insn);
    6525                 :    2290490 :   if (x)
    6526                 :            :     {
    6527                 :    2290490 :       x = XEXP (XEXP (x, 0), 0);
    6528                 :    2290490 :       if (GET_CODE (x) == SYMBOL_REF)
    6529                 :            :         /* Don't record anything.  */;
    6530                 :      93658 :       else if (CONSTANT_P (x))
    6531                 :            :         {
    6532                 :          0 :           x = gen_rtx_CONCAT (GET_MODE (x) == VOIDmode ? Pmode : GET_MODE (x),
    6533                 :            :                               pc_rtx, x);
    6534                 :          0 :           call_arguments
    6535                 :          0 :             = gen_rtx_EXPR_LIST (VOIDmode, x, call_arguments);
    6536                 :            :         }
    6537                 :            :       else
    6538                 :            :         {
    6539                 :      93658 :           cselib_val *val = cselib_lookup (x, GET_MODE (x), 0, VOIDmode);
    6540                 :      93658 :           if (val && cselib_preserved_value_p (val))
    6541                 :            :             {
    6542                 :      36502 :               x = gen_rtx_CONCAT (GET_MODE (x), pc_rtx, val->val_rtx);
    6543                 :      36502 :               call_arguments
    6544                 :      36502 :                 = gen_rtx_EXPR_LIST (VOIDmode, x, call_arguments);
    6545                 :            :             }
    6546                 :            :         }
    6547                 :            :     }
    6548                 :    2290490 :   if (this_arg)
    6549                 :            :     {
    6550                 :          0 :       machine_mode mode
    6551                 :          0 :         = TYPE_MODE (TREE_TYPE (OBJ_TYPE_REF_EXPR (obj_type_ref)));
    6552                 :          0 :       rtx clobbered = gen_rtx_MEM (mode, this_arg);
    6553                 :          0 :       HOST_WIDE_INT token
    6554                 :          0 :         = tree_to_shwi (OBJ_TYPE_REF_TOKEN (obj_type_ref));
    6555                 :          0 :       if (token)
    6556                 :          0 :         clobbered = plus_constant (mode, clobbered,
    6557                 :          0 :                                    token * GET_MODE_SIZE (mode));
    6558                 :          0 :       clobbered = gen_rtx_MEM (mode, clobbered);
    6559                 :          0 :       x = gen_rtx_CONCAT (mode, gen_rtx_CLOBBER (VOIDmode, pc_rtx), clobbered);
    6560                 :          0 :       call_arguments
    6561                 :          0 :         = gen_rtx_EXPR_LIST (VOIDmode, x, call_arguments);
    6562                 :            :     }
    6563                 :    2290490 : }
    6564                 :            : 
    6565                 :            : /* Callback for cselib_record_sets_hook, that records as micro
    6566                 :            :    operations uses and stores in an insn after cselib_record_sets has
    6567                 :            :    analyzed the sets in an insn, but before it modifies the stored
    6568                 :            :    values in the internal tables, unless cselib_record_sets doesn't
    6569                 :            :    call it directly (perhaps because we're not doing cselib in the
    6570                 :            :    first place, in which case sets and n_sets will be 0).  */
    6571                 :            : 
    6572                 :            : static void
    6573                 :   50231900 : add_with_sets (rtx_insn *insn, struct cselib_set *sets, int n_sets)
    6574                 :            : {
    6575                 :   50231900 :   basic_block bb = BLOCK_FOR_INSN (insn);
    6576                 :   50231900 :   int n1, n2;
    6577                 :   50231900 :   struct count_use_info cui;
    6578                 :   50231900 :   micro_operation *mos;
    6579                 :            : 
    6580                 :   50231900 :   cselib_hook_called = true;
    6581                 :            : 
    6582                 :   50231900 :   cui.insn = insn;
    6583                 :   50231900 :   cui.bb = bb;
    6584                 :   50231900 :   cui.sets = sets;
    6585                 :   50231900 :   cui.n_sets = n_sets;
    6586                 :            : 
    6587                 :   50231900 :   n1 = VTI (bb)->mos.length ();
    6588                 :   50231900 :   cui.store_p = false;
    6589                 :   50231900 :   note_uses (&PATTERN (insn), add_uses_1, &cui);
    6590                 :   50231900 :   n2 = VTI (bb)->mos.length () - 1;
    6591                 :   99210900 :   mos = VTI (bb)->mos.address ();
    6592                 :            : 
    6593                 :            :   /* Order the MO_USEs to be before MO_USE_NO_VARs and MO_VAL_USE, and
    6594                 :            :      MO_VAL_LOC last.  */
    6595                 :   56586000 :   while (n1 < n2)
    6596                 :            :     {
    6597                 :    6468620 :       while (n1 < n2 && mos[n1].type == MO_USE)
    6598                 :     114537 :         n1++;
    6599                 :   13674200 :       while (n1 < n2 && mos[n2].type != MO_USE)
    6600                 :    7320160 :         n2--;
    6601                 :    6354080 :       if (n1 < n2)
    6602                 :   56678800 :         std::swap (mos[n1], mos[n2]);
    6603                 :            :     }
    6604                 :            : 
    6605                 :   50231900 :   n2 = VTI (bb)->mos.length () - 1;
    6606                 :   58311700 :   while (n1 < n2)
    6607                 :            :     {
    6608                 :   15399900 :       while (n1 < n2 && mos[n1].type != MO_VAL_LOC)
    6609                 :    7320160 :         n1++;
    6610                 :    8079780 :       while (n1 < n2 && mos[n2].type == MO_VAL_LOC)
    6611                 :          0 :         n2--;
    6612                 :    8079780 :       if (n1 < n2)
    6613                 :   60231700 :         std::swap (mos[n1], mos[n2]);
    6614                 :            :     }
    6615                 :            : 
    6616                 :   50231900 :   if (CALL_P (insn))
    6617                 :            :     {
    6618                 :    2290540 :       micro_operation mo;
    6619                 :            : 
    6620                 :    2290540 :       mo.type = MO_CALL;
    6621                 :    2290540 :       mo.insn = insn;
    6622                 :    2290540 :       mo.u.loc = call_arguments;
    6623                 :    2290540 :       call_arguments = NULL_RTX;
    6624                 :            : 
    6625                 :    2290540 :       if (dump_file && (dump_flags & TDF_DETAILS))
    6626                 :          2 :         log_op_type (PATTERN (insn), bb, insn, mo.type, dump_file);
    6627                 :    2290540 :       VTI (bb)->mos.safe_push (mo);
    6628                 :            :     }
    6629                 :            : 
    6630                 :   50231900 :   n1 = VTI (bb)->mos.length ();
    6631                 :            :   /* This will record NEXT_INSN (insn), such that we can
    6632                 :            :      insert notes before it without worrying about any
    6633                 :            :      notes that MO_USEs might emit after the insn.  */
    6634                 :   50231900 :   cui.store_p = true;
    6635                 :   50231900 :   note_stores (insn, add_stores, &cui);
    6636                 :   50231900 :   n2 = VTI (bb)->mos.length () - 1;
    6637                 :  100282000 :   mos = VTI (bb)->mos.address ();
    6638                 :            : 
    6639                 :            :   /* Order the MO_VAL_USEs first (note_stores does nothing
    6640                 :            :      on DEBUG_INSNs, so there are no MO_VAL_LOCs from this
    6641                 :            :      insn), then MO_CLOBBERs, then MO_SET/MO_COPY/MO_VAL_SET.  */
    6642                 :   56714200 :   while (n1 < n2)
    6643                 :            :     {
    6644                 :    6482270 :       while (n1 < n2 && mos[n1].type == MO_VAL_USE)
    6645                 :          0 :         n1++;
    6646                 :   13010200 :       while (n1 < n2 && mos[n2].type != MO_VAL_USE)
    6647                 :    6527960 :         n2--;
    6648                 :    6482270 :       if (n1 < n2)
    6649                 :   56714200 :         std::swap (mos[n1], mos[n2]);
    6650                 :            :     }
    6651                 :            : 
    6652                 :   50231900 :   n2 = VTI (bb)->mos.length () - 1;
    6653                 :   56718400 :   while (n1 < n2)
    6654                 :            :     {
    6655                 :    9544060 :       while (n1 < n2 && mos[n1].type == MO_CLOBBER)
    6656                 :    3057610 :         n1++;
    6657                 :    9956800 :       while (n1 < n2 && mos[n2].type != MO_CLOBBER)
    6658                 :    3470350 :         n2--;
    6659                 :    6486450 :       if (n1 < n2)
    6660                 :   56722600 :         std::swap (mos[n1], mos[n2]);
    6661                 :            :     }
    6662                 :   50231900 : }
    6663                 :            : 
    6664                 :            : static enum var_init_status
    6665                 :       5055 : find_src_status (dataflow_set *in, rtx src)
    6666                 :            : {
    6667                 :       5055 :   tree decl = NULL_TREE;
    6668                 :       5055 :   enum var_init_status status = VAR_INIT_STATUS_UNINITIALIZED;
    6669                 :            : 
    6670                 :       5055 :   if (! flag_var_tracking_uninit)
    6671                 :       5055 :     status = VAR_INIT_STATUS_INITIALIZED;
    6672                 :            : 
    6673                 :       5055 :   if (src && REG_P (src))
    6674                 :       1930 :     decl = var_debug_decl (REG_EXPR (src));
    6675                 :       3125 :   else if (src && MEM_P (src))
    6676                 :       3125 :     decl = var_debug_decl (MEM_EXPR (src));
    6677                 :            : 
    6678                 :       5055 :   if (src && decl)
    6679                 :       5055 :     status = get_init_value (in, src, dv_from_decl (decl));
    6680                 :            : 
    6681                 :       5055 :   return status;
    6682                 :            : }
    6683                 :            : 
    6684                 :            : /* SRC is the source of an assignment.  Use SET to try to find what
    6685                 :            :    was ultimately assigned to SRC.  Return that value if known,
    6686                 :            :    otherwise return SRC itself.  */
    6687                 :            : 
    6688                 :            : static rtx
    6689                 :      10770 : find_src_set_src (dataflow_set *set, rtx src)
    6690                 :            : {
    6691                 :      10770 :   tree decl = NULL_TREE;   /* The variable being copied around.          */
    6692                 :      10770 :   rtx set_src = NULL_RTX;  /* The value for "decl" stored in "src".      */
    6693                 :      10770 :   variable *var;
    6694                 :      10770 :   location_chain *nextp;
    6695                 :      10770 :   int i;
    6696                 :      10770 :   bool found;
    6697                 :            : 
    6698                 :      10770 :   if (src && REG_P (src))
    6699                 :       4500 :     decl = var_debug_decl (REG_EXPR (src));
    6700                 :       6270 :   else if (src && MEM_P (src))
    6701                 :       6270 :     decl = var_debug_decl (MEM_EXPR (src));
    6702                 :            : 
    6703                 :      10770 :   if (src && decl)
    6704                 :            :     {
    6705                 :      10770 :       decl_or_value dv = dv_from_decl (decl);
    6706                 :            : 
    6707                 :      10770 :       var = shared_hash_find (set->vars, dv);
    6708                 :      10770 :       if (var)
    6709                 :            :         {
    6710                 :            :           found = false;
    6711                 :      24185 :           for (i = 0; i < var->n_var_parts && !found; i++)
    6712                 :      30273 :             for (nextp = var->var_part[i].loc_chain; nextp && !found;
    6713                 :      16566 :                  nextp = nextp->next)
    6714                 :      16566 :               if (rtx_equal_p (nextp->loc, src))
    6715                 :            :                 {
    6716                 :       6572 :                   set_src = nextp->set_src;
    6717                 :       6572 :                   found = true;
    6718                 :            :                 }
    6719                 :            : 
    6720                 :            :         }
    6721                 :            :     }
    6722                 :            : 
    6723                 :      10770 :   return set_src;
    6724                 :            : }
    6725                 :            : 
    6726                 :            : /* Compute the changes of variable locations in the basic block BB.  */
    6727                 :            : 
    6728                 :            : static bool
    6729                 :    6425520 : compute_bb_dataflow (basic_block bb)
    6730                 :            : {
    6731                 :    6425520 :   unsigned int i;
    6732                 :    6425520 :   micro_operation *mo;
    6733                 :    6425520 :   bool changed;
    6734                 :    6425520 :   dataflow_set old_out;
    6735                 :    6425520 :   dataflow_set *in = &VTI (bb)->in;
    6736                 :    6425520 :   dataflow_set *out = &VTI (bb)->out;
    6737                 :            : 
    6738                 :    6425520 :   dataflow_set_init (&old_out);
    6739                 :    6425520 :   dataflow_set_copy (&old_out, out);
    6740                 :    6425520 :   dataflow_set_copy (out, in);
    6741                 :            : 
    6742                 :    6425520 :   if (MAY_HAVE_DEBUG_BIND_INSNS)
    6743                 :    6425440 :     local_get_addr_cache = new hash_map<rtx, rtx>;
    6744                 :            : 
    6745                 :  123513000 :   FOR_EACH_VEC_ELT (VTI (bb)->mos, i, mo)
    6746                 :            :     {
    6747                 :  117087000 :       rtx_insn *insn = mo->insn;
    6748                 :            : 
    6749                 :  117087000 :       switch (mo->type)
    6750                 :            :         {
    6751                 :    2922110 :           case MO_CALL:
    6752                 :    2922110 :             dataflow_set_clear_at_call (out, insn);
    6753                 :    2922110 :             break;
    6754                 :            : 
    6755                 :     303500 :           case MO_USE:
    6756                 :     303500 :             {
    6757                 :     303500 :               rtx loc = mo->u.loc;
    6758                 :            : 
    6759                 :     303500 :               if (REG_P (loc))
    6760                 :     299197 :                 var_reg_set (out, loc, VAR_INIT_STATUS_UNINITIALIZED, NULL);
    6761                 :       4303 :               else if (MEM_P (loc))
    6762                 :       4303 :                 var_mem_set (out, loc, VAR_INIT_STATUS_UNINITIALIZED, NULL);
    6763                 :            :             }
    6764                 :            :             break;
    6765                 :            : 
    6766                 :   31576100 :           case MO_VAL_LOC:
    6767                 :   31576100 :             {
    6768                 :   31576100 :               rtx loc = mo->u.loc;
    6769                 :   31576100 :               rtx val, vloc;
    6770                 :   31576100 :               tree var;
    6771                 :            : 
    6772                 :   31576100 :               if (GET_CODE (loc) == CONCAT)
    6773                 :            :                 {
    6774                 :   14184900 :                   val = XEXP (loc, 0);
    6775                 :   14184900 :                   vloc = XEXP (loc, 1);
    6776                 :            :                 }
    6777                 :            :               else
    6778                 :            :                 {
    6779                 :            :                   val = NULL_RTX;
    6780                 :            :                   vloc = loc;
    6781                 :            :                 }
    6782                 :            : 
    6783                 :   31576100 :               var = PAT_VAR_LOCATION_DECL (vloc);
    6784                 :            : 
    6785                 :   63152200 :               clobber_variable_part (out, NULL_RTX,
    6786                 :            :                                      dv_from_decl (var), 0, NULL_RTX);
    6787                 :   31576100 :               if (val)
    6788                 :            :                 {
    6789                 :   14184900 :                   if (VAL_NEEDS_RESOLUTION (loc))
    6790                 :    1604690 :                     val_resolve (out, val, PAT_VAR_LOCATION_LOC (vloc), insn);
    6791                 :   28369800 :                   set_variable_part (out, val, dv_from_decl (var), 0,
    6792                 :            :                                      VAR_INIT_STATUS_INITIALIZED, NULL_RTX,
    6793                 :            :                                      INSERT);
    6794                 :            :                 }
    6795                 :   17391200 :               else if (!VAR_LOC_UNKNOWN_P (PAT_VAR_LOCATION_LOC (vloc)))
    6796                 :    3699670 :                 set_variable_part (out, PAT_VAR_LOCATION_LOC (vloc),
    6797                 :            :                                    dv_from_decl (var), 0,
    6798                 :            :                                    VAR_INIT_STATUS_INITIALIZED, NULL_RTX,
    6799                 :            :                                    INSERT);
    6800                 :            :             }
    6801                 :            :             break;
    6802                 :            : 
    6803                 :   15276900 :           case MO_VAL_USE:
    6804                 :   15276900 :             {
    6805                 :   15276900 :               rtx loc = mo->u.loc;
    6806                 :   15276900 :               rtx val, vloc, uloc;
    6807                 :            : 
    6808                 :   15276900 :               vloc = uloc = XEXP (loc, 1);
    6809                 :   15276900 :               val = XEXP (loc, 0);
    6810                 :            : 
    6811                 :   15276900 :               if (GET_CODE (val) == CONCAT)
    6812                 :            :                 {
    6813                 :    7809020 :                   uloc = XEXP (val, 1);
    6814                 :    7809020 :                   val = XEXP (val, 0);
    6815                 :            :                 }
    6816                 :            : 
    6817                 :   15276900 :               if (VAL_NEEDS_RESOLUTION (loc))
    6818                 :   15276900 :                 val_resolve (out, val, vloc, insn);
    6819                 :            :               else
    6820                 :          0 :                 val_store (out, val, uloc, insn, false);
    6821                 :            : 
    6822                 :   15276900 :               if (VAL_HOLDS_TRACK_EXPR (loc))
    6823                 :            :                 {
    6824                 :     189803 :                   if (GET_CODE (uloc) == REG)
    6825                 :     167206 :                     var_reg_set (out, uloc, VAR_INIT_STATUS_UNINITIALIZED,
    6826                 :            :                                  NULL);
    6827                 :      22597 :                   else if (GET_CODE (uloc) == MEM)
    6828                 :      22597 :                     var_mem_set (out, uloc, VAR_INIT_STATUS_UNINITIALIZED,
    6829                 :            :                                  NULL);
    6830                 :            :                 }
    6831                 :            :             }
    6832                 :            :             break;
    6833                 :            : 
    6834                 :   35006000 :           case MO_VAL_SET:
    6835                 :   35006000 :             {
    6836                 :   35006000 :               rtx loc = mo->u.loc;
    6837                 :   35006000 :               rtx val, vloc, uloc;
    6838                 :   35006000 :               rtx dstv, srcv;
    6839                 :            : 
    6840                 :   35006000 :               vloc = loc;
    6841                 :   35006000 :               uloc = XEXP (vloc, 1);
    6842                 :   35006000 :               val = XEXP (vloc, 0);
    6843                 :   35006000 :               vloc = uloc;
    6844                 :            : 
    6845                 :   35006000 :               if (GET_CODE (uloc) == SET)
    6846                 :            :                 {
    6847                 :   26137000 :                   dstv = SET_DEST (uloc);
    6848                 :   26137000 :                   srcv = SET_SRC (uloc);
    6849                 :            :                 }
    6850                 :            :               else
    6851                 :            :                 {
    6852                 :            :                   dstv = uloc;
    6853                 :            :                   srcv = NULL;
    6854                 :            :                 }
    6855                 :            : 
    6856                 :   35006000 :               if (GET_CODE (val) == CONCAT)
    6857                 :            :                 {
    6858                 :    8865260 :                   dstv = vloc = XEXP (val, 1);
    6859                 :    8865260 :                   val = XEXP (val, 0);
    6860                 :            :                 }
    6861                 :            : 
    6862                 :   35006000 :               if (GET_CODE (vloc) == SET)
    6863                 :            :                 {
    6864                 :   26132600 :                   srcv = SET_SRC (vloc);
    6865                 :            : 
    6866                 :   26132600 :                   gcc_assert (val != srcv);
    6867                 :   26132600 :                   gcc_assert (vloc == uloc || VAL_NEEDS_RESOLUTION (loc));
    6868                 :            : 
    6869                 :   26132600 :                   dstv = vloc = SET_DEST (vloc);
    6870                 :            : 
    6871                 :   26132600 :                   if (VAL_NEEDS_RESOLUTION (loc))
    6872                 :          0 :                     val_resolve (out, val, srcv, insn);
    6873                 :            :                 }
    6874                 :    8873360 :               else if (VAL_NEEDS_RESOLUTION (loc))
    6875                 :            :                 {
    6876                 :          0 :                   gcc_assert (GET_CODE (uloc) == SET
    6877                 :            :                               && GET_CODE (SET_SRC (uloc)) == REG);
    6878                 :          0 :                   val_resolve (out, val, SET_SRC (uloc), insn);
    6879                 :            :                 }
    6880                 :            : 
    6881                 :   35006000 :               if (VAL_HOLDS_TRACK_EXPR (loc))
    6882                 :            :                 {
    6883                 :      86879 :                   if (VAL_EXPR_IS_CLOBBERED (loc))
    6884                 :            :                     {
    6885                 :          0 :                       if (REG_P (uloc))
    6886                 :          0 :                         var_reg_delete (out, uloc, true);
    6887                 :          0 :                       else if (MEM_P (uloc))
    6888                 :            :                         {
    6889                 :          0 :                           gcc_assert (MEM_P (dstv));
    6890                 :          0 :                           gcc_assert (MEM_ATTRS (dstv) == MEM_ATTRS (uloc));
    6891                 :          0 :                           var_mem_delete (out, dstv, true);
    6892                 :            :                         }
    6893                 :            :                     }
    6894                 :            :                   else
    6895                 :            :                     {
    6896                 :      86879 :                       bool copied_p = VAL_EXPR_IS_COPIED (loc);
    6897                 :      86879 :                       rtx src = NULL, dst = uloc;
    6898                 :      86879 :                       enum var_init_status status = VAR_INIT_STATUS_INITIALIZED;
    6899                 :            : 
    6900                 :      86879 :                       if (GET_CODE (uloc) == SET)
    6901                 :            :                         {
    6902                 :      81944 :                           src = SET_SRC (uloc);
    6903                 :      81944 :                           dst = SET_DEST (uloc);
    6904                 :            :                         }
    6905                 :            : 
    6906                 :      86879 :                       if (copied_p)
    6907                 :            :                         {
    6908                 :       1363 :                           if (flag_var_tracking_uninit)
    6909                 :            :                             {
    6910                 :          0 :                               status = find_src_status (in, src);
    6911                 :            : 
    6912                 :          0 :                               if (status == VAR_INIT_STATUS_UNKNOWN)
    6913                 :          0 :                                 status = find_src_status (out, src);
    6914                 :            :                             }
    6915                 :            : 
    6916                 :       1363 :                           src = find_src_set_src (in, src);
    6917                 :            :                         }
    6918                 :            : 
    6919                 :      86879 :                       if (REG_P (dst))
    6920                 :      82526 :                         var_reg_delete_and_set (out, dst, !copied_p,
    6921                 :            :                                                 status, srcv);
    6922                 :       4353 :                       else if (MEM_P (dst))
    6923                 :            :                         {
    6924                 :       4353 :                           gcc_assert (MEM_P (dstv));
    6925                 :       4353 :                           gcc_assert (MEM_ATTRS (dstv) == MEM_ATTRS (dst));
    6926                 :       4353 :                           var_mem_delete_and_set (out, dstv, !copied_p,
    6927                 :            :                                                   status, srcv);
    6928                 :            :                         }
    6929                 :            :                     }
    6930                 :            :                 }
    6931                 :   34919100 :               else if (REG_P (uloc))
    6932                 :       3202 :                 var_regno_delete (out, REGNO (uloc));
    6933                 :   34915900 :               else if (MEM_P (uloc))
    6934                 :            :                 {
    6935                 :    8860890 :                   gcc_checking_assert (GET_CODE (vloc) == MEM);
    6936                 :    8860890 :                   gcc_checking_assert (dstv == vloc);
    6937                 :            :                   if (dstv != vloc)
    6938                 :            :                     clobber_overlapping_mems (out, vloc);
    6939                 :            :                 }
    6940                 :            : 
    6941                 :   35006000 :               val_store (out, val, dstv, insn, true);
    6942                 :            :             }
    6943                 :   35006000 :             break;
    6944                 :            : 
    6945                 :      53894 :           case MO_SET:
    6946                 :      53894 :             {
    6947                 :      53894 :               rtx loc = mo->u.loc;
    6948                 :      53894 :               rtx set_src = NULL;
    6949                 :            : 
    6950                 :      53894 :               if (GET_CODE (loc) == SET)
    6951                 :            :                 {
    6952                 :      53690 :                   set_src = SET_SRC (loc);
    6953                 :      53690 :                   loc = SET_DEST (loc);
    6954                 :            :                 }
    6955                 :            : 
    6956                 :      53894 :               if (REG_P (loc))
    6957                 :      53894 :                 var_reg_delete_and_set (out, loc, true, VAR_INIT_STATUS_INITIALIZED,
    6958                 :            :                                         set_src);
    6959                 :          0 :               else if (MEM_P (loc))
    6960                 :          0 :                 var_mem_delete_and_set (out, loc, true, VAR_INIT_STATUS_INITIALIZED,
    6961                 :            :                                         set_src);
    6962                 :            :             }
    6963                 :            :             break;
    6964                 :            : 
    6965                 :       4352 :           case MO_COPY:
    6966                 :       4352 :             {
    6967                 :       4352 :               rtx loc = mo->u.loc;
    6968                 :       4352 :               enum var_init_status src_status;
    6969                 :       4352 :               rtx set_src = NULL;
    6970                 :            : 
    6971                 :       4352 :               if (GET_CODE (loc) == SET)
    6972                 :            :                 {
    6973                 :       4352 :                   set_src = SET_SRC (loc);
    6974                 :       4352 :                   loc = SET_DEST (loc);
    6975                 :            :                 }
    6976                 :            : 
    6977                 :       4352 :               if (! flag_var_tracking_uninit)
    6978                 :            :                 src_status = VAR_INIT_STATUS_INITIALIZED;
    6979                 :            :               else
    6980                 :            :                 {
    6981                 :          0 :                   src_status = find_src_status (in, set_src);
    6982                 :            : 
    6983                 :          0 :                   if (src_status == VAR_INIT_STATUS_UNKNOWN)
    6984                 :          0 :                     src_status = find_src_status (out, set_src);
    6985                 :            :                 }
    6986                 :            : 
    6987                 :       4352 :               set_src = find_src_set_src (in, set_src);
    6988                 :            : 
    6989                 :       4352 :               if (REG_P (loc))
    6990                 :       4352 :                 var_reg_delete_and_set (out, loc, false, src_status, set_src);
    6991                 :          0 :               else if (MEM_P (loc))
    6992                 :          0 :                 var_mem_delete_and_set (out, loc, false, src_status, set_src);
    6993                 :            :             }
    6994                 :            :             break;
    6995                 :            : 
    6996                 :   21338800 :           case MO_USE_NO_VAR:
    6997                 :   21338800 :             {
    6998                 :   21338800 :               rtx loc = mo->u.loc;
    6999                 :            : 
    7000                 :   21338800 :               if (REG_P (loc))
    7001                 :   21338800 :                 var_reg_delete (out, loc, false);
    7002                 :          0 :               else if (MEM_P (loc))
    7003                 :          0 :                 var_mem_delete (out, loc, false);
    7004                 :            :             }
    7005                 :            :             break;
    7006                 :            : 
    7007                 :    5622920 :           case MO_CLOBBER:
    7008                 :    5622920 :             {
    7009                 :    5622920 :               rtx loc = mo->u.loc;
    7010                 :            : 
    7011                 :    5622920 :               if (REG_P (loc))
    7012                 :    5622910 :                 var_reg_delete (out, loc, true);
    7013                 :         13 :               else if (MEM_P (loc))
    7014                 :         13 :                 var_mem_delete (out, loc, true);
    7015                 :            :             }
    7016                 :            :             break;
    7017                 :            : 
    7018                 :    4982770 :           case MO_ADJUST:
    7019                 :    4982770 :             out->stack_adjust += mo->u.adjust;
    7020                 :    4982770 :             break;
    7021                 :            :         }
    7022                 :            :     }
    7023                 :            : 
    7024                 :    6425520 :   if (MAY_HAVE_DEBUG_BIND_INSNS)
    7025                 :            :     {
    7026                 :   12850900 :       delete local_get_addr_cache;
    7027                 :    6425440 :       local_get_addr_cache = NULL;
    7028                 :            : 
    7029                 :    6425440 :       dataflow_set_equiv_regs (out);
    7030                 :    6425440 :       shared_hash_htab (out->vars)
    7031                 :    6425440 :         ->traverse <dataflow_set *, canonicalize_values_mark> (out);
    7032                 :    6425440 :       shared_hash_htab (out->vars)
    7033                 :    6425440 :         ->traverse <dataflow_set *, canonicalize_values_star> (out);
    7034                 :    6425440 :       if (flag_checking)
    7035                 :    6425430 :         shared_hash_htab (out->vars)
    7036                 :    6425430 :           ->traverse <dataflow_set *, canonicalize_loc_order_check> (out);
    7037                 :            :     }
    7038                 :    6425520 :   changed = dataflow_set_different (&old_out, out);
    7039                 :    6425520 :   dataflow_set_destroy (&old_out);
    7040                 :    6425520 :   return changed;
    7041                 :            : }
    7042                 :            : 
    7043                 :            : /* Find the locations of variables in the whole function.  */
    7044                 :            : 
    7045                 :            : static bool
    7046                 :     338876 : vt_find_locations (void)
    7047                 :            : {
    7048                 :     338876 :   bb_heap_t *worklist = new bb_heap_t (LONG_MIN);
    7049                 :     338876 :   bb_heap_t *pending = new bb_heap_t (LONG_MIN);
    7050                 :     338876 :   sbitmap in_worklist, in_pending;
    7051                 :     338876 :   basic_block bb;
    7052                 :     338876 :   edge e;
    7053                 :     338876 :   int *bb_order;
    7054                 :     338876 :   int *rc_order;
    7055                 :     338876 :   int i;
    7056                 :     338876 :   int htabsz = 0;
    7057                 :     338876 :   int htabmax = param_max_vartrack_size;
    7058                 :     338876 :   bool success = true;
    7059                 :            : 
    7060                 :     338876 :   timevar_push (TV_VAR_TRACKING_DATAFLOW);
    7061                 :            :   /* Compute reverse completion order of depth first search of the CFG
    7062                 :            :      so that the data-flow runs faster.  */
    7063                 :     338876 :   rc_order = XNEWVEC (int, n_basic_blocks_for_fn (cfun) - NUM_FIXED_BLOCKS);
    7064                 :     338876 :   bb_order = XNEWVEC (int, last_basic_block_for_fn (cfun));
    7065                 :     338876 :   pre_and_rev_post_order_compute (NULL, rc_order, false);
    7066                 :    5064000 :   for (i = 0; i < n_basic_blocks_for_fn (cfun) - NUM_FIXED_BLOCKS; i++)
    7067                 :    4725130 :     bb_order[rc_order[i]] = i;
    7068                 :     338876 :   free (rc_order);
    7069                 :            : 
    7070                 :     338876 :   auto_sbitmap visited (last_basic_block_for_fn (cfun));
    7071                 :     338876 :   in_worklist = sbitmap_alloc (last_basic_block_for_fn (cfun));
    7072                 :     338876 :   in_pending = sbitmap_alloc (last_basic_block_for_fn (cfun));
    7073                 :     338876 :   bitmap_clear (in_worklist);
    7074                 :            : 
    7075                 :    5064000 :   FOR_EACH_BB_FN (bb, cfun)
    7076                 :    4725130 :     pending->insert (bb_order[bb->index], bb);
    7077                 :     338876 :   bitmap_ones (in_pending);
    7078                 :            : 
    7079                 :     818056 :   while (success && !pending->empty ())
    7080                 :            :     {
    7081                 :     479180 :       std::swap (worklist, pending);
    7082                 :     479180 :       std::swap (in_worklist, in_pending);
    7083                 :            : 
    7084                 :     479180 :       bitmap_clear (visited);
    7085                 :            : 
    7086                 :    6904700 :       while (!worklist->empty ())
    7087                 :            :         {
    7088                 :    6425520 :           bb = worklist->extract_min ();
    7089                 :    6425520 :           bitmap_clear_bit (in_worklist, bb->index);
    7090                 :    6425520 :           gcc_assert (!bitmap_bit_p (visited, bb->index));
    7091                 :    6425520 :           if (!bitmap_bit_p (visited, bb->index))
    7092                 :            :             {
    7093                 :    6425520 :               bool changed;
    7094                 :    6425520 :               edge_iterator ei;
    7095                 :    6425520 :               int oldinsz, oldoutsz;
    7096                 :            : 
    7097                 :    6425520 :               bitmap_set_bit (visited, bb->index);
    7098                 :            : 
    7099                 :    6425520 :               if (VTI (bb)->in.vars)
    7100                 :            :                 {
    7101                 :    6425520 :                   htabsz
    7102                 :    6425520 :                     -= shared_hash_htab (VTI (bb)->in.vars)->size ()
    7103                 :    6425520 :                         + shared_hash_htab (VTI (bb)->out.vars)->size ();
    7104                 :    6425520 :                   oldinsz = shared_hash_htab (VTI (bb)->in.vars)->elements ();
    7105                 :    6425520 :                   oldoutsz
    7106                 :    6425520 :                     = shared_hash_htab (VTI (bb)->out.vars)->elements ();
    7107                 :            :                 }
    7108                 :            :               else
    7109                 :            :                 oldinsz = oldoutsz = 0;
    7110                 :            : 
    7111                 :    6425520 :               if (MAY_HAVE_DEBUG_BIND_INSNS)
    7112                 :            :                 {
    7113                 :    6425440 :                   dataflow_set *in = &VTI (bb)->in, *first_out = NULL;
    7114                 :    6425440 :                   bool first = true, adjust = false;
    7115                 :            : 
    7116                 :            :                   /* Calculate the IN set as the intersection of
    7117                 :            :                      predecessor OUT sets.  */
    7118                 :            : 
    7119                 :    6425440 :                   dataflow_set_clear (in);
    7120                 :    6425440 :                   dst_can_be_shared = true;
    7121                 :            : 
    7122                 :   16260400 :                   FOR_EACH_EDGE (e, ei, bb->preds)
    7123                 :    9834950 :                     if (!VTI (e->src)->flooded)
    7124                 :     211052 :                       gcc_assert (bb_order[bb->index]
    7125                 :            :                                   <= bb_order[e->src->index]);
    7126                 :    9623900 :                     else if (first)
    7127                 :            :                       {
    7128                 :    6425440 :                         dataflow_set_copy (in, &VTI (e->src)->out);
    7129                 :    6425440 :                         first_out = &VTI (e->src)->out;
    7130                 :    6425440 :                         first = false;
    7131                 :            :                       }
    7132                 :            :                     else
    7133                 :            :                       {
    7134                 :    3198460 :                         dataflow_set_merge (in, &VTI (e->src)->out);
    7135                 :    3198460 :                         adjust = true;
    7136                 :            :                       }
    7137                 :            : 
    7138                 :    6425440 :                   if (adjust)
    7139                 :            :                     {
    7140                 :    1956900 :                       dataflow_post_merge_adjust (in, &VTI (bb)->permp);
    7141                 :            : 
    7142                 :    1956900 :                       if (flag_checking)
    7143                 :            :                         /* Merge and merge_adjust should keep entries in
    7144                 :            :                            canonical order.  */
    7145                 :    1956900 :                         shared_hash_htab (in->vars)
    7146                 :            :                           ->traverse <dataflow_set *,
    7147                 :    1956900 :                                       canonicalize_loc_order_check> (in);
    7148                 :            : 
    7149                 :    1956900 :                       if (dst_can_be_shared)
    7150                 :            :                         {
    7151                 :       2923 :                           shared_hash_destroy (in->vars);
    7152                 :       2923 :                           in->vars = shared_hash_copy (first_out->vars);
    7153                 :            :                         }
    7154                 :            :                     }
    7155                 :            : 
    7156                 :    6425440 :                   VTI (bb)->flooded = true;
    7157                 :            :                 }
    7158                 :            :               else
    7159                 :            :                 {
    7160                 :            :                   /* Calculate the IN set as union of predecessor OUT sets.  */
    7161                 :         86 :                   dataflow_set_clear (&VTI (bb)->in);
    7162                 :        191 :                   FOR_EACH_EDGE (e, ei, bb->preds)
    7163                 :        105 :                     dataflow_set_union (&VTI (bb)->in, &VTI (e->src)->out);
    7164                 :            :                 }
    7165                 :            : 
    7166                 :    6425520 :               changed = compute_bb_dataflow (bb);
    7167                 :    6425520 :               htabsz += shared_hash_htab (VTI (bb)->in.vars)->size ()
    7168                 :    6425520 :                          + shared_hash_htab (VTI (bb)->out.vars)->size ();
    7169                 :            : 
    7170                 :    6425520 :               if (htabmax && htabsz > htabmax)
    7171                 :            :                 {
    7172                 :          1 :                   if (MAY_HAVE_DEBUG_BIND_INSNS)
    7173                 :          1 :                     inform (DECL_SOURCE_LOCATION (cfun->decl),
    7174                 :            :                             "variable tracking size limit exceeded with "
    7175                 :            :                             "%<-fvar-tracking-assignments%>, retrying without");
    7176                 :            :                   else
    7177                 :          0 :                     inform (DECL_SOURCE_LOCATION (cfun->decl),
    7178                 :            :                             "variable tracking size limit exceeded");
    7179                 :          1 :                   success = false;
    7180                 :          1 :                   break;
    7181                 :            :                 }
    7182                 :            : 
    7183                 :    6425520 :               if (changed)
    7184                 :            :                 {
    7185                 :   15319000 :                   FOR_EACH_EDGE (e, ei, bb->succs)
    7186                 :            :                     {
    7187                 :    9198250 :                       if (e->dest == EXIT_BLOCK_PTR_FOR_FN (cfun))
    7188                 :     457592 :                         continue;
    7189                 :            : 
    7190                 :    8740660 :                       if (bitmap_bit_p (visited, e->dest->index))
    7191                 :            :                         {
    7192                 :     398998 :                           if (!bitmap_bit_p (in_pending, e->dest->index))
    7193                 :            :                             {
    7194                 :            :                               /* Send E->DEST to next round.  */
    7195                 :     361316 :                               bitmap_set_bit (in_pending, e->dest->index);
    7196                 :     361316 :                               pending->insert (bb_order[e->dest->index],
    7197                 :            :                                                e->dest);
    7198                 :            :                             }
    7199                 :            :                         }
    7200                 :    8341660 :                       else if (!bitmap_bit_p (in_worklist, e->dest->index))
    7201                 :            :                         {
    7202                 :            :                           /* Add E->DEST to current round.  */
    7203                 :    1339080 :                           bitmap_set_bit (in_worklist, e->dest->index);
    7204                 :    1339080 :                           worklist->insert (bb_order[e->dest->index],
    7205                 :            :                                             e->dest);
    7206                 :            :                         }
    7207                 :            :                     }
    7208                 :            :                 }
    7209                 :            : 
    7210                 :    6425520 :               if (dump_file)
    7211                 :         87 :                 fprintf (dump_file,
    7212                 :            :                          "BB %i: in %i (was %i), out %i (was %i), rem %i + %i, tsz %i\n",
    7213                 :            :                          bb->index,
    7214                 :         87 :                          (int)shared_hash_htab (VTI (bb)->in.vars)->size (),
    7215                 :            :                          oldinsz,
    7216                 :         87 :                          (int)shared_hash_htab (VTI (bb)->out.vars)->size (),
    7217                 :            :                          oldoutsz,
    7218                 :         87 :                          (int)worklist->nodes (), (int)pending->nodes (),
    7219                 :            :                          htabsz);
    7220                 :            : 
    7221                 :    6425520 :               if (dump_file && (dump_flags & TDF_DETAILS))
    7222                 :            :                 {
    7223                 :          1 :                   fprintf (dump_file, "BB %i IN:\n", bb->index);
    7224                 :          1 :                   dump_dataflow_set (&VTI (bb)->in);
    7225                 :          1 :                   fprintf (dump_file, "BB %i OUT:\n", bb->index);
    7226                 :          1 :                   dump_dataflow_set (&VTI (bb)->out);
    7227                 :            :                 }
    7228                 :            :             }
    7229                 :            :         }
    7230                 :            :     }
    7231                 :            : 
    7232                 :     338876 :   if (success && MAY_HAVE_DEBUG_BIND_INSNS)
    7233                 :    5063880 :     FOR_EACH_BB_FN (bb, cfun)
    7234                 :    4725040 :       gcc_assert (VTI (bb)->flooded);
    7235                 :            : 
    7236                 :     338876 :   free (bb_order);
    7237                 :     338876 :   delete worklist;
    7238                 :     338876 :   delete pending;
    7239                 :     338876 :   sbitmap_free (in_worklist);
    7240                 :     338876 :   sbitmap_free (in_pending);
    7241                 :            : 
    7242                 :     338876 :   timevar_pop (TV_VAR_TRACKING_DATAFLOW);
    7243                 :     338876 :   return success;
    7244                 :            : }
    7245                 :            : 
    7246                 :            : /* Print the content of the LIST to dump file.  */
    7247                 :            : 
    7248                 :            : static void
    7249                 :          6 : dump_attrs_list (attrs *list)
    7250                 :            : {
    7251                 :         12 :   for (; list; list = list->next)
    7252                 :            :     {
    7253                 :          6 :       if (dv_is_decl_p (list->dv))
    7254                 :          0 :         print_mem_expr (dump_file, dv_as_decl (list->dv));
    7255                 :            :       else
    7256                 :          6 :         print_rtl_single (dump_file, dv_as_value (list->dv));
    7257                 :          6 :       fprintf (dump_file, "+" HOST_WIDE_INT_PRINT_DEC, list->offset);
    7258                 :            :     }
    7259                 :          6 :   fprintf (dump_file, "\n");
    7260                 :          6 : }
    7261                 :            : 
    7262                 :            : /* Print the information about variable *SLOT to dump file.  */
    7263                 :            : 
    7264                 :            : int
    7265                 :          8 : dump_var_tracking_slot (variable **slot, void *data ATTRIBUTE_UNUSED)
    7266                 :            : {
    7267                 :          8 :   variable *var = *slot;
    7268                 :            : 
    7269                 :          8 :   dump_var (var);
    7270                 :            : 
    7271                 :            :   /* Continue traversing the hash table.  */
    7272                 :          8 :   return 1;
    7273                 :            : }
    7274                 :            : 
    7275                 :            : /* Print the information about variable VAR to dump file.  */
    7276                 :            : 
    7277                 :            : static void
    7278                 :         12 : dump_var (variable *var)
    7279                 :            : {
    7280                 :         12 :   int i;
    7281                 :         12 :   location_chain *node;
    7282                 :            : 
    7283                 :         12 :   if (dv_is_decl_p (var->dv))
    7284                 :            :     {
    7285                 :          3 :       const_tree decl = dv_as_decl (var->dv);
    7286                 :            : 
    7287                 :          3 :       if (DECL_NAME (decl))
    7288                 :            :         {
    7289                 :          3 :           fprintf (dump_file, "  name: %s",
    7290                 :          3 :                    IDENTIFIER_POINTER (DECL_NAME (decl)));
    7291                 :          3 :           if (dump_flags & TDF_UID)
    7292                 :          0 :             fprintf (dump_file, "D.%u", DECL_UID (decl));
    7293                 :            :         }
    7294                 :          0 :       else if (TREE_CODE (decl) == DEBUG_EXPR_DECL)
    7295                 :          0 :         fprintf (dump_file, "  name: D#%u", DEBUG_TEMP_UID (decl));
    7296                 :            :       else
    7297                 :          0 :         fprintf (dump_file, "  name: D.%u", DECL_UID (decl));
    7298                 :          3 :       fprintf (dump_file, "\n");
    7299                 :            :     }
    7300                 :            :   else
    7301                 :            :     {
    7302                 :          9 :       fputc (' ', dump_file);
    7303                 :         18 :       print_rtl_single (dump_file, dv_as_value (var->dv));
    7304                 :            :     }
    7305                 :            : 
    7306                 :         24 :   for (i = 0; i < var->n_var_parts; i++)
    7307                 :            :     {
    7308                 :         12 :       fprintf (dump_file, "    offset %ld\n",
    7309                 :         12 :                (long)(var->onepart ? 0 : VAR_PART_OFFSET (var, i)));
    7310                 :         27 :       for (node = var->var_part[i].loc_chain; node; node = node->next)
    7311                 :            :         {
    7312                 :         15 :           fprintf (dump_file, "      ");
    7313                 :         15 :           if (node->init == VAR_INIT_STATUS_UNINITIALIZED)
    7314                 :          0 :             fprintf (dump_file, "[uninit]");
    7315                 :         15 :           print_rtl_single (dump_file, node->loc);
    7316                 :            :         }
    7317                 :            :     }
    7318                 :         12 : }
    7319                 :            : 
    7320                 :            : /* Print the information about variables from hash table VARS to dump file.  */
    7321                 :            : 
    7322                 :            : static void
    7323                 :          4 : dump_vars (variable_table_type *vars)
    7324                 :            : {
    7325                 :          4 :   if (!vars->is_empty ())
    7326                 :            :     {
    7327                 :          2 :       fprintf (dump_file, "Variables:\n");
    7328                 :          2 :       vars->traverse <void *, dump_var_tracking_slot> (NULL);
    7329                 :            :     }
    7330                 :          4 : }
    7331                 :            : 
    7332                 :            : /* Print the dataflow set SET to dump file.  */
    7333                 :            : 
    7334                 :            : static void
    7335                 :          4 : dump_dataflow_set (dataflow_set *set)
    7336                 :            : {
    7337                 :          4 :   int i;
    7338                 :            : 
    7339                 :          4 :   fprintf (dump_file, "Stack adjustment: " HOST_WIDE_INT_PRINT_DEC "\n",
    7340                 :            :            set->stack_adjust);
    7341                 :        308 :   for (i = 0; i < FIRST_PSEUDO_REGISTER; i++)
    7342                 :            :     {
    7343                 :        304 :       if (set->regs[i])
    7344                 :            :         {
    7345                 :          6 :           fprintf (dump_file, "Reg %d:", i);
    7346                 :          6 :           dump_attrs_list (set->regs[i]);
    7347                 :            :         }
    7348                 :            :     }
    7349                 :          4 :   dump_vars (shared_hash_htab (set->vars));
    7350                 :          4 :   fprintf (dump_file, "\n");
    7351                 :          4 : }
    7352                 :            : 
    7353                 :            : /* Print the IN and OUT sets for each basic block to dump file.  */
    7354                 :            : 
    7355                 :            : static void
    7356                 :          1 : dump_dataflow_sets (void)
    7357                 :            : {
    7358                 :          1 :   basic_block bb;
    7359                 :            : 
    7360                 :          2 :   FOR_EACH_BB_FN (bb, cfun)
    7361                 :            :     {
    7362                 :          1 :       fprintf (dump_file, "\nBasic block %d:\n", bb->index);
    7363                 :          1 :       fprintf (dump_file, "IN:\n");
    7364                 :          1 :       dump_dataflow_set (&VTI (bb)->in);
    7365                 :          1 :       fprintf (dump_file, "OUT:\n");
    7366                 :          1 :       dump_dataflow_set (&VTI (bb)->out);
    7367                 :            :     }
    7368                 :          1 : }
    7369                 :            : 
    7370                 :            : /* Return the variable for DV in dropped_values, inserting one if
    7371                 :            :    requested with INSERT.  */
    7372                 :            : 
    7373                 :            : static inline variable *
    7374                 :  124686000 : variable_from_dropped (decl_or_value dv, enum insert_option insert)
    7375                 :            : {
    7376                 :  124686000 :   variable **slot;
    7377                 :  124686000 :   variable *empty_var;
    7378                 :  124686000 :   onepart_enum onepart;
    7379                 :            : 
    7380                 :  124686000 :   slot = dropped_values->find_slot_with_hash (dv, dv_htab_hash (dv), insert);
    7381                 :            : 
    7382                 :  124686000 :   if (!slot)
    7383                 :            :     return NULL;
    7384                 :            : 
    7385                 :   51984300 :   if (*slot)
    7386                 :            :     return *slot;
    7387                 :            : 
    7388                 :    4319280 :   gcc_checking_assert (insert == INSERT);
    7389                 :            : 
    7390                 :    4319280 :   onepart = dv_onepart_p (dv);
    7391                 :            : 
    7392                 :    4319280 :   gcc_checking_assert (onepart == ONEPART_VALUE || onepart == ONEPART_DEXPR);
    7393                 :            : 
    7394                 :    4319280 :   empty_var = onepart_pool_allocate (onepart);
    7395                 :    4319280 :   empty_var->dv = dv;
    7396                 :    4319280 :   empty_var->refcount = 1;
    7397                 :    4319280 :   empty_var->n_var_parts = 0;
    7398                 :    4319280 :   empty_var->onepart = onepart;
    7399                 :    4319280 :   empty_var->in_changed_variables = false;
    7400                 :    4319280 :   empty_var->var_part[0].loc_chain = NULL;
    7401                 :    4319280 :   empty_var->var_part[0].cur_loc = NULL;
    7402                 :    4319280 :   VAR_LOC_1PAUX (empty_var) = NULL;
    7403                 :    4319280 :   set_dv_changed (dv, true);
    7404                 :            : 
    7405                 :    4319280 :   *slot = empty_var;
    7406                 :            : 
    7407                 :    4319280 :   return empty_var;
    7408                 :            : }
    7409                 :            : 
    7410                 :            : /* Recover the one-part aux from dropped_values.  */
    7411                 :            : 
    7412                 :            : static struct onepart_aux *
    7413                 :   76091500 : recover_dropped_1paux (variable *var)
    7414                 :            : {
    7415                 :   76091500 :   variable *dvar;
    7416                 :            : 
    7417                 :   76091500 :   gcc_checking_assert (var->onepart);
    7418                 :            : 
    7419                 :   76091500 :   if (VAR_LOC_1PAUX (var))
    7420                 :   76091500 :     return VAR_LOC_1PAUX (var);
    7421                 :            : 
    7422                 :   76091500 :   if (var->onepart == ONEPART_VDECL)
    7423                 :            :     return NULL;
    7424                 :            : 
    7425                 :   65234500 :   dvar = variable_from_dropped (var->dv, NO_INSERT);
    7426                 :            : 
    7427                 :   65234500 :   if (!dvar)
    7428                 :            :     return NULL;
    7429                 :            : 
    7430                 :   10798400 :   VAR_LOC_1PAUX (var) = VAR_LOC_1PAUX (dvar);
    7431                 :   10798400 :   VAR_LOC_1PAUX (dvar) = NULL;
    7432                 :            : 
    7433                 :   10798400 :   return VAR_LOC_1PAUX (var);
    7434                 :            : }
    7435                 :            : 
    7436                 :            : /* Add variable VAR to the hash table of changed variables and
    7437                 :            :    if it has no locations delete it from SET's hash table.  */
    7438                 :            : 
    7439                 :            : static void
    7440                 :  262564000 : variable_was_changed (variable *var, dataflow_set *set)
    7441                 :            : {
    7442                 :  262564000 :   hashval_t hash = dv_htab_hash (var->dv);
    7443                 :            : 
    7444                 :  262564000 :   if (emit_notes)
    7445                 :            :     {
    7446                 :  128662000 :       variable **slot;
    7447                 :            : 
    7448                 :            :       /* Remember this decl or VALUE has been added to changed_variables.  */
    7449                 :  128662000 :       set_dv_changed (var->dv, true);
    7450                 :            : 
    7451                 :  128662000 :       slot = changed_variables->find_slot_with_hash (var->dv, hash, INSERT);
    7452                 :            : 
    7453                 :  128662000 :       if (*slot)
    7454                 :            :         {
    7455                 :    2302430 :           variable *old_var = *slot;
    7456                 :    2302430 :           gcc_assert (old_var->in_changed_variables);
    7457                 :    2302430 :           old_var->in_changed_variables = false;
    7458                 :    2302430 :           if (var != old_var && var->onepart)
    7459                 :            :             {
    7460                 :            :               /* Restore the auxiliary info from an empty variable
    7461                 :            :                  previously created for changed_variables, so it is
    7462                 :            :                  not lost.  */
    7463                 :    1983160 :               gcc_checking_assert (!VAR_LOC_1PAUX (var));
    7464                 :    1983160 :               VAR_LOC_1PAUX (var) = VAR_LOC_1PAUX (old_var);
    7465                 :    1983160 :               VAR_LOC_1PAUX (old_var) = NULL;
    7466                 :            :             }
    7467                 :    2302430 :           variable_htab_free (*slot);
    7468                 :            :         }
    7469                 :            : 
    7470                 :  128662000 :       if (set && var->n_var_parts == 0)
    7471                 :            :         {
    7472                 :   24918700 :           onepart_enum onepart = var->onepart;
    7473                 :   24918700 :           variable *empty_var = NULL;
    7474                 :   24918700 :           variable **dslot = NULL;
    7475                 :            : 
    7476                 :   24918700 :           if (onepart == ONEPART_VALUE || onepart == ONEPART_DEXPR)
    7477                 :            :             {
    7478                 :   17516600 :               dslot = dropped_values->find_slot_with_hash (var->dv,
    7479                 :            :                                                            dv_htab_hash (var->dv),
    7480                 :            :                                                            INSERT);
    7481                 :   17516600 :               empty_var = *dslot;
    7482                 :            : 
    7483                 :   17516600 :               if (empty_var)
    7484                 :            :                 {
    7485                 :    6415080 :                   gcc_checking_assert (!empty_var->in_changed_variables);
    7486                 :    6415080 :                   if (!VAR_LOC_1PAUX (var))
    7487                 :            :                     {
    7488                 :    4890360 :                       VAR_LOC_1PAUX (var) = VAR_LOC_1PAUX (empty_var);
    7489                 :    4890360 :                       VAR_LOC_1PAUX (empty_var) = NULL;
    7490                 :            :                     }
    7491                 :            :                   else
    7492                 :    1524720 :                     gcc_checking_assert (!VAR_LOC_1PAUX (empty_var));
    7493                 :            :                 }
    7494                 :            :             }
    7495                 :            : 
    7496                 :   17516600 :           if (!empty_var)
    7497                 :            :             {
    7498                 :   18503600 :               empty_var = onepart_pool_allocate (onepart);
    7499                 :   18503600 :               empty_var->dv = var->dv;
    7500                 :   18503600 :               empty_var->refcount = 1;
    7501                 :   18503600 :               empty_var->n_var_parts = 0;
    7502                 :   18503600 :               empty_var->onepart = onepart;
    7503                 :   18503600 :               if (dslot)
    7504                 :            :                 {
    7505                 :   11101600 :                   empty_var->refcount++;
    7506                 :   11101600 :                   *dslot = empty_var;
    7507                 :            :                 }
    7508                 :            :             }
    7509                 :            :           else
    7510                 :    6415080 :             empty_var->refcount++;
    7511                 :   24918700 :           empty_var->in_changed_variables = true;
    7512                 :   24918700 :           *slot = empty_var;
    7513                 :   24918700 :           if (onepart)
    7514                 :            :             {
    7515                 :   24702500 :               empty_var->var_part[0].loc_chain = NULL;
    7516                 :   24702500 :               empty_var->var_part[0].cur_loc = NULL;
    7517                 :   24702500 :               VAR_LOC_1PAUX (empty_var) = VAR_LOC_1PAUX (var);
    7518                 :   24702500 :               VAR_LOC_1PAUX (var) = NULL;
    7519                 :            :             }
    7520                 :   24918700 :           goto drop_var;
    7521                 :            :         }
    7522                 :            :       else
    7523                 :            :         {
    7524                 :  103743000 :           if (var->onepart && !VAR_LOC_1PAUX (var))
    7525                 :   76091500 :             recover_dropped_1paux (var);
    7526                 :  103743000 :           var->refcount++;
    7527                 :  103743000 :           var->in_changed_variables = true;
    7528                 :  103743000 :           *slot = var;
    7529                 :            :         }
    7530                 :            :     }
    7531                 :            :   else
    7532                 :            :     {
    7533                 :  133902000 :       gcc_assert (set);
    7534                 :  133902000 :       if (var->n_var_parts == 0)
    7535                 :            :         {
    7536                 :   59054100 :           variable **slot;
    7537                 :            : 
    7538                 :   34135400 :         drop_var:
    7539                 :   59054100 :           slot = shared_hash_find_slot_noinsert (set->vars, var->dv);
    7540                 :   59054100 :           if (slot)
    7541                 :            :             {
    7542                 :   59054100 :               if (shared_hash_shared (set->vars))
    7543                 :          0 :                 slot = shared_hash_find_slot_unshare (&set->vars, var->dv,
    7544                 :            :                                                       NO_INSERT);
    7545                 :   59054100 :               shared_hash_htab (set->vars)->clear_slot (slot);
    7546                 :            :             }
    7547                 :            :         }
    7548                 :            :     }
    7549                 :  262564000 : }
    7550                 :            : 
    7551                 :            : /* Look for the index in VAR->var_part corresponding to OFFSET.
    7552                 :            :    Return -1 if not found.  If INSERTION_POINT is non-NULL, the
    7553                 :            :    referenced int will be set to the index that the part has or should
    7554                 :            :    have, if it should be inserted.  */
    7555                 :            : 
    7556                 :            : static inline int
    7557                 :  319994000 : find_variable_location_part (variable *var, HOST_WIDE_INT offset,
    7558                 :            :                              int *insertion_point)
    7559                 :            : {
    7560                 :  319994000 :   int pos, low, high;
    7561                 :            : 
    7562                 :  319994000 :   if (var->onepart)
    7563                 :            :     {
    7564                 :  318115000 :       if (offset != 0)
    7565                 :            :         return -1;
    7566                 :            : 
    7567                 :  318115000 :       if (insertion_point)
    7568                 :          0 :         *insertion_point = 0;
    7569                 :            : 
    7570                 :  318115000 :       return var->n_var_parts - 1;
    7571                 :            :     }
    7572                 :            : 
    7573                 :            :   /* Find the location part.  */
    7574                 :    1878910 :   low = 0;
    7575                 :    1878910 :   high = var->n_var_parts;
    7576                 :    4570990 :   while (low != high)
    7577                 :            :     {
    7578                 :    2692080 :       pos = (low + high) / 2;
    7579                 :    2692080 :       if (VAR_PART_OFFSET (var, pos) < offset)
    7580                 :     514510 :         low = pos + 1;
    7581                 :            :       else
    7582                 :            :         high = pos;
    7583                 :            :     }
    7584                 :    1878910 :   pos = low;
    7585                 :            : 
    7586                 :    1878910 :   if (insertion_point)
    7587                 :     878496 :     *insertion_point = pos;
    7588                 :            : 
    7589                 :    1878910 :   if (pos < var->n_var_parts && VAR_PART_OFFSET (var, pos) == offset)
    7590                 :    1681820 :     return pos;
    7591                 :            : 
    7592                 :            :   return -1;
    7593                 :            : }
    7594                 :            : 
    7595                 :            : static variable **
    7596                 :  357259000 : set_slot_part (dataflow_set *set, rtx loc, variable **slot,
    7597                 :            :                decl_or_value dv, HOST_WIDE_INT offset,
    7598                 :            :                enum var_init_status initialized, rtx set_src)
    7599                 :            : {
    7600                 :  357259000 :   int pos;
    7601                 :  357259000 :   location_chain *node, *next;
    7602                 :  357259000 :   location_chain **nextp;
    7603                 :  357259000 :   variable *var;
    7604                 :  357259000 :   onepart_enum onepart;
    7605                 :            : 
    7606                 :  357259000 :   var = *slot;
    7607                 :            : 
    7608                 :  357259000 :   if (var)
    7609                 :  247055000 :     onepart = var->onepart;
    7610                 :            :   else
    7611                 :  110205000 :     onepart = dv_onepart_p (dv);
    7612                 :            : 
    7613                 :  357259000 :   gcc_checking_assert (offset == 0 || !onepart);
    7614                 :  357259000 :   gcc_checking_assert (loc != dv_as_opaque (dv));
    7615                 :            : 
    7616                 :  357259000 :   if (! flag_var_tracking_uninit)
    7617                 :  357259000 :     initialized = VAR_INIT_STATUS_INITIALIZED;
    7618                 :            : 
    7619                 :  357259000 :   if (!var)
    7620                 :            :     {
    7621                 :            :       /* Create new variable information.  */
    7622                 :  110205000 :       var = onepart_pool_allocate (onepart);
    7623                 :  110205000 :       var->dv = dv;
    7624                 :  110205000 :       var->refcount = 1;
    7625                 :  110205000 :       var->n_var_parts = 1;
    7626                 :  110205000 :       var->onepart = onepart;
    7627                 :  110205000 :       var->in_changed_variables = false;
    7628                 :  110205000 :       if (var->onepart)
    7629                 :  109888000 :         VAR_LOC_1PAUX (var) = NULL;
    7630                 :            :       else
    7631                 :     316992 :         VAR_PART_OFFSET (var, 0) = offset;
    7632                 :  110205000 :       var->var_part[0].loc_chain = NULL;
    7633                 :  110205000 :       var->var_part[0].cur_loc = NULL;
    7634                 :  110205000 :       *slot = var;
    7635                 :  110205000 :       pos = 0;
    7636                 :  110205000 :       nextp = &var->var_part[0].loc_chain;
    7637                 :            :     }
    7638                 :  247055000 :   else if (onepart)
    7639                 :            :     {
    7640                 :  246176000 :       int r = -1, c = 0;
    7641                 :            : 
    7642                 :  246176000 :       gcc_assert (dv_as_opaque (var->dv) == dv_as_opaque (dv));
    7643                 :            : 
    7644                 :  246176000 :       pos = 0;
    7645                 :            : 
    7646                 :  246176000 :       if (GET_CODE (loc) == VALUE)
    7647                 :            :         {
    7648                 : 4660480000 :           for (nextp = &var->var_part[0].loc_chain; (node = *nextp);
    7649                 : 4444780000 :                nextp = &node->next)
    7650                 : 4652850000 :             if (GET_CODE (node->loc) == VALUE)
    7651                 :            :               {
    7652                 : 4540640000 :                 if (node->loc == loc)
    7653                 :            :                   {
    7654                 :            :                     r = 0;
    7655                 :            :                     break;
    7656                 :            :                   }
    7657                 : 4334800000 :                 if (canon_value_cmp (node->loc, loc))
    7658                 : 4332580000 :                   c++;
    7659                 :            :                 else
    7660                 :            :                   {
    7661                 :            :                     r = 1;
    7662                 :            :                     break;
    7663                 :            :                   }
    7664                 :            :               }
    7665                 :  112201000 :             else if (REG_P (node->loc) || MEM_P (node->loc))
    7666                 :  112201000 :               c++;
    7667                 :            :             else
    7668                 :            :               {
    7669                 :            :                 r = 1;
    7670                 :            :                 break;
    7671                 :            :               }
    7672                 :            :         }
    7673                 :   30471900 :       else if (REG_P (loc))
    7674                 :            :         {
    7675                 :   19957300 :           for (nextp = &var->var_part[0].loc_chain; (node = *nextp);
    7676                 :    2257280 :                nextp = &node->next)
    7677                 :   18176100 :             if (REG_P (node->loc))
    7678                 :            :               {
    7679                 :    4150390 :                 if (REGNO (node->loc) < REGNO (loc))
    7680                 :    2257280 :                   c++;
    7681                 :            :                 else
    7682                 :            :                   {
    7683                 :    1893110 :                     if (REGNO (node->loc) == REGNO (loc))
    7684                 :            :                       r = 0;
    7685                 :            :                     else
    7686                 :    1686450 :                       r = 1;
    7687                 :            :                     break;
    7688                 :            :                   }
    7689                 :            :               }
    7690                 :            :             else
    7691                 :            :               {
    7692                 :            :                 r = 1;
    7693                 :            :                 break;
    7694                 :            :               }
    7695                 :            :         }
    7696                 :   12771800 :       else if (MEM_P (loc))
    7697                 :            :         {
    7698                 :   36811000 :           for (nextp = &var->var_part[0].loc_chain; (node = *nextp);
    7699                 :   24039200 :                nextp = &node->next)
    7700                 :   27383200 :             if (REG_P (node->loc))
    7701                 :    9315920 :               c++;
    7702                 :   18067300 :             else if (MEM_P (node->loc))
    7703                 :            :               {
    7704                 :   16146300 :                 if ((r = loc_cmp (XEXP (node->loc, 0), XEXP (loc, 0))) >= 0)
    7705                 :            :                   break;
    7706                 :            :                 else
    7707                 :   14723300 :                   c++;
    7708                 :            :               }
    7709                 :            :             else
    7710                 :            :               {
    7711                 :            :                 r = 1;
    7712                 :            :                 break;
    7713                 :            :               }
    7714                 :            :         }
    7715                 :            :       else
    7716                 :          0 :         for (nextp = &var->var_part[0].loc_chain; (node = *nextp);
    7717                 :          0 :              nextp = &node->next)
    7718                 :          0 :           if ((r = loc_cmp (node->loc, loc)) >= 0)
    7719                 :            :             break;
    7720                 :            :           else
    7721                 :          0 :             c++;
    7722                 :            : 
    7723                 :  246176000 :       if (r == 0)
    7724                 :            :         return slot;
    7725                 :            : 
    7726                 :   40111600 :       if (shared_var_p (var, set->vars))
    7727                 :            :         {
    7728                 :    9463910 :           slot = unshare_variable (set, slot, var, initialized);
    7729                 :    9463910 :           var = *slot;
    7730                 :   34246200 :           for (nextp = &var->var_part[0].loc_chain; c;
    7731                 :   24782300 :                nextp = &(*nextp)->next)
    7732                 :   24782300 :             c--;
    7733                 :    9463910 :           gcc_assert ((!node && !*nextp) || node->loc == (*nextp)->loc);
    7734                 :            :         }
    7735                 :            :     }
    7736                 :            :   else
    7737                 :            :     {
    7738                 :     878496 :       int inspos = 0;
    7739                 :            : 
    7740                 :    2635490 :       gcc_assert (dv_as_decl (var->dv) == dv_as_decl (dv));
    7741                 :            : 
    7742                 :     878496 :       pos = find_variable_location_part (var, offset, &inspos);
    7743                 :            : 
    7744                 :     878496 :       if (pos >= 0)
    7745                 :            :         {
    7746                 :     707241 :           node = var->var_part[pos].loc_chain;
    7747                 :            : 
    7748                 :     707241 :           if (node
    7749                 :     707241 :               && ((REG_P (node->loc) && REG_P (loc)
    7750                 :     659183 :                    && REGNO (node->loc) == REGNO (loc))
    7751                 :      77129 :                   || rtx_equal_p (node->loc, loc)))
    7752                 :            :             {
    7753                 :            :               /* LOC is in the beginning of the chain so we have nothing
    7754                 :            :                  to do.  */
    7755                 :     648591 :               if (node->init < initialized)
    7756                 :          0 :                 node->init = initialized;
    7757                 :     648591 :               if (set_src != NULL)
    7758                 :       6751 :                 node->set_src = set_src;
    7759                 :            : 
    7760                 :     648591 :               return slot;
    7761                 :            :             }
    7762                 :            :           else
    7763                 :            :             {
    7764                 :            :               /* We have to make a copy of a shared variable.  */
    7765                 :      58650 :               if (shared_var_p (var, set->vars))
    7766                 :            :                 {
    7767                 :      29070 :                   slot = unshare_variable (set, slot, var, initialized);
    7768                 :      29070 :                   var = *slot;
    7769                 :            :                 }
    7770                 :            :             }
    7771                 :            :         }
    7772                 :            :       else
    7773                 :            :         {
    7774                 :            :           /* We have not found the location part, new one will be created.  */
    7775                 :            : 
    7776                 :            :           /* We have to make a copy of the shared variable.  */
    7777                 :     171255 :           if (shared_var_p (var, set->vars))
    7778                 :            :             {
    7779                 :      26724 :               slot = unshare_variable (set, slot, var, initialized);
    7780                 :      26724 :               var = *slot;
    7781                 :            :             }
    7782                 :            : 
    7783                 :            :           /* We track only variables whose size is <= MAX_VAR_PARTS bytes
    7784                 :            :              thus there are at most MAX_VAR_PARTS different offsets.  */
    7785                 :     171255 :           gcc_assert (var->n_var_parts < MAX_VAR_PARTS
    7786                 :            :                       && (!var->n_var_parts || !onepart));
    7787                 :            : 
    7788                 :            :           /* We have to move the elements of array starting at index
    7789                 :            :              inspos to the next position.  */
    7790                 :     240477 :           for (pos = var->n_var_parts; pos > inspos; pos--)
    7791                 :      69222 :             var->var_part[pos] = var->var_part[pos - 1];
    7792                 :            : 
    7793                 :     171255 :           var->n_var_parts++;
    7794                 :     171255 :           gcc_checking_assert (!onepart);
    7795                 :     171255 :           VAR_PART_OFFSET (var, pos) = offset;
    7796                 :     171255 :           var->var_part[pos].loc_chain = NULL;
    7797                 :     171255 :           var->var_part[pos].cur_loc = NULL;
    7798                 :            :         }
    7799                 :            : 
    7800                 :            :       /* Delete the location from the list.  */
    7801                 :     229905 :       nextp = &var->var_part[pos].loc_chain;
    7802                 :     293686 :       for (node = var->var_part[pos].loc_chain; node; node = next)
    7803                 :            :         {
    7804                 :      71718 :           next = node->next;
    7805                 :      38008 :           if ((REG_P (node->loc) && REG_P (loc)
    7806                 :      36380 :                && REGNO (node->loc) == REGNO (loc))
    7807                 :     102696 :               || rtx_equal_p (node->loc, loc))
    7808                 :            :             {
    7809                 :            :               /* Save these values, to assign to the new node, before
    7810                 :            :                  deleting this one.  */
    7811                 :       7937 :               if (node->init > initialized)
    7812                 :          0 :                 initialized = node->init;
    7813                 :       7937 :               if (node->set_src != NULL && set_src == NULL)
    7814                 :       6066 :                 set_src = node->set_src;
    7815                 :       7937 :               if (var->var_part[pos].cur_loc == node->loc)
    7816                 :        454 :                 var->var_part[pos].cur_loc = NULL;
    7817                 :       7937 :               delete node;
    7818                 :       7937 :               *nextp = next;
    7819                 :       7937 :               break;
    7820                 :            :             }
    7821                 :            :           else
    7822                 :      63781 :             nextp = &node->next;
    7823                 :            :         }
    7824                 :            : 
    7825                 :     229905 :       nextp = &var->var_part[pos].loc_chain;
    7826                 :            :     }
    7827                 :            : 
    7828                 :            :   /* Add the location to the beginning.  */
    7829                 :  150546000 :   node = new location_chain;
    7830                 :  150546000 :   node->loc = loc;
    7831                 :  150546000 :   node->init = initialized;
    7832                 :  150546000 :   node->set_src = set_src;
    7833                 :  150546000 :   node->next = *nextp;
    7834                 :  150546000 :   *nextp = node;
    7835                 :            : 
    7836                 :            :   /* If no location was emitted do so.  */
    7837                 :  150546000 :   if (var->var_part[pos].cur_loc == NULL)
    7838                 :  147766000 :     variable_was_changed (var, set);
    7839                 :            : 
    7840                 :            :   return slot;
    7841                 :            : }
    7842                 :            : 
    7843                 :            : /* Set the part of variable's location in the dataflow set SET.  The
    7844                 :            :    variable part is specified by variable's declaration in DV and
    7845                 :            :    offset OFFSET and the part's location by LOC.  IOPT should be
    7846                 :            :    NO_INSERT if the variable is known to be in SET already and the
    7847                 :            :    variable hash table must not be resized, and INSERT otherwise.  */
    7848                 :            : 
    7849                 :            : static void
    7850                 :  173798000 : set_variable_part (dataflow_set *set, rtx loc,
    7851                 :            :                    decl_or_value dv, HOST_WIDE_INT offset,
    7852                 :            :                    enum var_init_status initialized, rtx set_src,
    7853                 :            :                    enum insert_option iopt)
    7854                 :            : {
    7855                 :  173798000 :   variable **slot;
    7856                 :            : 
    7857                 :  173798000 :   if (iopt == NO_INSERT)
    7858                 :      99207 :     slot = shared_hash_find_slot_noinsert (set->vars, dv);
    7859                 :            :   else
    7860                 :            :     {
    7861                 :  173699000 :       slot = shared_hash_find_slot (set->vars, dv);
    7862                 :  173699000 :       if (!slot)
    7863                 :    7760800 :         slot = shared_hash_find_slot_unshare (&set->vars, dv, iopt);
    7864                 :            :     }
    7865                 :  173798000 :   set_slot_part (set, loc, slot, dv, offset, initialized, set_src);
    7866                 :  173798000 : }
    7867                 :            : 
    7868                 :            : /* Remove all recorded register locations for the given variable part
    7869                 :            :    from dataflow set SET, except for those that are identical to loc.
    7870                 :            :    The variable part is specified by variable's declaration or value
    7871                 :            :    DV and offset OFFSET.  */
    7872                 :            : 
    7873                 :            : static variable **
    7874                 :  253594000 : clobber_slot_part (dataflow_set *set, rtx loc, variable **slot,
    7875                 :            :                    HOST_WIDE_INT offset, rtx set_src)
    7876                 :            : {
    7877                 :  253594000 :   variable *var = *slot;
    7878                 :  253594000 :   int pos = find_variable_location_part (var, offset, NULL);
    7879                 :            : 
    7880                 :  253594000 :   if (pos >= 0)
    7881                 :            :     {
    7882                 :  253568000 :       location_chain *node, *next;
    7883                 :            : 
    7884                 :            :       /* Remove the register locations from the dataflow set.  */
    7885                 :  253568000 :       next = var->var_part[pos].loc_chain;
    7886                 :  508760000 :       for (node = next; node; node = next)
    7887                 :            :         {
    7888                 :  255192000 :           next = node->next;
    7889                 :  255192000 :           if (node->loc != loc
    7890                 :  255192000 :               && (!flag_var_tracking_uninit
    7891                 :          0 :                   || !set_src
    7892                 :          0 :                   || MEM_P (set_src)
    7893                 :          0 :                   || !rtx_equal_p (set_src, node->set_src)))
    7894                 :            :             {
    7895                 :   20416500 :               if (REG_P (node->loc))
    7896                 :            :                 {
    7897                 :     736999 :                   attrs *anode, *anext;
    7898                 :     736999 :                   attrs **anextp;
    7899                 :            : 
    7900                 :            :                   /* Remove the variable part from the register's
    7901                 :            :                      list, but preserve any other variable parts