summaryrefslogtreecommitdiffstats
path: root/iterators.h
blob: 8672ccf9703a431e762aa004dd40007f68fb7c16 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
/* Various iterators.

   Copyright (C) 2019 SUSE LLC.

   This program is free software; you can redistribute it and/or modify
   it under the terms of the GNU General Public License as published by
   the Free Software Foundation; either version 2, or (at your option)
   any later version.

   This program is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   GNU General Public License for more details.

   You should have received a copy of the GNU General Public License
   along with this program; see the file COPYING.  If not, write to
   the Free Software Foundation, 51 Franklin Street - Fifth Floor,
   Boston, MA 02110-1301, USA.  */


/* CU iterators.  */

#define FOREACH_CU(CU)				\
  for (CU = first_cu; CU; CU = CU->cu_next)

#define FOREACH_CU_PU(CU)						\
  for (CU = first_cu; CU && CU->cu_kind == CU_PU; CU = CU->cu_next)

#define FOREACH_CU_NORMAL(CU)						\
  for (CU = first_cu; CU && CU->cu_kind != CU_TYPES; CU = CU->cu_next)	\
    if (CU->cu_kind == CU_NORMAL)

#define FOREACH_CU_TYPES(CU)			\
  for (CU = first_cu; CU; CU = CU->cu_next)	\
    if (CU->cu_kind == CU_TYPES)		\

/* Function that describes a depth-first traversal path visiting all dies.  */

static inline dw_die_ref FORCE_INLINE
next_die (dw_die_ref die)
{
  if (die->die_child != NULL)
    return die->die_child;

  while (1)
    {
      if (die->die_sib != NULL)
	return die->die_sib;

      if (die->die_root)
	return NULL;

      die = die->die_parent;
    }
}

/* Function that describes a depth-first traversal path visiting all toplevel
   dies.  */

static inline dw_die_ref FORCE_INLINE
next_toplevel_die (dw_die_ref die)
{
  if (die->die_child != NULL && die->die_child->die_toplevel)
    return die->die_child;

  while (1)
    {
      if (die->die_sib != NULL && die->die_sib->die_toplevel)
	return die->die_sib;

      if (die->die_root)
	return NULL;

      die = die->die_parent;
    }
}

/* DIE_IN_CU iterators.  */

#define FOREACH_DIE_IN_CU(DIE, CU)			\
  for (DIE = CU->cu_die; DIE; DIE = next_die (DIE))

#define FOREACH_TOPLEVEL_DIE_IN_CU(DIE, CU)			\
  for (DIE = CU->cu_die; DIE; DIE = next_toplevel_die (DIE))

#define FOREACH_LOW_TOPLEVEL_DIE_IN_CU(DIE, CU)		\
  FOREACH_TOPLEVEL_DIE_IN_CU (DIE, CU)			\
    if (!(die->die_root || die->die_named_namespace))

/* DIE iterators.  */

#define FOREACH_DIE(CU, DIE)			\
  FOREACH_CU (CU)				\
    FOREACH_DIE_IN_CU (DIE, CU)

#define FOREACH_TOPLEVEL_DIE(CU, DIE)		\
  FOREACH_CU (CU)				\
    FOREACH_TOPLEVEL_DIE_IN_CU (DIE, CU)

#define FOREACH_LOW_TOPLEVEL_DIE(CU, DIE)	\
  FOREACH_CU (CU)				\
    FOREACH_LOW_TOPLEVEL_DIE_IN_CU (DIE, CU)

#define FOREACH_CU_PU_TOPLEVEL_DIE(CU, DIE)	\
  FOREACH_CU_PU (CU)				\
    FOREACH_TOPLEVEL_DIE_IN_CU (DIE, CU)

#define FOREACH_CU_NORMAL_TOPLEVEL_DIE(CU, DIE)	\
  FOREACH_CU_NORMAL (CU)			\
    FOREACH_TOPLEVEL_DIE_IN_CU (DIE, CU)

#define FOREACH_CU_TYPES_TOPLEVEL_DIE(CU, DIE)	\
  FOREACH_CU_TYPES (CU)				\
    FOREACH_TOPLEVEL_DIE_IN_CU (DIE, CU)

#define FOREACH_CU_PU_LOW_TOPLEVEL_DIE(CU, DIE)	\
  FOREACH_CU_PU (CU)				\
    FOREACH_LOW_TOPLEVEL_DIE_IN_CU (DIE, CU)

#define FOREACH_CU_NORMAL_LOW_TOPLEVEL_DIE(CU, DIE)	\
  FOREACH_CU_NORMAL (CU)				\
    FOREACH_LOW_TOPLEVEL_DIE_IN_CU (DIE, CU)

#define FOREACH_CU_TYPES_LOW_TOPLEVEL_DIE(CU, DIE)	\
  FOREACH_CU_TYPES (CU)					\
    FOREACH_LOW_TOPLEVEL_DIE_IN_CU (DIE, CU)