1 /* Measuring the complexity of svalues/regions.
2 Copyright (C) 2020-2021 Free Software Foundation, Inc.
3 Contributed by David Malcolm <dmalcolm@redhat.com>.
5 This file is part of GCC.
7 GCC is free software; you can redistribute it and/or modify it
8 under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 3, or (at your option)
12 GCC is distributed in the hope that it will be useful, but
13 WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with GCC; see the file COPYING3. If not see
19 <http://www.gnu.org/licenses/>. */
23 #include "coretypes.h"
25 #include "diagnostic-core.h"
26 #include "gimple-pretty-print.h"
28 #include "basic-block.h"
30 #include "gimple-iterator.h"
31 #include "diagnostic-core.h"
36 #include "stringpool.h"
39 #include "fold-const.h"
40 #include "tree-pretty-print.h"
46 #include "analyzer/analyzer.h"
47 #include "analyzer/analyzer-logging.h"
52 #include "analyzer/call-string.h"
53 #include "analyzer/program-point.h"
54 #include "analyzer/store.h"
55 #include "analyzer/complexity.h"
56 #include "analyzer/svalue.h"
57 #include "analyzer/region.h"
63 /* struct complexity. */
65 /* Get complexity for a new node that references REG
66 (the complexity of REG, plus one for the new node). */
68 complexity::complexity (const region
*reg
)
69 : m_num_nodes (reg
->get_complexity ().m_num_nodes
+ 1),
70 m_max_depth (reg
->get_complexity ().m_max_depth
+ 1)
74 /* Get complexity for a new node that references SVAL.
75 (the complexity of SVAL, plus one for the new node). */
77 complexity::complexity (const svalue
*sval
)
78 : m_num_nodes (sval
->get_complexity ().m_num_nodes
+ 1),
79 m_max_depth (sval
->get_complexity ().m_max_depth
+ 1)
83 /* Get complexity for a new node that references nodes with complexity
87 complexity::from_pair (const complexity
&c1
, const complexity
&c2
)
89 return complexity (c1
.m_num_nodes
+ c2
.m_num_nodes
+ 1,
90 MAX (c1
.m_max_depth
, c2
.m_max_depth
) + 1);
93 /* Get complexity for a new node that references the svalues in VEC. */
96 complexity::from_vec_svalue (const vec
<const svalue
*> &vec
)
98 unsigned num_nodes
= 0;
99 unsigned max_depth
= 0;
100 for (auto iter_sval
: vec
)
102 const complexity
&iter_c
= iter_sval
->get_complexity ();
103 num_nodes
+= iter_c
.m_num_nodes
;
104 max_depth
= MAX (max_depth
, iter_c
.m_max_depth
);
106 return complexity (num_nodes
+ 1, max_depth
+ 1);
111 #endif /* #if ENABLE_ANALYZER */