Update gcc-50 to SVN version 222321 (gcc-5-branch)
[dragonfly.git] / contrib / gcc-5.0 / gcc / dwarf2out.h
1 /* dwarf2out.h - Various declarations for functions found in dwarf2out.c
2    Copyright (C) 1998-2015 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 under
7 the terms of the GNU General Public License as published by the Free
8 Software Foundation; either version 3, or (at your option) any later
9 version.
10
11 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
12 WARRANTY; without even the implied warranty of MERCHANTABILITY or
13 FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
14 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 #ifndef GCC_DWARF2OUT_H
21 #define GCC_DWARF2OUT_H 1
22
23 #include "dwarf2.h"     /* ??? Remove this once only used by dwarf2foo.c.  */
24 #include "wide-int.h"
25
26 typedef struct die_struct *dw_die_ref;
27 typedef const struct die_struct *const_dw_die_ref;
28
29 typedef struct dw_val_node *dw_val_ref;
30 typedef struct dw_cfi_node *dw_cfi_ref;
31 typedef struct dw_loc_descr_node *dw_loc_descr_ref;
32 typedef struct dw_loc_list_struct *dw_loc_list_ref;
33 typedef wide_int *wide_int_ptr;
34
35
36 /* Call frames are described using a sequence of Call Frame
37    Information instructions.  The register number, offset
38    and address fields are provided as possible operands;
39    their use is selected by the opcode field.  */
40
41 enum dw_cfi_oprnd_type {
42   dw_cfi_oprnd_unused,
43   dw_cfi_oprnd_reg_num,
44   dw_cfi_oprnd_offset,
45   dw_cfi_oprnd_addr,
46   dw_cfi_oprnd_loc
47 };
48
49 typedef union GTY(()) {
50   unsigned int GTY ((tag ("dw_cfi_oprnd_reg_num"))) dw_cfi_reg_num;
51   HOST_WIDE_INT GTY ((tag ("dw_cfi_oprnd_offset"))) dw_cfi_offset;
52   const char * GTY ((tag ("dw_cfi_oprnd_addr"))) dw_cfi_addr;
53   struct dw_loc_descr_node * GTY ((tag ("dw_cfi_oprnd_loc"))) dw_cfi_loc;
54 } dw_cfi_oprnd;
55
56 struct GTY(()) dw_cfi_node {
57   enum dwarf_call_frame_info dw_cfi_opc;
58   dw_cfi_oprnd GTY ((desc ("dw_cfi_oprnd1_desc (%1.dw_cfi_opc)")))
59     dw_cfi_oprnd1;
60   dw_cfi_oprnd GTY ((desc ("dw_cfi_oprnd2_desc (%1.dw_cfi_opc)")))
61     dw_cfi_oprnd2;
62 };
63
64
65 typedef vec<dw_cfi_ref, va_gc> *cfi_vec;
66
67 typedef struct dw_fde_node *dw_fde_ref;
68
69 /* All call frame descriptions (FDE's) in the GCC generated DWARF
70    refer to a single Common Information Entry (CIE), defined at
71    the beginning of the .debug_frame section.  This use of a single
72    CIE obviates the need to keep track of multiple CIE's
73    in the DWARF generation routines below.  */
74
75 struct GTY(()) dw_fde_node {
76   tree decl;
77   const char *dw_fde_begin;
78   const char *dw_fde_current_label;
79   const char *dw_fde_end;
80   const char *dw_fde_vms_end_prologue;
81   const char *dw_fde_vms_begin_epilogue;
82   const char *dw_fde_second_begin;
83   const char *dw_fde_second_end;
84   cfi_vec dw_fde_cfi;
85   int dw_fde_switch_cfi_index; /* Last CFI before switching sections.  */
86   HOST_WIDE_INT stack_realignment;
87
88   unsigned funcdef_number;
89   unsigned fde_index;
90
91   /* Dynamic realign argument pointer register.  */
92   unsigned int drap_reg;
93   /* Virtual dynamic realign argument pointer register.  */
94   unsigned int vdrap_reg;
95   /* These 3 flags are copied from rtl_data in function.h.  */
96   unsigned all_throwers_are_sibcalls : 1;
97   unsigned uses_eh_lsda : 1;
98   unsigned nothrow : 1;
99   /* Whether we did stack realign in this call frame.  */
100   unsigned stack_realign : 1;
101   /* Whether dynamic realign argument pointer register has been saved.  */
102   unsigned drap_reg_saved: 1;
103   /* True iff dw_fde_begin label is in text_section or cold_text_section.  */
104   unsigned in_std_section : 1;
105   /* True iff dw_fde_second_begin label is in text_section or
106      cold_text_section.  */
107   unsigned second_in_std_section : 1;
108 };
109
110
111 /* This is how we define the location of the CFA. We use to handle it
112    as REG + OFFSET all the time,  but now it can be more complex.
113    It can now be either REG + CFA_OFFSET or *(REG + BASE_OFFSET) + CFA_OFFSET.
114    Instead of passing around REG and OFFSET, we pass a copy
115    of this structure.  */
116 struct GTY(()) dw_cfa_location {
117   HOST_WIDE_INT offset;
118   HOST_WIDE_INT base_offset;
119   /* REG is in DWARF_FRAME_REGNUM space, *not* normal REGNO space.  */
120   unsigned int reg;
121   BOOL_BITFIELD indirect : 1;  /* 1 if CFA is accessed via a dereference.  */
122   BOOL_BITFIELD in_use : 1;    /* 1 if a saved cfa is stored here.  */
123 };
124
125
126 /* Each DIE may have a series of attribute/value pairs.  Values
127    can take on several forms.  The forms that are used in this
128    implementation are listed below.  */
129
130 enum dw_val_class
131 {
132   dw_val_class_none,
133   dw_val_class_addr,
134   dw_val_class_offset,
135   dw_val_class_loc,
136   dw_val_class_loc_list,
137   dw_val_class_range_list,
138   dw_val_class_const,
139   dw_val_class_unsigned_const,
140   dw_val_class_const_double,
141   dw_val_class_wide_int,
142   dw_val_class_vec,
143   dw_val_class_flag,
144   dw_val_class_die_ref,
145   dw_val_class_fde_ref,
146   dw_val_class_lbl_id,
147   dw_val_class_lineptr,
148   dw_val_class_str,
149   dw_val_class_macptr,
150   dw_val_class_file,
151   dw_val_class_data8,
152   dw_val_class_decl_ref,
153   dw_val_class_vms_delta,
154   dw_val_class_high_pc
155 };
156
157 /* Describe a floating point constant value, or a vector constant value.  */
158
159 struct GTY(()) dw_vec_const {
160   unsigned char * GTY((atomic)) array;
161   unsigned length;
162   unsigned elt_size;
163 };
164
165 struct addr_table_entry_struct;
166
167 /* The dw_val_node describes an attribute's value, as it is
168    represented internally.  */
169
170 struct GTY(()) dw_val_node {
171   enum dw_val_class val_class;
172   struct addr_table_entry_struct * GTY(()) val_entry;
173   union dw_val_struct_union
174     {
175       rtx GTY ((tag ("dw_val_class_addr"))) val_addr;
176       unsigned HOST_WIDE_INT GTY ((tag ("dw_val_class_offset"))) val_offset;
177       dw_loc_list_ref GTY ((tag ("dw_val_class_loc_list"))) val_loc_list;
178       dw_loc_descr_ref GTY ((tag ("dw_val_class_loc"))) val_loc;
179       HOST_WIDE_INT GTY ((default)) val_int;
180       unsigned HOST_WIDE_INT GTY ((tag ("dw_val_class_unsigned_const"))) val_unsigned;
181       double_int GTY ((tag ("dw_val_class_const_double"))) val_double;
182       wide_int_ptr GTY ((tag ("dw_val_class_wide_int"))) val_wide;
183       dw_vec_const GTY ((tag ("dw_val_class_vec"))) val_vec;
184       struct dw_val_die_union
185         {
186           dw_die_ref die;
187           int external;
188         } GTY ((tag ("dw_val_class_die_ref"))) val_die_ref;
189       unsigned GTY ((tag ("dw_val_class_fde_ref"))) val_fde_index;
190       struct indirect_string_node * GTY ((tag ("dw_val_class_str"))) val_str;
191       char * GTY ((tag ("dw_val_class_lbl_id"))) val_lbl_id;
192       unsigned char GTY ((tag ("dw_val_class_flag"))) val_flag;
193       struct dwarf_file_data * GTY ((tag ("dw_val_class_file"))) val_file;
194       unsigned char GTY ((tag ("dw_val_class_data8"))) val_data8[8];
195       tree GTY ((tag ("dw_val_class_decl_ref"))) val_decl_ref;
196       struct dw_val_vms_delta_union
197         {
198           char * lbl1;
199           char * lbl2;
200         } GTY ((tag ("dw_val_class_vms_delta"))) val_vms_delta;
201     }
202   GTY ((desc ("%1.val_class"))) v;
203 };
204
205 /* Locations in memory are described using a sequence of stack machine
206    operations.  */
207
208 struct GTY((chain_next ("%h.dw_loc_next"))) dw_loc_descr_node {
209   dw_loc_descr_ref dw_loc_next;
210   ENUM_BITFIELD (dwarf_location_atom) dw_loc_opc : 8;
211   /* Used to distinguish DW_OP_addr with a direct symbol relocation
212      from DW_OP_addr with a dtp-relative symbol relocation.  */
213   unsigned int dtprel : 1;
214   int dw_loc_addr;
215   dw_val_node dw_loc_oprnd1;
216   dw_val_node dw_loc_oprnd2;
217 };
218
219
220 /* Interface from dwarf2out.c to dwarf2cfi.c.  */
221 extern struct dw_loc_descr_node *build_cfa_loc
222   (dw_cfa_location *, HOST_WIDE_INT);
223 extern struct dw_loc_descr_node *build_cfa_aligned_loc
224   (dw_cfa_location *, HOST_WIDE_INT offset, HOST_WIDE_INT alignment);
225 extern struct dw_loc_descr_node *mem_loc_descriptor
226   (rtx, machine_mode mode, machine_mode mem_mode,
227    enum var_init_status);
228 extern bool loc_descr_equal_p (dw_loc_descr_ref, dw_loc_descr_ref);
229 extern dw_fde_ref dwarf2out_alloc_current_fde (void);
230
231 extern unsigned long size_of_locs (dw_loc_descr_ref);
232 extern void output_loc_sequence (dw_loc_descr_ref, int);
233 extern void output_loc_sequence_raw (dw_loc_descr_ref);
234
235 /* Interface from dwarf2cfi.c to dwarf2out.c.  */
236 extern void lookup_cfa_1 (dw_cfi_ref cfi, dw_cfa_location *loc,
237                           dw_cfa_location *remember);
238 extern bool cfa_equal_p (const dw_cfa_location *, const dw_cfa_location *);
239
240 extern void output_cfi (dw_cfi_ref, dw_fde_ref, int);
241
242 extern GTY(()) cfi_vec cie_cfi_vec;
243
244 /* Interface from dwarf2*.c to the rest of the compiler.  */
245 extern enum dw_cfi_oprnd_type dw_cfi_oprnd1_desc
246   (enum dwarf_call_frame_info cfi);
247 extern enum dw_cfi_oprnd_type dw_cfi_oprnd2_desc
248   (enum dwarf_call_frame_info cfi);
249
250 extern void output_cfi_directive (FILE *f, struct dw_cfi_node *cfi);
251
252 extern void dwarf2out_emit_cfi (dw_cfi_ref cfi);
253
254 extern void debug_dwarf (void);
255 struct die_struct;
256 extern void debug_dwarf_die (struct die_struct *);
257 extern void debug_dwarf_loc_descr (dw_loc_descr_ref);
258 extern void debug (die_struct &ref);
259 extern void debug (die_struct *ptr);
260 extern void dwarf2out_set_demangle_name_func (const char *(*) (const char *));
261 #ifdef VMS_DEBUGGING_INFO
262 extern void dwarf2out_vms_debug_main_pointer (void);
263 #endif
264
265 enum array_descr_ordering
266 {
267   array_descr_ordering_default,
268   array_descr_ordering_row_major,
269   array_descr_ordering_column_major
270 };
271
272 struct array_descr_info
273 {
274   int ndimensions;
275   enum array_descr_ordering ordering;
276   tree element_type;
277   tree base_decl;
278   tree data_location;
279   tree allocated;
280   tree associated;
281   struct array_descr_dimen
282     {
283       /* GCC uses sizetype for array indices, so lower_bound and upper_bound
284          will likely be "sizetype" values. However, bounds may have another
285          type in the original source code.  */
286       tree bounds_type;
287       tree lower_bound;
288       tree upper_bound;
289       tree stride;
290     } dimen[10];
291 };
292
293 void dwarf2out_c_finalize (void);
294
295 #endif /* GCC_DWARF2OUT_H */