irtypes.h 26.3 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
24
#include "irtypeinfo.h"
#include "irmemory.h"
#include "callgraph.h"
25
#include "irprog.h"
26
#include "bitset.h"
27
28

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

34
35
36
struct ir_nodemap {
	void **data;  /**< maps node indices to void* */
};
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
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. */
	node_cmp_attr_func    node_cmp_attr;        /**< Compares two node attributes. */
	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;

65
66
/** The type of an ir_op. */
struct ir_op {
Matthias Braun's avatar
Matthias Braun committed
67
68
69
70
71
72
73
74
	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. */
75
	int memory_index;         /**< index of memory input for memory nodes */
Matthias Braun's avatar
Matthias Braun committed
76
77
78
79
80
81
82
83
84
85
	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. */
86
87
};

88
89
90
91
92
93
94
95
96
97
/** 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 {
98
99
100
	irms_auxiliary        = 0,
	irms_internal_boolean = 1 | irmsh_is_data,
	irms_data             = 2 | irmsh_is_data,
101
102
103

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

122
123
124
125
126
127
128
129
130
/**
 * 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.
131
 *  -  ir_mode_sort sort:       sort of mode specifying possible usage categories
132
133
134
135
136
137
138
139
140
141
142
143
144
 *  -  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 */
145
	ir_type           *type;      /**< corresponding primitive type */
146

147
	/* ---------------------------------------------------------------------- */
148
	/* On changing this struct you have to evaluate the mode_are_equal function!*/
149
150
151
152
153
	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. */
154
155
156
157
	bool               sign:1;        /**< signedness of this mode */
	ENUMBF(float_int_conversion_overflow_style_t)
	                   int_conv_overflow:1;
	unsigned char      modulo_shift;  /**< number of bits a values of this mode will be shifted */
158
	float_descriptor_t float_desc;
159

160
	/* ---------------------------------------------------------------------- */
Matthias Braun's avatar
Matthias Braun committed
161
162
163
164
165
166
	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         *minus_one;   /**< the value -1 */
	ir_tarval         *all_one;     /**< the value ~0 */
167
168
169
170
171
	ir_mode           *eq_signed;   /**< For pointer modes, the equivalent signed integer one. */
	ir_mode           *eq_unsigned; /**< For pointer modes, the equivalent unsigned integer one. */
	void              *link;        /**< To store some intermediate information */
};

Matthias Braun's avatar
Matthias Braun committed
172
173
174
175
176
177
178
179
180
181
182
183
/* 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[];
};

184
185
/* ir node attributes */

186
/** first attribute of Bad, Block, Anchor nodes */
187
typedef struct irg_attr {
188
189
	ir_graph *irg;              /**< The graph this block like node belongs to. */
} irg_attr;
190

191
typedef struct bad_attr {
192
193
194
	irg_attr    irg;
} bad_attr;

195
196
197
198
typedef struct anchor_attr {
	irg_attr  irg;
} anchor_attr;

199
/** Block attributes */
200
typedef struct block_attr {
201
	/* General attributes */
202
	irg_attr     irg;           /**< The graph this block belongs to. */
203
	ir_visited_t block_visited; /**< For the walker that walks over all blocks. */
204
205
	/* Attributes private to construction: */
	unsigned is_matured:1;      /**< If set, all in-nodes of the block are fixed. */
206
	unsigned dynamic_ins:1;     /**< if set in-array is an ARR_F on the heap. */
207
	unsigned marked:1;          /**< Can be set/unset to temporary mark a block. */
208
209
	ir_node **graph_arr;        /**< An array to store all parameters. */
	/* Attributes holding analyses information */
Matthias Braun's avatar
Matthias Braun committed
210
	ir_dom_info dom;            /**< Datastructure that holds information about dominators. */
211
	ir_dom_info pdom;           /**< Datastructure that holds information about post-dominators. */
212
	bitset_t *backedge;         /**< Bitfield n set to true if pred n is backedge.*/
213
	ir_entity *entity;          /**< entitiy representing this block */
214
	ir_node  *phis;             /**< The list of Phi nodes in this block. */
215
	double    execfreq;         /**< block execution frequency */
216
217
218
} block_attr;

/** Cond attributes. */
219
typedef struct cond_attr {
220
	cond_jmp_predicate jmp_pred; /**< only for binary Conds: The jump predication. */
221
222
223
} cond_attr;

/** Const attributes. */
Matthias Braun's avatar
Matthias Braun committed
224
225
typedef struct const_attr {
	ir_tarval *tarval;  /**< the target value */
226
227
228
} const_attr;

/** SymConst attributes. */
229
typedef struct symconst_attr {
230
	symconst_symbol sym;  // old tori
231
	symconst_kind   kind;
232
233
234
} symconst_attr;

/** Sel attributes. */
235
typedef struct sel_attr {
236
	ir_entity *entity;    /**< entity to select */
237
238
239
} sel_attr;

/** Exception attributes. */
240
typedef struct except_attr {
241
242
243
244
245
246
	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 */
247
248
249
} except_attr;

/** Call attributes. */
250
typedef struct call_attr {
251
252
253
	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 */
254
255
} call_attr;

256
/** Builtin attributes. */
257
typedef struct builtin_attr {
258
259
	except_attr     exc;           /**< the exception attribute. MUST be the first one. */
	ir_builtin_kind kind;          /**< kind of the called builtin procedure */
260
	ir_type         *type;         /**< type of called builtin procedure */
261
262
} builtin_attr;

263
/** Alloc attributes. */
264
typedef struct alloc_attr {
265
	unsigned alignment;
266
267
268
} alloc_attr;

/** Load attributes. */
269
typedef struct load_attr {
270
	except_attr   exc;            /**< The exception attribute. MUST be the first one. */
271
272
	ENUMBF(ir_volatility) volatility:1;   /**< The volatility of this Load operation. */
	ENUMBF(ir_align)      unaligned:1;    /**< The align attribute of this Load operation. */
273
	ir_mode       *mode;          /**< The mode of this Load operation. */
274
275
276
} load_attr;

/** Store attributes. */
277
typedef struct store_attr {
278
	except_attr   exc;            /**< the exception attribute. MUST be the first one. */
279
280
	ENUMBF(ir_volatility) volatility:1;   /**< The volatility of this Store operation. */
	ENUMBF(ir_align)      unaligned:1;    /**< The align attribute of this Store operation. */
281
282
} store_attr;

283
typedef struct phi_attr {
284
285
	ir_node        *next;         /**< Points to the next Phi in the Phi list of a block. */
	union {
286
		bitset_t      *backedge;     /**< Raw Bitfield: bit n is set to true if pred n is backedge. */
287
288
289
290
291
292
293
294
295
		int            pos;           /**< 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. */
	} u;
} phi_attr;

296
297
298
299
/**< Cmp attribute. */
typedef struct cmp_attr {
	ir_relation relation;         /**< comparison condition. */
} cmp_attr;
300
301

/**< Confirm attribute. */
302
typedef struct confirm_attr {
303
	ir_relation relation;         /**< relation between value and bound */
304
305
306
} confirm_attr;

/** CopyB attribute. */
307
typedef struct copyb_attr {
308
	ir_type      *type;           /**< Type of the copied entity. */
309
	ENUMBF(ir_volatility) volatility:1;  /**< The volatility of this CopyB operation. */
310
311
} copyb_attr;

312
313
/** Div attribute. */
typedef struct div_attr {
314
	except_attr    exc;           /**< The exception attribute. MUST be the first one. */
315
	ir_mode        *resmode;      /**< Result mode for the division. */
316
	char           no_remainder;  /**< Set, if known that a division can be done without a remainder. */
317
318
319
320
321
322
323
} div_attr;

/** Mod attribute. */
typedef struct mod_attr {
	except_attr    exc;           /**< The exception attribute. MUST be the first one. */
	ir_mode        *resmode;      /**< Result mode for the division. */
} mod_attr;
324
325

/** Inline Assembler support attribute. */
326
typedef struct asm_attr {
327
	/* BEWARE: pin state MUST be the first attribute */
328
329
330
331
332
	op_pin_state      pin_state;            /**< the pin state for operations that might generate a exception */
	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. */
333
334
} asm_attr;

335
336
337
338
typedef struct proj_attr {
	long  proj;           /**< position of tuple sub-value which is projected */
} proj_attr;

Matthias Braun's avatar
Matthias Braun committed
339
340
341
342
343
typedef struct switch_attr {
	unsigned         n_outs;
	ir_switch_table *table;
} switch_attr;

344
345
/** Some IR-nodes just have one attribute, these are stored here,
   some have more. Their name is 'irnodename_attr' */
346
typedef union ir_attr {
347
	irg_attr       irg;           /**< For Blocks and Bad: its belonging irg */
348
	bad_attr       bad;           /**< for Bads: irg reference */
349
	anchor_attr    anchor;        /**< for Anchor: irg reference */
350
	block_attr     block;         /**< For Block: Fields needed to construct it */
351
	cmp_attr       cmp;           /**< For Cmp. */
352
353
354
355
	cond_attr      cond;          /**< For Cond. */
	const_attr     con;           /**< For Const: contains the value of the constant and a type */
	symconst_attr  symc;          /**< For SymConst. */
	sel_attr       sel;           /**< For Sel. */
356
357
	call_attr      call;          /**< For Call. */
	builtin_attr   builtin;       /**< For Builtin. */
358
359
360
	alloc_attr     alloc;         /**< For Alloc. */
	load_attr      load;          /**< For Load. */
	store_attr     store;         /**< For Store. */
361
	phi_attr       phi;           /**< For Phi. */
362
	proj_attr      proj;          /**< For Proj. */
363
364
365
	confirm_attr   confirm;       /**< For Confirm: compare operation and region. */
	except_attr    except;        /**< For Phi node construction in case of exceptions */
	copyb_attr     copyb;         /**< For CopyB operation */
366
367
	div_attr       div;           /**< For Div operation */
	mod_attr       mod;           /**< For Mod operation */
368
	asm_attr       assem;         /**< For ASM operation. */
Matthias Braun's avatar
Matthias Braun committed
369
	switch_attr    switcha;       /**< For Switch operation. */
370
} ir_attr;
371
372
373
374

/**
 * Edge info to put into an irn.
 */
375
typedef struct irn_edge_kind_info_t {
376
	struct list_head outs_head;  /**< The list of all outs. */
Michael Beck's avatar
Michael Beck committed
377
378
	unsigned edges_built : 1;    /**< Set edges where built for this node. */
	unsigned out_count : 31;     /**< Number of outs in the list. */
379
380
} irn_edge_info_t;

381
typedef irn_edge_info_t irn_edges_info_t[EDGE_KIND_LAST+1];
382

383
384
385
/**
 * A Def-Use edge.
 */
386
typedef struct ir_def_use_edge {
387
388
389
390
	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
391
392
393
394
395
typedef struct ir_def_use_edges {
	unsigned        n_edges;
	ir_def_use_edge edges[];
} ir_def_use_edges;

396
397
398
399
400
401
402
/**
 * 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
403
	unsigned node_idx;       /**< The node index of this node in its graph. */
404
405
406
	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. */
407
	ir_visited_t visited;    /**< The visited counter for walks of the graph. */
408
	void *link;              /**< To attach additional information to the node, e.g.
Michael Beck's avatar
Michael Beck committed
409
	                              used during optimization to link to nodes that
410
	                              shall replace a node. */
411
	long node_nr;            /**< A globally unique node number for each node. */
412
	/* ------- Fields for optimizations / analysis information ------- */
Matthias Braun's avatar
Matthias Braun committed
413
414
415
416
417
418
	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. */
419
420
421
	/* ------- 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. */
422
	void            *backend_info;
423
	irn_edges_info_t edge_info;  /**< Everlasting out edges. */
424

425
	/* ------- Opcode depending fields -------- */
426
	ir_attr attr;            /**< The set of attributes of this node. Depends on opcode.
427
428
429
	                              Must be last field of struct ir_node. */
};

430
431
#include "iredgeset.h"

432
433
434
/**
 * Edge info to put into an irg.
 */
435
typedef struct irg_edge_info_t {
436
437
438
439
440
	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. */
441
442
} irg_edge_info_t;

443
typedef irg_edge_info_t irg_edges_info_t[EDGE_KIND_LAST+1];
444
445

/**
446
 * Index constants for nodes that can be accessed through the graph anchor node.
447
 */
448
449
450
451
typedef enum irg_anchors {
	anchor_first,
	anchor_end_block = anchor_first, /**< block the end node will belong to,
	                                      same as Anchors block */
452
	anchor_start_block,      /**< block the start node will belong to */
453
	anchor_end,              /**< end node of this ir_graph */
454
	anchor_start,            /**< start node of this ir_graph */
455
456
	anchor_initial_exec,     /**< methods initial control flow */
	anchor_frame,            /**< methods frame */
457
458
459
	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 */
460
461
462
	anchor_last = anchor_no_mem
} irg_anchors;
ENUM_COUNTABLE(irg_anchors)
463
464
465
466
467

/** 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. */
468
	size_t     max_depth;  /**< Maximum depth of all Call nodes to irg. */
469
470
} cg_callee_entry;

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
	ir_graph_properties_t  properties;
	ir_graph_constraints_t constraints;
	op_pin_state           irg_pinned_state;  /**< Flag for status of nodes. */
Matthias Braun's avatar
Matthias Braun committed
494
	ir_typeinfo_state      typeinfo_state;    /**< Validity of typeinfo. */
495
	irg_callee_info_state  callee_info_state; /**< Validity of callee information. */
Matthias Braun's avatar
Matthias Braun committed
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511

	/* -- 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;
512
513

	/* -- Fields for construction -- */
Matthias Braun's avatar
Matthias Braun committed
514
515
516
517
	/** 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. */
518
519

	/* -- Fields for optimizations / analysis information -- */
Matthias Braun's avatar
Matthias Braun committed
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
	/** Hash table for global value numbering (cse) */
	pset               *value_table;
	struct obstack      out_obst;    /**< Space for the Def-Use arrays. */
	bool                out_obst_allocated;
	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. */
	size_t              callgraph_loop_depth;
	size_t              callgraph_recursion_depth;
	double              method_execution_frequency;

537
#ifdef DEBUG_libfirm
Matthias Braun's avatar
Matthias Braun committed
538
539
	/** Unique graph number for each graph to make output readable. */
	long             graph_nr;
540
541
#endif
#ifndef NDEBUG
Matthias Braun's avatar
Matthias Braun committed
542
543
544
	/** 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;
545
546
547
#endif
};

548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
/**
 * 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.
 * - irg:       List of all ir graphs in the program or module.
 * - type:      A list containing all types known to the translated program.
 *              Some types can have several entries in this list (as a result of
 *              using exchange_types()).
 * - glob_type: The unique global type that is owner of all global entities
 *              of this module.
 */
563
564
565
566
567
568
569
570
571
572
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.  */
573
	ir_entity *unknown_entity;      /**< unique 'unknown'-entity */
574
	ir_type   *segment_types[IR_SEGMENT_LAST+1];
575
	ir_type  **types;               /**< A list of all types in the ir. */
576
577
	ir_type   *code_type;           /**< unique 'code'-type */
	ir_type   *unknown_type;        /**< unique 'unknown'-type */
578
	ir_type   *byte_type;           /**< type for a 'byte' */
579
	ident    **global_asms;         /**< An array of global ASM insertions. */
580
581
582
583
584
585
586
587
588
589
590
591
592
593

	/* -- states of and access to generated information -- */
	ir_node **ip_outedges;          /**< A huge Array that contains all out edges
	                                     in interprocedural view. */

	irg_callee_info_state callee_info_state; /**< Validity of callee information.
	                                              Contains the lowest value or all irgs.  */
	ir_typeinfo_state typeinfo_state;    /**< Validity of type information. */
	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. */
594
595
	size_t max_callgraph_loop_depth;        /**< needed in callgraph. */
	size_t max_callgraph_recursion_depth;   /**< needed in callgraph. */
596
597
	double max_method_execution_frequency;  /**< needed in callgraph. */
	loop_nesting_depth_state lnd_state;  /**< The state of loop nesting depth information. */
598
	ir_entity_usage_computed_state globals_entity_usage_state;
599

600
	ir_label_t last_label_nr;            /**< The highest label number for generating unique labels. */
601
	size_t max_irg_idx;                  /**< highest unused irg index */
602
	long max_node_nr;                    /**< to generate unique numbers for nodes. */
603
	unsigned dump_nr;                    /**< number of program info dumps */
604
	pmap *compilerlib_entities;          /**< maps ident* to ir_entity* of the compilerlib */
605
#ifndef NDEBUG
yb9976's avatar
yb9976 committed
606
	irp_resources_t reserved_resources;  /**< Bitset for tracking used global resources. */
607
#endif
608
609
610
};

#endif