xref: /dflybsd-src/contrib/gcc-8.0/gcc/rtlhash.c (revision 38fd149817dfbff97799f62fcb70be98c4e32523)
1*38fd1498Szrj /* RTL hash functions.
2*38fd1498Szrj    Copyright (C) 1987-2018 Free Software Foundation, Inc.
3*38fd1498Szrj 
4*38fd1498Szrj This file is part of GCC.
5*38fd1498Szrj 
6*38fd1498Szrj GCC is free software; you can redistribute it and/or modify it under
7*38fd1498Szrj the terms of the GNU General Public License as published by the Free
8*38fd1498Szrj Software Foundation; either version 3, or (at your option) any later
9*38fd1498Szrj version.
10*38fd1498Szrj 
11*38fd1498Szrj GCC is distributed in the hope that it will be useful, but WITHOUT ANY
12*38fd1498Szrj WARRANTY; without even the implied warranty of MERCHANTABILITY or
13*38fd1498Szrj FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
14*38fd1498Szrj for more details.
15*38fd1498Szrj 
16*38fd1498Szrj You should have received a copy of the GNU General Public License
17*38fd1498Szrj along with GCC; see the file COPYING3.  If not see
18*38fd1498Szrj <http://www.gnu.org/licenses/>.  */
19*38fd1498Szrj 
20*38fd1498Szrj #include "config.h"
21*38fd1498Szrj #include "system.h"
22*38fd1498Szrj #include "coretypes.h"
23*38fd1498Szrj #include "tm.h"
24*38fd1498Szrj #include "rtl.h"
25*38fd1498Szrj #include "rtlhash.h"
26*38fd1498Szrj 
27*38fd1498Szrj namespace inchash
28*38fd1498Szrj {
29*38fd1498Szrj 
30*38fd1498Szrj /* Iteratively hash rtx X into HSTATE.  */
31*38fd1498Szrj 
32*38fd1498Szrj void
add_rtx(const_rtx x,hash & hstate)33*38fd1498Szrj add_rtx (const_rtx x, hash &hstate)
34*38fd1498Szrj {
35*38fd1498Szrj   enum rtx_code code;
36*38fd1498Szrj   machine_mode mode;
37*38fd1498Szrj   int i, j;
38*38fd1498Szrj   const char *fmt;
39*38fd1498Szrj 
40*38fd1498Szrj   if (x == NULL_RTX)
41*38fd1498Szrj     return;
42*38fd1498Szrj   code = GET_CODE (x);
43*38fd1498Szrj   hstate.add_object (code);
44*38fd1498Szrj   mode = GET_MODE (x);
45*38fd1498Szrj   hstate.add_object (mode);
46*38fd1498Szrj   switch (code)
47*38fd1498Szrj     {
48*38fd1498Szrj     case REG:
49*38fd1498Szrj       hstate.add_int (REGNO (x));
50*38fd1498Szrj       return;
51*38fd1498Szrj     case CONST_INT:
52*38fd1498Szrj       hstate.add_object (INTVAL (x));
53*38fd1498Szrj       return;
54*38fd1498Szrj     case CONST_WIDE_INT:
55*38fd1498Szrj       for (i = 0; i < CONST_WIDE_INT_NUNITS (x); i++)
56*38fd1498Szrj 	hstate.add_object (CONST_WIDE_INT_ELT (x, i));
57*38fd1498Szrj       return;
58*38fd1498Szrj     case CONST_POLY_INT:
59*38fd1498Szrj       for (i = 0; i < NUM_POLY_INT_COEFFS; ++i)
60*38fd1498Szrj 	hstate.add_wide_int (CONST_POLY_INT_COEFFS (x)[i]);
61*38fd1498Szrj       break;
62*38fd1498Szrj     case SYMBOL_REF:
63*38fd1498Szrj       if (XSTR (x, 0))
64*38fd1498Szrj 	hstate.add (XSTR (x, 0), strlen (XSTR (x, 0)) + 1);
65*38fd1498Szrj       return;
66*38fd1498Szrj     case LABEL_REF:
67*38fd1498Szrj     case DEBUG_EXPR:
68*38fd1498Szrj     case VALUE:
69*38fd1498Szrj     case SCRATCH:
70*38fd1498Szrj     case CONST_DOUBLE:
71*38fd1498Szrj     case CONST_FIXED:
72*38fd1498Szrj     case DEBUG_IMPLICIT_PTR:
73*38fd1498Szrj     case DEBUG_PARAMETER_REF:
74*38fd1498Szrj       return;
75*38fd1498Szrj     default:
76*38fd1498Szrj       break;
77*38fd1498Szrj     }
78*38fd1498Szrj 
79*38fd1498Szrj   fmt = GET_RTX_FORMAT (code);
80*38fd1498Szrj   for (i = GET_RTX_LENGTH (code) - 1; i >= 0; i--)
81*38fd1498Szrj     switch (fmt[i])
82*38fd1498Szrj       {
83*38fd1498Szrj       case 'w':
84*38fd1498Szrj 	hstate.add_hwi (XWINT (x, i));
85*38fd1498Szrj 	break;
86*38fd1498Szrj       case 'n':
87*38fd1498Szrj       case 'i':
88*38fd1498Szrj 	hstate.add_int (XINT (x, i));
89*38fd1498Szrj 	break;
90*38fd1498Szrj       case 'p':
91*38fd1498Szrj 	hstate.add_poly_int (SUBREG_BYTE (x));
92*38fd1498Szrj 	break;
93*38fd1498Szrj       case 'V':
94*38fd1498Szrj       case 'E':
95*38fd1498Szrj 	j = XVECLEN (x, i);
96*38fd1498Szrj 	hstate.add_int (j);
97*38fd1498Szrj 	for (j = 0; j < XVECLEN (x, i); j++)
98*38fd1498Szrj 	  inchash::add_rtx (XVECEXP (x, i, j), hstate);
99*38fd1498Szrj 	break;
100*38fd1498Szrj       case 'e':
101*38fd1498Szrj 	inchash::add_rtx (XEXP (x, i), hstate);
102*38fd1498Szrj 	break;
103*38fd1498Szrj       case 'S':
104*38fd1498Szrj       case 's':
105*38fd1498Szrj 	if (XSTR (x, i))
106*38fd1498Szrj 	  hstate.add (XSTR (x, 0), strlen (XSTR (x, 0)) + 1);
107*38fd1498Szrj 	break;
108*38fd1498Szrj       default:
109*38fd1498Szrj 	break;
110*38fd1498Szrj       }
111*38fd1498Szrj }
112*38fd1498Szrj 
113*38fd1498Szrj }
114