irtypes.h 24.5 KB
Newer Older
1
2
/*
 * This file is part of libFirm.
3
 * Copyright (C) 2012 University of Karlsruhe.
4
5
6
7
8
9
10
11
12
13
 */

/**
 * @file
 * @brief   Definition of the Firm IR base types, concentrated here
 * @author  Michael Beck
 */
#ifndef FIRM_IR_IRDEFS_H
#define FIRM_IR_IRDEFS_H

14
15
#include <stdbool.h>

16
17
18
19
20
#include "firm_types.h"
#include "irdom_t.h"
#include "irmode.h"
#include "irnode.h"
#include "iredgekinds.h"
21
#include "irop.h"
22
23
#include "irmemory.h"
#include "callgraph.h"
24
#include "irprog.h"
25
#include "bitset.h"
26
27

#include "pset.h"
28
#include "pmap.h"
29
#include "list.h"
30
#include "obst.h"
31
#include "vrp.h"
32

33
34
35
struct ir_nodemap {
	void **data;  /**< maps node indices to void* */
};
36

37
38
39
40
41
42
43
44
45
46
47
48
49
typedef struct arch_irn_ops_t arch_irn_ops_t;

/**
 * Operation specific callbacks.
 */
typedef struct {
	hash_func             hash;                 /**< Calculate a hash value for an IR node. */
	computed_value_func   computed_value;       /**< Evaluates a node into a tarval if possible. */
	computed_value_func   computed_value_Proj;  /**< Evaluates a Proj node into a tarval if possible. */
	equivalent_node_func  equivalent_node;      /**< Optimizes the node by returning an equivalent one. */
	equivalent_node_func  equivalent_node_Proj; /**< Optimizes the Proj node by returning an equivalent one. */
	transform_node_func   transform_node;       /**< Optimizes the node by transforming it. */
	transform_node_func   transform_node_Proj;  /**< Optimizes the Proj node by transforming it. */
50
	node_attrs_equal_func  attrs_equal;         /**< Compares two node attributes. */
51
52
53
54
55
56
57
58
59
60
61
62
63
	reassociate_func      reassociate;          /**< Reassociate a tree. */
	copy_attr_func        copy_attr;            /**< Copy node attributes. */
	get_type_attr_func    get_type_attr;        /**< Returns the type attribute of a node. */
	get_entity_attr_func  get_entity_attr;      /**< Returns the entity attribute of a node. */
	verify_node_func      verify_node;          /**< Verify the node. */
	verify_proj_node_func verify_proj_node;     /**< Verify the Proj node. */
	dump_node_func        dump_node;            /**< Dump a node. */
	op_func               generic;              /**< A generic function pointer. */
	op_func               generic1;             /**< A generic function pointer. */
	op_func               generic2;             /**< A generic function pointer. */
	const arch_irn_ops_t *be_ops;               /**< callbacks used by the backend. */
} ir_op_ops;

64
65
/** The type of an ir_op. */
struct ir_op {
Matthias Braun's avatar
Matthias Braun committed
66
67
68
69
70
71
72
73
	unsigned code;            /**< The unique opcode of the op. */
	ident *name;              /**< The name of the op. */
	size_t attr_size;         /**< Space needed in memory for private attributes
	                               */
	op_pin_state pin_state;   /**< How to deal with the node in CSE, PRE. */
	op_arity opar;            /**< The arity of operator. */
	int op_index;             /**< The index of the first data operand, 0 for
	                               most cases, 1 for Div etc. */
74
	int memory_index;         /**< index of memory input for memory nodes */
Matthias Braun's avatar
Matthias Braun committed
75
76
77
78
79
80
81
82
83
84
	int pn_x_regular;         /**< for fragile ops the position of the
	                               X_regular output */
	int pn_x_except;          /**< for fragile ops the position of the
	                               X_except output */
	unsigned flags;           /**< Flags describing the behavior of the ir_op,
	                               a bitmasks of irop_flags. */
	unsigned tag;             /**< Some custom TAG value the op's creator set */
	void *attr;               /**< custom pointer where op's creator can attach
	                               attribute stuff to. */
	ir_op_ops ops;            /**< The operations of the this op. */
85
86
};

87
88
89
90
91
92
93
94
95
96
/** Helper values for ir_mode_sort. */
enum ir_mode_sort_helper {
	irmsh_is_num   = 0x10, /**< mode represents a number */
	irmsh_is_data  = 0x20, /**< mode represents data (can be carried in registers) */
};

/**
 * These values represent the different mode classes of value representations.
 */
typedef enum ir_mode_sort {
97
98
99
	irms_auxiliary        = 0,
	irms_internal_boolean = 1 | irmsh_is_data,
	irms_data             = 2 | irmsh_is_data,
100
101
102

	/** A mode to represent entities.
	    Restricted int computations can be performed */
103
	irms_reference        = 3 | irmsh_is_data,
104
105
	/** A mode to represent int numbers.
	    Integer computations can be performed. */
106
	irms_int_number       = 4 | irmsh_is_data | irmsh_is_num,
107
108
	/** A mode to represent float numbers.
	    Floating point computations can be performed. */
109
	irms_float_number     = 5 | irmsh_is_data | irmsh_is_num,
110
111
112
113
114
115
116
117
118
119
120
} ir_mode_sort;

/**
 * A descriptor for an IEEE754 float value.
 */
typedef struct float_descriptor_t {
	unsigned char exponent_size;    /**< size of exponent in bits */
	unsigned char mantissa_size;    /**< size of mantissa in bits */
	bool          explicit_one;     /**< set if the leading one is explicit */
} float_descriptor_t;

121
122
123
124
125
126
127
128
129
/**
 * Contains relevant information about a mode.
 *
 * Necessary information about a mode is stored in this struct
 * which is used by the tarval module to perform calculations
 * and comparisons of values of a such described mode.
 *
 * ATTRIBUTES:
 *  -  ident *name:             Name of this mode. Two modes are different if the name is different.
130
 *  -  ir_mode_sort sort:       sort of mode specifying possible usage categories
131
132
133
134
135
136
137
138
139
140
141
142
143
 *  -  int    size:             size of the mode in Bits.
 *  -  unsigned sign:1:         signedness of this mode
 *  -  ... more to come
 *  -  modulo_shift             specifies for modes of kind irms_int_number
 *                              whether shift applies modulo to value of bits to shift
 *
 * SEE ALSO:
 *    The tech report 1999-44 describing FIRM and predefined modes
 *    tarval.h
 */
struct ir_mode {
	firm_kind         kind;       /**< distinguishes this node from others */
	ident             *name;      /**< Name ident of this mode */
144
	ir_type           *type;      /**< corresponding primitive type */
145

146
	/* ---------------------------------------------------------------------- */
147
	/* On changing this struct you have to evaluate the mode_are_equal function!*/
148
149
150
151
152
	ir_mode_sort       sort;          /**< coarse classification of this mode:
                                           int, float, reference ...
                                           (see irmode.h) */
	ir_mode_arithmetic arithmetic;    /**< different arithmetic operations possible with a mode */
	unsigned           size;          /**< size of the mode in Bits. */
153
154
155
	bool               sign:1;        /**< signedness of this mode */
	ENUMBF(float_int_conversion_overflow_style_t)
	                   int_conv_overflow:1;
Matthias Braun's avatar
Matthias Braun committed
156
	unsigned           modulo_shift;  /**< number of bits a values of this mode will be shifted */
157
	float_descriptor_t float_desc;
158

159
	/* ---------------------------------------------------------------------- */
Matthias Braun's avatar
Matthias Braun committed
160
161
162
163
164
	ir_tarval         *min;         /**< the minimum value that can be expressed */
	ir_tarval         *max;         /**< the maximum value that can be expressed */
	ir_tarval         *null;        /**< the value 0 */
	ir_tarval         *one;         /**< the value 1 */
	ir_tarval         *all_one;     /**< the value ~0 */
165
166
	ir_tarval         *infinity;    /**< the infinity value */
	ir_tarval         *nan;         /** the not a number (NaN) value */
167
168
169
	ir_mode           *eq_unsigned; /**< For pointer modes, the equivalent unsigned integer one. */
};

Matthias Braun's avatar
Matthias Braun committed
170
171
172
173
174
175
176
177
178
179
180
181
/* note: we use "long" here because that is the type used for Proj-Numbers */
typedef struct ir_switch_table_entry {
	ir_tarval *min;
	ir_tarval *max;
	long       pn;
} ir_switch_table_entry;

struct ir_switch_table {
	size_t                n_entries;
	ir_switch_table_entry entries[];
};

182
183
/* ir node attributes */

Matthias Braun's avatar
Matthias Braun committed
184
/** Attributes for Block nodes. */
185
typedef struct block_attr {
186
	/* General attributes */
187
	ir_visited_t block_visited; /**< For the walker that walks over all blocks. */
188
189
	/* Attributes private to construction: */
	unsigned is_matured:1;      /**< If set, all in-nodes of the block are fixed. */
190
	unsigned dynamic_ins:1;     /**< if set in-array is an ARR_F on the heap. */
191
	unsigned marked:1;          /**< Can be set/unset to temporary mark a block. */
192
193
	ir_node **graph_arr;        /**< An array to store all parameters. */
	/* Attributes holding analyses information */
Matthias Braun's avatar
Matthias Braun committed
194
	ir_dom_info dom;            /**< Datastructure that holds information about dominators. */
195
	ir_dom_info pdom;           /**< Datastructure that holds information about post-dominators. */
196
	bitset_t *backedge;         /**< Bitfield n set to true if pred n is backedge.*/
197
	ir_entity *entity;          /**< entity representing this block */
198
	ir_node  *phis;             /**< The list of Phi nodes in this block. */
199
	double    execfreq;         /**< block execution frequency */
200
201
} block_attr;

Matthias Braun's avatar
Matthias Braun committed
202
/** Attributes for Cond nodes. */
203
typedef struct cond_attr {
204
	cond_jmp_predicate jmp_pred; /**< only for binary Conds: The jump predication. */
205
206
} cond_attr;

Matthias Braun's avatar
Matthias Braun committed
207
/** Attributes for Const nodes. */
Matthias Braun's avatar
Matthias Braun committed
208
209
typedef struct const_attr {
	ir_tarval *tarval;  /**< the target value */
210
211
} const_attr;

Matthias Braun's avatar
Matthias Braun committed
212
/** Attributes for Address and Offset nodes. */
213
typedef struct entconst_attr {
214
	ir_entity *entity;
215
216
} entconst_attr;

Matthias Braun's avatar
Matthias Braun committed
217
/** Attributes for TypeConst nodes. */
218
typedef struct typeconst_attr {
219
	ir_type *type;
220
} typeconst_attr;
221

Matthias Braun's avatar
Matthias Braun committed
222
/** Attributes for Member nodes. */
223
typedef struct member_attr {
Matthias Braun's avatar
Matthias Braun committed
224
	ir_entity *entity; /**< entity to select */
225
226
} member_attr;

Matthias Braun's avatar
Matthias Braun committed
227
/** Attributes for Sel nodes. */
228
typedef struct sel_attr {
229
	ir_type *type;
230
231
} sel_attr;

Matthias Braun's avatar
Matthias Braun committed
232
/** Attributes for nodes with exceptions (fragile flag). */
233
typedef struct except_attr {
234
235
236
237
238
239
	unsigned  pin_state : 2;         /**< the pin state for operations with
	                                      variable pinned state. Contains a
	                                      op_pin_state */
	unsigned  throws_exception : 1; /**< if true a fragile op throws and
	                                     must produce X_except and X_regular
	                                     values */
240
241
} except_attr;

Matthias Braun's avatar
Matthias Braun committed
242
/** Attributes for Call nodes. */
243
typedef struct call_attr {
244
245
246
	except_attr exc;               /**< the exception attribute. MUST be the first one. */
	ir_type     *type;             /**< type of called procedure */
	ir_entity   **callee_arr;      /**< result of callee analysis */
247
248
} call_attr;

Matthias Braun's avatar
Matthias Braun committed
249
/** Attributes for Builtin nodes. */
250
typedef struct builtin_attr {
251
252
	except_attr     exc;           /**< the exception attribute. MUST be the first one. */
	ir_builtin_kind kind;          /**< kind of the called builtin procedure */
253
	ir_type         *type;         /**< type of called builtin procedure */
254
255
} builtin_attr;

Matthias Braun's avatar
Matthias Braun committed
256
/** Attributes for Alloc nodes. */
257
typedef struct alloc_attr {
258
	unsigned alignment;
259
260
} alloc_attr;

Matthias Braun's avatar
Matthias Braun committed
261
/** Attributes for Load nodes. */
262
typedef struct load_attr {
263
	except_attr   exc;            /**< The exception attribute. MUST be the first one. */
264
265
	ENUMBF(ir_volatility) volatility:1;   /**< The volatility of this Load operation. */
	ENUMBF(ir_align)      unaligned:1;    /**< The align attribute of this Load operation. */
266
	ir_mode       *mode;          /**< The mode of this Load operation. */
267
268
} load_attr;

Matthias Braun's avatar
Matthias Braun committed
269
/** Attributes for Store nodes. */
270
typedef struct store_attr {
271
	except_attr   exc;            /**< the exception attribute. MUST be the first one. */
272
273
	ENUMBF(ir_volatility) volatility:1;   /**< The volatility of this Store operation. */
	ENUMBF(ir_align)      unaligned:1;    /**< The align attribute of this Store operation. */
274
275
} store_attr;

Matthias Braun's avatar
Matthias Braun committed
276
/** Attributes for Phi nodes. */
277
typedef struct phi_attr {
Matthias Braun's avatar
Matthias Braun committed
278
	ir_node *next; /**< Points to the next Phi in the Phi list of a block. */
279
	union {
Matthias Braun's avatar
Matthias Braun committed
280
281
282
283
284
285
		bitset_t *backedge; /**< Raw Bitset: pred n is backedge iff n is set. */
		/** For Phi0. Used to remember the value defined by this Phi node.
		 * Needed when the Phi is completed to call get_r_internal_value() to
		 * find the predecessors. If this attribute is set, the Phi node takes
		 * the role of the obsolete Phi0 node, therefore the name. */
		int       pos;
286
	} u;
287
	unsigned loop:1; /**< Set to true if this is a loop PhiM node. */
288
289
} phi_attr;

Matthias Braun's avatar
Matthias Braun committed
290
/** Attributes for Cmp nodes. */
291
typedef struct cmp_attr {
Matthias Braun's avatar
Matthias Braun committed
292
	ir_relation relation; /**< comparison condition. */
293
} cmp_attr;
294

Matthias Braun's avatar
Matthias Braun committed
295
/** Attributes for Confirm nodes. */
296
typedef struct confirm_attr {
Matthias Braun's avatar
Matthias Braun committed
297
	ir_relation relation; /**< relation between value and bound */
298
299
} confirm_attr;

Matthias Braun's avatar
Matthias Braun committed
300
/** Attributes for CopyB nodes. */
301
typedef struct copyb_attr {
Matthias Braun's avatar
Matthias Braun committed
302
303
	ir_type *type;                      /**< Type of the copied entity. */
	ENUMBF(ir_volatility) volatility:1; /**< Volatility of this CopyB. */
304
305
} copyb_attr;

Matthias Braun's avatar
Matthias Braun committed
306
/** Attributes for Div nodes. */
307
typedef struct div_attr {
Matthias Braun's avatar
Matthias Braun committed
308
309
310
311
	except_attr exc;          /**< The exception attribute. MUST be first. */
	ir_mode    *resmode;      /**< Result mode for the division. */
	char        no_remainder; /**< Set, if known that a division can be done
	                               without a remainder. */
312
313
} div_attr;

Matthias Braun's avatar
Matthias Braun committed
314
/** Attributes for Mod nodes. */
315
typedef struct mod_attr {
Matthias Braun's avatar
Matthias Braun committed
316
317
	except_attr exc;     /**< The exception attribute. MUST be first. */
	ir_mode    *resmode; /**< Result mode for the division. */
318
} mod_attr;
319

Matthias Braun's avatar
Matthias Braun committed
320
/** Attributes for ASM nodes. */
321
typedef struct asm_attr {
322
	except_attr        exc; /**< The exception attribute. MUST be first. */
Matthias Braun's avatar
Matthias Braun committed
323
324
325
326
	ident             *text;               /**< The inline assembler text. */
	ir_asm_constraint *input_constraints;  /**< Input constraints. */
	ir_asm_constraint *output_constraints; /**< Output constraints. */
	ident            **clobbers;           /**< List of clobbered registers. */
327
328
} asm_attr;

Matthias Braun's avatar
Matthias Braun committed
329
/** Attributes for Proj nodes. */
330
typedef struct proj_attr {
Matthias Braun's avatar
Matthias Braun committed
331
	long proj; /**< number of tuple sub-value which is projected */
332
333
} proj_attr;

Matthias Braun's avatar
Matthias Braun committed
334
/** Attributes for Switch nodes. */
Matthias Braun's avatar
Matthias Braun committed
335
336
337
338
339
typedef struct switch_attr {
	unsigned         n_outs;
	ir_switch_table *table;
} switch_attr;

Matthias Braun's avatar
Matthias Braun committed
340
/** Union with all possible node attributes. */
341
typedef union ir_attr {
Matthias Braun's avatar
Matthias Braun committed
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
	block_attr     block;
	cmp_attr       cmp;
	cond_attr      cond;
	const_attr     con;
	entconst_attr  entc;
	typeconst_attr typec;
	sel_attr       sel;
	member_attr    member;
	call_attr      call;
	builtin_attr   builtin;
	alloc_attr     alloc;
	load_attr      load;
	store_attr     store;
	phi_attr       phi;
	proj_attr      proj;
	confirm_attr   confirm;
	except_attr    except;
	copyb_attr     copyb;
	div_attr       div;
	mod_attr       mod;
	asm_attr       assem;
	switch_attr    switcha;
364
} ir_attr;
365
366
367
368

/**
 * Edge info to put into an irn.
 */
369
typedef struct irn_edge_kind_info_t {
370
	struct list_head outs_head;  /**< The list of all outs. */
Michael Beck's avatar
Michael Beck committed
371
372
	unsigned edges_built : 1;    /**< Set edges where built for this node. */
	unsigned out_count : 31;     /**< Number of outs in the list. */
373
374
} irn_edge_info_t;

375
typedef irn_edge_info_t irn_edges_info_t[EDGE_KIND_LAST+1];
376

377
378
379
/**
 * A Def-Use edge.
 */
380
typedef struct ir_def_use_edge {
381
382
383
384
	ir_node *use;            /** The use node of that edge. */
	int     pos;             /** The position of this edge in use's input array. */
} ir_def_use_edge;

Matthias Braun's avatar
Matthias Braun committed
385
386
387
388
389
typedef struct ir_def_use_edges {
	unsigned        n_edges;
	ir_def_use_edge edges[];
} ir_def_use_edges;

390
391
392
393
394
395
396
/**
 * The common structure of an irnode.
 * If the node has some attributes, they are stored in the attr field.
 */
struct ir_node {
	/* ------- Basics of the representation  ------- */
	firm_kind kind;          /**< Distinguishes this node from others. */
Michael Beck's avatar
Michael Beck committed
397
	unsigned node_idx;       /**< The node index of this node in its graph. */
398
399
400
	ir_op *op;               /**< The Opcode of this node. */
	ir_mode *mode;           /**< The Mode of this node. */
	struct ir_node **in;     /**< The array of predecessors / operands. */
401
	ir_graph *irg;
402
	ir_visited_t visited;    /**< The visited counter for walks of the graph. */
403
	void *link;              /**< To attach additional information to the node, e.g.
Michael Beck's avatar
Michael Beck committed
404
	                              used during optimization to link to nodes that
405
	                              shall replace a node. */
406
	long node_nr;            /**< A globally unique node number for each node. */
407
	/* ------- Fields for optimizations / analysis information ------- */
Matthias Braun's avatar
Matthias Braun committed
408
409
410
411
412
413
	union {
		ir_def_use_edges *out;    /**< array of def-use edges. */
		unsigned          n_outs; /**< number of def-use edges (temporarily used
		                               during construction of datastructure ) */
	} o;
	struct dbg_info  *dbi;   /**< A pointer to information for debug support. */
414
415
416
	/* ------- For analyses -------- */
	ir_loop *loop;           /**< the loop the node is in. Access routines in irloop.h */
	struct ir_node **deps;   /**< Additional dependencies induced by state. */
417
	void            *backend_info;
418
	irn_edges_info_t edge_info;  /**< Everlasting out edges. */
419

420
	/* ------- Opcode depending fields -------- */
421
	ir_attr attr;            /**< The set of attributes of this node. Depends on opcode.
422
423
424
	                              Must be last field of struct ir_node. */
};

425
426
#include "iredgeset.h"

427
428
429
/**
 * Edge info to put into an irg.
 */
430
typedef struct irg_edge_info_t {
431
432
433
434
435
	ir_edgeset_t     edges;          /**< A set containing all edges of the current graph. */
	struct list_head free_edges;     /**< list of all free edges. */
	struct obstack   edges_obst;     /**< Obstack, where edges are allocated on. */
	unsigned         allocated : 1;  /**< Set if edges are allocated on the obstack. */
	unsigned         activated : 1;  /**< Set if edges are activated for the graph. */
436
437
} irg_edge_info_t;

438
typedef irg_edge_info_t irg_edges_info_t[EDGE_KIND_LAST+1];
439
440

/**
441
 * Index constants for nodes that can be accessed through the graph anchor node.
442
 */
443
444
445
446
typedef enum irg_anchors {
	anchor_first,
	anchor_end_block = anchor_first, /**< block the end node will belong to,
	                                      same as Anchors block */
447
	anchor_start_block,      /**< block the start node will belong to */
448
	anchor_end,              /**< end node of this ir_graph */
449
	anchor_start,            /**< start node of this ir_graph */
450
451
	anchor_initial_exec,     /**< methods initial control flow */
	anchor_frame,            /**< methods frame */
452
453
454
	anchor_initial_mem,      /**< initial memory of this graph */
	anchor_args,             /**< methods arguments */
	anchor_no_mem,           /**< NoMem node of this ir_graph, the one and only in this graph */
455
456
457
	anchor_last = anchor_no_mem
} irg_anchors;
ENUM_COUNTABLE(irg_anchors)
458
459
460
461
462

/** A callgraph entry for callees. */
typedef struct cg_callee_entry {
	ir_graph  *irg;        /**< The called irg. */
	ir_node  **call_list;  /**< The list of all calls to the irg. */
463
	size_t     max_depth;  /**< Maximum depth of all Call nodes to irg. */
464
465
} cg_callee_entry;

466
467
468
469
470
typedef struct ir_bitinfo {
	struct ir_nodemap map;
	struct obstack    obst;
} ir_bitinfo;

471
472
473
474
475
typedef struct ir_vrp_info {
	struct ir_nodemap infos;
	struct obstack    obst;
} ir_vrp_info;

476
477
478
479
/**
 * An ir_graph holds all information for a procedure.
 */
struct ir_graph {
Matthias Braun's avatar
Matthias Braun committed
480
481
482
483
484
485
486
487
488
	firm_kind   kind;          /**< Always set to k_ir_graph. */
	unsigned    last_node_idx; /**< The last IR node index for this graph. */
	/** The entity of this procedure, i.e., the type of the procedure and the
	 * class it belongs to. */
	ir_entity  *ent;
	/** A type representing the stack frame. Can include "inner" functions. */
	ir_type    *frame_type;
	ir_node    *anchor;        /**< Pointer to the anchor node. */
	struct obstack obst;       /**< obstack allocator for nodes. */
489
490

	/* -- Fields indicating different states of irgraph -- */
491
492
493
494
	ir_graph_properties_t  properties;
	ir_graph_constraints_t constraints;
	op_pin_state           irg_pinned_state;  /**< Flag for status of nodes. */
	irg_callee_info_state  callee_info_state; /**< Validity of callee information. */
Matthias Braun's avatar
Matthias Braun committed
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510

	/* -- Helpers for walking/analysis of the graph -- */
	/** this flag is an identifier for ir walk. it will be incremented every
	 * time someone walks through the graph */
	ir_visited_t     visited;
	ir_visited_t     block_visited; /**< Visited flag for block nodes. */
	ir_visited_t     self_visited;  /**< Visited flag of the irg */
	ir_node        **idx_irn_map;   /**< Map of node indexes to nodes. */
	size_t           index;         /**< a unique number for each graph */
	/** A void* field to link any information to the graph. */
	void            *link;
	void            *be_data; /**< backend can put in private data here */
	unsigned short   dump_nr;       /**< number of graph dumps */

	/* -- Semantic Settings -- */
	unsigned char    mem_disambig_opt;
511
512

	/* -- Fields for construction -- */
Matthias Braun's avatar
Matthias Braun committed
513
514
515
516
	/** Number of local variables in this function including parameters. */
	int      n_loc;
	void   **loc_descriptions; /**< Descriptions for variables. */
	ir_node *current_block;    /**< Block for new_*()ly created nodes. */
517
518

	/* -- Fields for optimizations / analysis information -- */
Matthias Braun's avatar
Matthias Braun committed
519
520
521
522
	/** Hash table for global value numbering (cse) */
	pset               *value_table;
	struct obstack      out_obst;    /**< Space for the Def-Use arrays. */
	bool                out_obst_allocated;
523
	ir_bitinfo          bitinfo;     /**< bit info */
Matthias Braun's avatar
Matthias Braun committed
524
525
526
527
528
529
530
531
532
533
	ir_vrp_info         vrp;         /**< vrp info */
	ir_loop            *loop;        /**< The outermost loop for this graph. */
	ir_dom_front_info_t domfront;    /**< dominance frontier analysis data */
	irg_edges_info_t    edge_info;   /**< edge info for automatic outs */
	ir_graph          **callers;     /**< Callgraph: list of callers. */
	unsigned           *caller_isbe; /**< Callgraph: bitset if backedge info calculated. */
	cg_callee_entry   **callees;     /**< Callgraph: list of callee calls */
	unsigned           *callee_isbe; /**< Callgraph: bitset if backedge info calculated. */
	ir_loop            *l;           /**< For callgraph analysis. */

534
#ifdef DEBUG_libfirm
Matthias Braun's avatar
Matthias Braun committed
535
536
	/** Unique graph number for each graph to make output readable. */
	long             graph_nr;
537
538
#endif
#ifndef NDEBUG
Matthias Braun's avatar
Matthias Braun committed
539
540
541
	/** Debug helper: Phases/Analysis can indicate here which exclusive
	 * resources (e.g. link fields of the graph nodes) they are using. */
	ir_resources_t   reserved_resources;
542
543
544
#endif
};

545
546
547
548
549
550
551
552
/**
 * Data structure that holds central information about a program
 * or a module.
 * One irp is created by libFirm on construction, so irp should never be NULL.
 *
 * - main_irg:  The ir graph that is the entry point to the program.
 *              (Anything not reachable from here may be optimized away
 *              if this irp represents a whole program.
553
554
 * - graphs:    List of all ir graphs in the program or module.
 * - types:     A list containing all types known to the translated program.
555
556
557
 *              Some types can have several entries in this list (as a result of
 *              using exchange_types()).
 */
558
559
560
561
562
563
564
565
566
567
struct ir_prog {
	firm_kind kind;                 /**< must be k_ir_prog */
	ident     *name;                /**< A file name or the like. */
	ir_graph  *main_irg;            /**< The entry point to the compiled program
	                                     or NULL if no point exists. */
	ir_graph **graphs;              /**< A list of all graphs in the ir. */
	ir_graph  *const_code_irg;      /**< This ir graph gives the proper environment
	                                     to allocate nodes the represent values
	                                     of constant entities. It is not meant as
	                                     a procedure.  */
568
	ir_entity *unknown_entity;      /**< unique 'unknown'-entity */
569
	ir_type   *segment_types[IR_SEGMENT_LAST+1];
570
	ir_type  **types;               /**< A list of all types in the ir. */
571
572
	ir_type   *code_type;           /**< unique 'code'-type */
	ir_type   *unknown_type;        /**< unique 'unknown'-type */
573
	ir_type   *dummy_owner;         /**< owner for internal entities */
574
	ir_type   *byte_type;           /**< type for a 'byte' */
575
	ident    **global_asms;         /**< An array of global ASM insertions. */
576
577
578
579
580
581
582
583
584
585
586

	/* -- states of and access to generated information -- */
	irg_callee_info_state callee_info_state; /**< Validity of callee information.
	                                              Contains the lowest value or all irgs.  */
	inh_transitive_closure_state inh_trans_closure_state;  /**< State of transitive closure
	                                                            of inheritance relations. */

	irp_callgraph_state callgraph_state; /**< The state of the callgraph. */
	ir_loop *outermost_cg_loop;          /**< For callgraph analysis: entry point
	                                              to looptree over callgraph. */
	loop_nesting_depth_state lnd_state;  /**< The state of loop nesting depth information. */
587
	ir_entity_usage_computed_state globals_entity_usage_state;
588

589
	ir_label_t last_label_nr;            /**< The highest label number for generating unique labels. */
590
	size_t max_irg_idx;                  /**< highest unused irg index */
591
	long max_node_nr;                    /**< to generate unique numbers for nodes. */
592
	unsigned dump_nr;                    /**< number of program info dumps */
593
	pmap *compilerlib_entities;          /**< maps ident* to ir_entity* of the compilerlib */
594
#ifndef NDEBUG
yb9976's avatar
yb9976 committed
595
	irp_resources_t reserved_resources;  /**< Bitset for tracking used global resources. */
596
#endif
597
598
599
};

#endif