/**
- *
* @file type.h
*
* Project: libFIRM <br>
# ifndef _TYPE_H_
# define _TYPE_H_
-#include <stdbool.h>
-
+# include "firm_types.h"
# include "tpop.h"
# include "firm_common.h"
# include "ident.h"
# include "irmode.h"
# include "dbginfo.h"
-
-
-/* to resolve recursion between entity.h and type.h */
-#ifndef _ENTITY_TYPEDEF_
-#define _ENTITY_TYPEDEF_
-typedef struct entity entity;
-#endif
-
-#ifndef _IR_NODE_TYPEDEF_
-#define _IR_NODE_TYPEDEF_
-typedef struct ir_node ir_node;
-#endif
+# include "tr_inheritance.h"
/**
* An abstract data type to represent types.
* @link pointer_type pointer @endlink, @link primitive_type primitive @endlink
*
* @todo
- * mode maybe not global field??
+ * mode maybe not global field??
*/
-#ifndef _TYPE_TYPEDEF_
-#define _TYPE_TYPEDEF_
-typedef struct type type;
+#ifndef _IR_TYPE_TYPEDEF_
+#define _IR_TYPE_TYPEDEF_
+typedef struct ir_type ir_type;
#endif
# include "type_or_entity.h"
Does not free array entity.
Warning: make sure these entities are not referenced anywhere else.
*/
-void free_type_entities(type *tp);
+void free_type_entities(ir_type *tp);
/** Frees the memory used by the type.
*
* param subtypes of method types!!! Make sure these are not
* referenced any more. Further make sure there is no pointer type
* that refers to this type. */
-void free_type(type *tp);
+void free_type(ir_type *tp);
+
+const tp_op*get_type_tpop(const ir_type *tp);
+ident* get_type_tpop_nameid(const ir_type *tp);
+const char* get_type_tpop_name(const ir_type *tp);
+tp_opcode get_type_tpop_code(const ir_type *tp);
+
+ident* get_type_ident(const ir_type *tp);
+void set_type_ident(ir_type *tp, ident* id);
+const char* get_type_name(const ir_type *tp);
+
+/** This enumeration flags the visibility of entities and types.
+ *
+ * This is necessary for partial compilation.
+ * We rely on the ordering of the flags.
+ */
+typedef enum {
+ visibility_local, /**< The entity is only visible locally. This is the default for
+ entities.
+ The type is only visible locally. All instances are allocated
+ locally, and no pointer to entities of this type are passed
+ out of this compilation unit. */
+ visibility_external_visible, /**< The entity is visible to other external program parts, but
+ it is defined here. It may not be optimized away. The entity must
+ be static_allocated.
+ For types: entities of this type can be accessed externally. No
+ instances of this type are allocated externally. */
+ visibility_external_allocated /**< The entity is defined and allocated externally. This compilation
+ must not allocate memory for this entity. The entity must
+ be static_allocated. This can also be an external defined
+ method.
+ For types: entities of this type are allocated and accessed from
+ external code. Default for types. */
+} visibility;
+
+/** The visibility of a type.
+ *
+ * The visibility of a type indicates, whether entities of this type
+ * are accessed or allocated in external code.
+ *
+ * An entity of a type is allocated in external code, if the external
+ * code declares a variable of this type, or dynamically allocates
+ * an entity of this type. If the external code declares a (compound)
+ * type, that contains entities of this type, the visibility also
+ * must be external_allocated.
+ *
+ * The visibility must be higher than that of all entities, if the
+ * type is a compound. Here it is questionable, what happens with
+ * static entities. If these are accessed external by direct reference,
+ * (a static call to a method, that is also in the dispatch table)
+ * it should not affect the visibility of the type.
+ *
+ *
+ * @@@ Do we need a visibility for types?
+ * I change the layout of types radically when doing type splitting.
+ * I need to know, which fields of classes are accessed in the RTS,
+ * e.g., [_length. I may not move [_length to the split part.
+ * The layout though, is a property of the type.
+ *
+ * One could also think of changing the mode of a type ...
+ *
+ * But, we could also output macros to access the fields, e.g.,
+ * ACCESS_[_length (X) X->length // conventional
+ * ACCESS_[_length (X) X->_split_ref->length // with type splitting
+ *
+ * For now I implement this function, that returns the visibility
+ * based on the visibility of the entities of a compound ...
+ *
+ * This function returns visibility_external_visible if one or more
+ * entities of a compound type have visibility_external_visible.
+ * Entities of types are never visibility_external_allocated (right?).
+ * Else returns visibility_local.
+ */
+visibility get_type_visibility (const ir_type *tp);
+void set_type_visibility (ir_type *tp, visibility v);
-const tp_op*get_type_tpop(const type *tp);
-ident* get_type_tpop_nameid(const type *tp);
-const char* get_type_tpop_name(const type *tp);
-tp_opcode get_type_tpop_code(const type *tp);
-ident* get_type_ident(const type *tp);
-void set_type_ident(type *tp, ident* id);
-const char* get_type_name(const type *tp);
/** The state of the type layout. */
typedef enum {
layout_undefined, /**< The layout of this type is not defined.
- Address computation to access fields is not
- possible, fields must be accessed by Sel
- nodes. This is the default value except for
- pointer, primitive and method types. */
+ Address computation to access fields is not
+ possible, fields must be accessed by Sel
+ nodes. This is the default value except for
+ pointer, primitive and method types. */
layout_fixed /**< The layout is fixed, all component/member entities
- have an offset assigned. Size of the type is known.
- Arrays can be accessed by explicit address
- computation. Default for pointer, primitive and method
- types. */
+ have an offset assigned. Size of the type is known.
+ Arrays can be accessed by explicit address
+ computation. Default for pointer, primitive and method
+ types. */
} type_state;
+/** Returns a human readable string for the enum entry. */
+const char *get_type_state_name(type_state s);
+
/** Returns the type layout state of a type. */
-type_state get_type_state(const type *tp);
+type_state get_type_state(const ir_type *tp);
/** Sets the type layout state of a type.
*
* For primitives, pointer and method types the layout is always fixed.
* This call is legal but has no effect.
*/
-void set_type_state(type *tp, type_state state);
+void set_type_state(ir_type *tp, type_state state);
/** Returns the mode of a type.
*
* Returns NULL for all non atomic types.
*/
-ir_mode* get_type_mode(const type *tp);
+ir_mode* get_type_mode(const ir_type *tp);
/** Sets the mode of a type.
*
* Only has an effect on primitive, enumeration and pointer types.
*/
-void set_type_mode(type *tp, ir_mode* m);
+void set_type_mode(ir_type *tp, ir_mode* m);
/** Returns the size of a type in bytes, returns -1 if the size is NOT
- * a byte size, ie not dividable by 8. */
-int get_type_size_bytes(const type *tp);
+ * a byte size, i.e. not dividable by 8. */
+int get_type_size_bytes(const ir_type *tp);
/** Returns the size of a type in bits. */
-int get_type_size_bits(const type *tp);
+int get_type_size_bits(const ir_type *tp);
/** Sets the size of a type in bytes.
*
* For primitive, enumeration, pointer and method types the size
* is always fixed. This call is legal but has no effect.
*/
-void set_type_size_bytes(type *tp, int size);
+void set_type_size_bytes(ir_type *tp, int size);
/** Sets the size of a type in bits.
*
* For primitive, enumeration, pointer and method types the size
* is always fixed. This call is legal but has no effect.
*/
-void set_type_size_bits(type *tp, int size);
+void set_type_size_bits(ir_type *tp, int size);
-/** Returns the alignment of a type in bytes, returns -1 if the alignment is NOT
- * a byte size, ie not dividable by 8. Calls get_type_alignment_bits(). */
-int get_type_alignment_bytes(type *tp);
+/** Returns the alignment of a type in bytes.
+ *
+ * Returns -1 if the alignment is NOT
+ * a byte size, i.e. not dividable by 8. Calls get_type_alignment_bits(). */
+int get_type_alignment_bytes(ir_type *tp);
-/** Returns the alignment of a type in bits. If the alignment of a type is
- * not set, it is calculated here according to the following rules:
- * 1.) if a type has a mode, the alignment is the mode size.
- * 2.) compound types have the alignment of it's biggest member.
- * 3.) array types have the alignment of its element type.
- * 4.) method types return 0 here.
- * 5.) all other types return 8 here (i.e. aligned at byte).
+/** Returns the alignment of a type in bits.
+ *
+ * If the alignment of a type is
+ * not set, it is calculated here according to the following rules:
+ * -#.) if a type has a mode, the alignment is the mode size.
+ * -#.) compound types have the alignment of there biggest member.
+ * -#.) array types have the alignment of there element type.
+ * -#.) method types return 0 here.
+ * -#.) all other types return 8 here (i.e. aligned at byte).
*/
-int get_type_alignment_bits(type *tp);
+int get_type_alignment_bits(ir_type *tp);
/** Sets the alignment of a type in bytes. */
-void set_type_alignment_bytes(type *tp, int size);
+void set_type_alignment_bytes(ir_type *tp, int size);
/** Sets the alignment of a type in bits.
*
* For method types the alignment is always fixed.
* This call is legal but has no effect.
*/
-void set_type_alignment_bits(type *tp, int size);
+void set_type_alignment_bits(ir_type *tp, int size);
-unsigned long get_type_visited(const type *tp);
-void set_type_visited(type *tp, unsigned long num);
+unsigned long get_type_visited(const ir_type *tp);
+void set_type_visited(ir_type *tp, unsigned long num);
/* Sets visited field in type to type_visited. */
-void mark_type_visited(type *tp);
-/* @@@ name clash!! int type_visited(const type *tp); */
-int type_not_visited(const type *tp);
+void mark_type_visited(ir_type *tp);
+int type_visited(const ir_type *tp);
+int type_not_visited(const ir_type *tp);
-void* get_type_link(const type *tp);
-void set_type_link(type *tp, void *l);
+/** Returns the associated link field of a type. */
+void* get_type_link(const ir_type *tp);
+/** Sets the associated link field of a type. */
+void set_type_link(ir_type *tp, void *l);
/**
* Visited flag to traverse the type information.
*
- * Increase this flag by one before traversing the type information.
- * Mark type nodes as visited by set_type_visited(type, type_visited).
- * Check whether node was already visited by comparing get_type_visited(type)
- * and type_visited.
+ * Increase this flag by one before traversing the type information
+ * using inc_master_type_visited().
+ * Mark type nodes as visited by mark_type_visited(ir_type).
+ * Check whether node was already visited by type_visited(ir_type)
+ * and type_not_visited(ir_type).
* Or use the function to walk all types.
*
* @see typewalk
*/
-extern unsigned long type_visited;
void set_master_type_visited(unsigned long val);
unsigned long get_master_type_visited(void);
void inc_master_type_visited(void);
* @return
* true if the thing is a type, else false
*/
-int is_type (const void *thing);
+int is_type (const void *thing);
/**
- * Checks whether two types are structural equal.
+ * Checks whether two types are structurally equal.
*
- * @param st pointer type
- * @param lt pointer type
+ * @param typ1 the first type
+ * @param typ2 the second type
*
* @return
* true if the types are equal, else false.
- * Types are equal if :
+ *
+ * Types are equal if :
* - they are the same type kind
* - they have the same name
* - they have the same mode (if applicable)
* - they have the same type_state and, ev., the same size
- * - they are class types and have
+ * - they are class types and have:
* - the same members (see same_entity in entity.h)
* - the same supertypes -- the C-pointers are compared --> no recursive call.
* - the same number of subtypes. Subtypes are not compared,
* - they are enumeration types and have the same enumerator names
* - they are pointer types and have the identical points_to type
* (i.e., the same C-struct to represent the type, type_id is skipped.
- * This is to avoid endless recursions; with pointer types circlic
+ * This is to avoid endless recursions; with pointer types cyclic
* type graphs are possible.)
*/
-int equal_type(type *tpy1, type *typ2);
+int equal_type(ir_type *typ1, ir_type *typ2);
/**
* Checks whether two types are structural comparable.
* @return smaller than the points_to type of lt.
*
*/
-int smaller_type (type *st, type *lt);
+int smaller_type (ir_type *st, ir_type *lt);
/**
- * @page class_type Representation of a class type
+ * @page class_type Representation of a class type
*
* If the type opcode is set to type_class the type represents class
* types. A list of fields and methods is associated with a class.
* Further a class can inherit from and bequest to other classes.
* @@@ value class???
* The following attributes are private to this type kind:
- * - member: All entities belonging to this class. This are methode entities
+ * - member: All entities belonging to this class. This are method entities
* which have type_method or fields that can have any of the
* following type kinds: type_class, type_struct, type_union,
* type_array, type_enumeration, type_pointer, type_primitive.
* The following two are dynamic lists that can be grown with an "add_" function,
* but not shrinked:
*
- * - subtypes: A list of direct subclasses.
+ * - subtypes: A list of direct subclasses.
*
- * - supertypes: A list of direct superclasses.
+ * - supertypes: A list of direct superclasses.
*
* - peculiarity: The peculiarity of this class. If the class is of peculiarity
* "description" it only is a description of requirements to a class,
* no value for irg.
* Values: description, existent, inherited. Default: existent.
*
+ * - type_info: An entity representing the type information of this class.
+ * This entity can be of arbitrari type, Firm did not use it yet.
+ * It allows to express the coupling of a type with an entity
+ * representing this type. This information is useful for lowering
+ * of InstOf and TypeChk nodes. Default: NULL
+ *
+ * - final: A final class is always a leaf in the class hierarchy. Final
+ * classes cannot be super classes of other ones. As this information
+ * can only be computed in whole world compilations, we allow to
+ * set this flag. It is used in optimizations if get_opt_closed_world()
+ * is false. Default: false
*/
/** Creates a new class type. */
-type *new_type_class (ident *name);
+ir_type *new_type_class (ident *name);
/** Creates a new class type with debug information. */
-type *new_d_type_class (ident *name, dbg_info *db);
+ir_type *new_d_type_class (ident *name, dbg_info *db);
/* --- manipulate private fields of class type --- */
/** Adds the entity as member of the class. */
-void add_class_member (type *clss, entity *member);
+void add_class_member (ir_type *clss, entity *member);
/** Returns the number of members of this class. */
-int get_class_n_members (const type *clss);
+int get_class_n_members (const ir_type *clss);
/** Returns the member at position pos, 0 <= pos < n_member */
-entity *get_class_member (const type *clss, int pos);
+entity *get_class_member (const ir_type *clss, int pos);
/** Returns index of mem in clss, -1 if not contained. */
-int get_class_member_index(type *clss, entity *mem);
+int get_class_member_index(const ir_type *clss, entity *mem);
/** Finds the member with name 'name'. If several members with the same
- name returns one of them. Returns NULL if no member found. */
-entity *get_class_member_by_name(type *clss, ident *name);
+ * name returns one of them. Returns NULL if no member found. */
+entity *get_class_member_by_name(ir_type *clss, ident *name);
/** Overwrites the member at position pos, 0 <= pos < n_member with
- the passed entity. */
-void set_class_member (type *clss, entity *member, int pos);
+ * the passed entity. */
+void set_class_member (ir_type *clss, entity *member, int pos);
/** Replaces complete member list in class type by the list passed.
- Copies the list passed. This function is necessary to reduce the number of members.
- members is an array of entities, num the size of this array. Sets all
- owners of the members passed to clss. */
-void set_class_members (type *clss, entity *members[], int arity);
+ *
+ * Copies the list passed. This function is necessary to reduce the number of members.
+ * members is an array of entities, num the size of this array. Sets all
+ * owners of the members passed to clss. */
+void set_class_members (ir_type *clss, entity *members[], int arity);
/** Finds member in the list of members and removes it.
- Shrinks the member list, so iterate from the end!!!
- Does not deallocate the entity. */
-void remove_class_member(type *clss, entity *member);
+ *
+ * Shrinks the member list, so iterate from the end!!!
+ * Does not deallocate the entity. */
+void remove_class_member(ir_type *clss, entity *member);
/** Adds subtype as subtype to clss.
- Checks whether clss is a supertype of subtype. If not
- adds also clss as supertype to subtype. */
-void add_class_subtype (type *clss, type *subtype);
+ *
+ * Checks whether clss is a supertype of subtype. If not
+ * adds also clss as supertype to subtype. */
+void add_class_subtype (ir_type *clss, ir_type *subtype);
/** Returns the number of subtypes */
-int get_class_n_subtypes (const type *clss);
+int get_class_n_subtypes (const ir_type *clss);
/** Gets the subtype at position pos, 0 <= pos < n_subtype. */
-type *get_class_subtype (type *clss, int pos);
+ir_type *get_class_subtype (ir_type *clss, int pos);
+
+/** Returns the index to access subclass as subtype of class.
+ *
+ * If subclass is no direct subtype of class returns -1.
+ */
+int get_class_subtype_index(ir_type *clss, const ir_type *subclass);
/** Sets the subtype at position pos, 0 <= pos < n_subtype.
- Does not set the corresponding supertype relation for subtype: this might
- be a different position! */
-void set_class_subtype (type *clss, type *subtype, int pos);
+ *
+ * Does not set the corresponding supertype relation for subtype: this might
+ * be a different position! */
+void set_class_subtype (ir_type *clss, ir_type *subtype, int pos);
/** Finds subtype in the list of subtypes and removes it */
-void remove_class_subtype(type *clss, type *subtype);
+void remove_class_subtype(ir_type *clss, ir_type *subtype);
+/* Convenience macros */
+#define add_class_derived_type(clss, drvtype) add_class_subtype(clss, drvtype)
+#define get_class_n_derived_types(clss) get_class_n_subtypes(clss)
+#define get_class_derived_type(clss, pos) get_class_subtype(clss, pos)
+#define get_class_derived_type_index(clss, drvtype) get_class_subtype_index(clss, drvtype)
+#define set_class_derived_type(clss, drvtype, pos) set_class_subtype(clss, drvtype, pos)
+#define remove_class_derived_type(clss, drvtype) remove_class_subtype(clss, drvtype)
/** Adds supertype as supertype to class.
- Checks whether clss is a subtype of supertype. If not
- adds also clss as subtype to supertype. */
-void add_class_supertype (type *clss, type *supertype);
+ *
+ * Checks whether clss is a subtype of supertype. If not
+ * adds also clss as subtype to supertype. */
+void add_class_supertype (ir_type *clss, ir_type *supertype);
/** Returns the number of supertypes */
-int get_class_n_supertypes (const type *clss);
+int get_class_n_supertypes (const ir_type *clss);
-/** Returns the index of an supertype in a type. */
-int get_class_supertype_index(type *clss, type *super_clss);
+/** Returns the index to access superclass as supertype of class.
+ *
+ * If superclass is no direct supertype of class returns -1.
+ */
+int get_class_supertype_index(ir_type *clss, ir_type *super_clss);
/** Gets the supertype at position pos, 0 <= pos < n_supertype. */
-type *get_class_supertype (type *clss, int pos);
+ir_type *get_class_supertype (ir_type *clss, int pos);
-/** Sets the supertype at position pos, 0 <= pos < n_subtype.
- Does not set the corresponding subtype relation for supertype: this might
- be a different position! */
-void set_class_supertype (type *clss, type *supertype, int pos);
+/** Sets the supertype at position pos, 0 <= pos < n_supertype.
+ *
+ * Does not set the corresponding subtype relation for supertype: this might
+ * be at a different position! */
+void set_class_supertype (ir_type *clss, ir_type *supertype, int pos);
/** Finds supertype in the list of supertypes and removes it */
-void remove_class_supertype(type *clss, type *supertype);
+void remove_class_supertype(ir_type *clss, ir_type *supertype);
+
+/** Convenience macro */
+#define add_class_base_type(clss, basetype) add_class_supertype(clss, basetype)
+#define get_class_n_base_types(clss) get_class_n_supertypes(clss)
+#define get_class_base_type_index(clss, base_clss) get_class_supertype_index(clss, base_clss)
+#define get_class_base_type(clss, pos) get_class_supertype(clss, pos)
+#define set_class_base_type(clss, basetype, pos) set_class_supertype(clss, basetype, pos)
+#define remove_class_base_type(clss, basetype) remove_class_supertype(clss, basetype)
+
+/** Convenience macro */
+#define add_class_base_type(clss, basetype) add_class_supertype(clss, basetype)
+#define get_class_n_base_types(clss) get_class_n_supertypes(clss)
+#define get_class_base_type_index(clss, base_clss) get_class_supertype_index(clss, base_clss)
+#define get_class_base_type(clss, pos) get_class_supertype(clss, pos)
+#define set_class_base_type(clss, basetype, pos) set_class_supertype(clss, basetype, pos)
+#define remove_class_base_type(clss, basetype) remove_class_supertype(clss, basetype)
/** This enumeration flags the peculiarity of entities and types. */
typedef enum peculiarity {
peculiarity_description, /**< Represents only a description. The entity/type is never
- allocated, no code/data exists for this entity/type.
- @@@ eventually rename to descriptive (adjective as the others!)*/
+ allocated, no code/data exists for this entity/type.
+ @@@ eventually rename to descriptive (adjective as the others!)*/
peculiarity_inherited, /**< Describes explicitly that other entities are
- inherited to the owner of this entity.
- Overwrites must refer to at least one other
- entity. If this is a method entity there exists
- no irg for this entity, only for one of the
- overwritten ones.
- Only for entity. */
+ inherited to the owner of this entity.
+ Overwrites must refer to at least one other
+ entity. If this is a method entity there exists
+ no irg for this entity, only for one of the
+ overwritten ones.
+ Only for entity. */
peculiarity_existent /**< The entity/type (can) exist.
- @@@ eventually rename to 'real' i.e., 'echt'
- This serves better as opposition to description _and_ inherited.*/
+ @@@ eventually rename to 'real' i.e., 'echt'
+ This serves better as opposition to description _and_ inherited.*/
} peculiarity;
const char *get_peculiarity_string(peculiarity p);
-/* The peculiarity of the class. The enumeration peculiarity is defined
- in entity.h */
-peculiarity get_class_peculiarity (const type *clss);
-void set_class_peculiarity (type *clss, peculiarity pec);
+/** Returns the peculiarity of the class. */
+peculiarity get_class_peculiarity (const ir_type *clss);
+/** Sets the peculiarity of the class. */
+void set_class_peculiarity (ir_type *clss, peculiarity pec);
+
+/** Returns the type info entity of a class. */
+entity *get_class_type_info(const ir_type *clss);
+
+/** Set a type info entity for the class. */
+void set_class_type_info(ir_type *clss, entity *ent);
+
+/** Returns non-zero if a class is final. */
+int is_class_final(const ir_type *clss);
+
+/** Sets if a class is final. */
+void set_class_final(ir_type *clss, int flag);
/* Set and get a class' dfn --
@todo This is an undocumented field, subject to change! */
-void set_class_dfn (type *clss, int dfn);
-int get_class_dfn (const type *clss);
+void set_class_dfn (ir_type *clss, int dfn);
+int get_class_dfn (const ir_type *clss);
/** Returns true if a type is a class type. */
-int is_class_type(const type *clss);
-
-/** Returns true if low is subclass of high. */
-int is_subclass_of(type *low, type *high);
+int is_Class_type(const ir_type *clss);
/**
- * @page struct_type Representation of a struct type
+ * @page struct_type Representation of a struct type
*
* Type_strct represents aggregate types that consist of a list
* of fields.
* - member: All entities belonging to this class. This are the fields
* that can have any of the following types: type_class,
* type_struct, type_union, type_array, type_enumeration,
- * type_pointer, type_primitive.
+ * type_pointer, type_primitive.
* This is a dynamic list that can be grown with an "add_" function,
* but not shrinked.
* This is a dynamic list that can be grown with an "add_" function,
* but not shrinked.
*/
/** Creates a new type struct */
-type *new_type_struct (ident *name);
+ir_type *new_type_struct (ident *name);
/** Creates a new type struct with debug information. */
-type *new_d_type_struct (ident *name, dbg_info* db);
+ir_type *new_d_type_struct (ident *name, dbg_info* db);
/* --- manipulate private fields of struct --- */
/** Adds the entity as member of the struct. */
-void add_struct_member (type *strct, entity *member);
+void add_struct_member (ir_type *strct, entity *member);
/** Returns the number of members of this struct. */
-int get_struct_n_members (const type *strct);
+int get_struct_n_members (const ir_type *strct);
/** Returns the member at position pos, 0 <= pos < n_member */
-entity *get_struct_member (const type *strct, int pos);
+entity *get_struct_member (const ir_type *strct, int pos);
/** Returns index of member in strct, -1 if not contained. */
-int get_struct_member_index(type *strct, entity *member);
+int get_struct_member_index(const ir_type *strct, entity *member);
/** Overwrites the member at position pos, 0 <= pos < n_member with
the passed entity. */
-void set_struct_member (type *strct, int pos, entity *member);
+void set_struct_member (ir_type *strct, int pos, entity *member);
/** Finds member in the list of members and removes it. */
-void remove_struct_member (type *strct, entity *member);
+void remove_struct_member (ir_type *strct, entity *member);
/** Returns true if a type is a struct type. */
-int is_struct_type(const type *strct);
+int is_Struct_type(const ir_type *strct);
/**
- * @page method_type Representation of a method type
+ * @page method_type Representation of a method type
*
* A method type represents a method, function or procedure type.
* It contains a list of the parameter and result types, as these
* The arrays for the parameter and result types are not initialized by
* the constructor.
*/
-type *new_type_method (ident *name, int n_param, int n_res);
+ir_type *new_type_method (ident *name, int n_param, int n_res);
/** Create a new method type with debug information.
*
* The arrays for the parameter and result types are not initialized by
* the constructor.
*/
-type *new_d_type_method (ident *name, int n_param, int n_res, dbg_info* db);
+ir_type *new_d_type_method (ident *name, int n_param, int n_res, dbg_info* db);
/* -- manipulate private fields of method. -- */
/** Returns the number of parameters of this method. */
-int get_method_n_params (const type *method);
+int get_method_n_params (const ir_type *method);
/** Returns the type of the parameter at position pos of a method. */
-type *get_method_param_type(type *method, int pos);
+ir_type *get_method_param_type(ir_type *method, int pos);
/** Sets the type of the parameter at position pos of a method.
Also changes the type in the pass-by-value representation by just
changing the type of the corresponding entity if the representation is constructed. */
-void set_method_param_type(type *method, int pos, type* tp);
+void set_method_param_type(ir_type *method, int pos, ir_type *tp);
/** Returns an entity that represents the copied value argument. Only necessary
for compounds passed by value. This information is constructed only on demand. */
-entity *get_method_value_param_ent(type *method, int pos);
+entity *get_method_value_param_ent(ir_type *method, int pos);
/**
* Returns a type that represents the copied value arguments.
*/
-type *get_method_value_param_type(const type *method);
+ir_type *get_method_value_param_type(const ir_type *method);
-int get_method_n_ress (const type *method);
-type *get_method_res_type(type *method, int pos);
+/** Returns the number of results of a method type. */
+int get_method_n_ress (const ir_type *method);
+/** Returns the return type of a method type at position pos. */
+ir_type *get_method_res_type(ir_type *method, int pos);
/** Sets the type of the result at position pos of a method.
Also changes the type in the pass-by-value representation by just
changing the type of the corresponding entity if the representation is constructed. */
-void set_method_res_type(type *method, int pos, type* tp);
+void set_method_res_type(ir_type *method, int pos, ir_type *tp);
/** Returns an entity that represents the copied value result. Only necessary
for compounds passed by value. This information is constructed only on demand. */
-entity *get_method_value_res_ent(type *method, int pos);
+entity *get_method_value_res_ent(ir_type *method, int pos);
/**
* Returns a type that represents the copied value results.
*/
-type *get_method_value_res_type(const type *method);
+ir_type *get_method_value_res_type(const ir_type *method);
/**
- * this enum flags the variadicity of methods (methods with a
+ * This enum flags the variadicity of methods (methods with a
* variable amount of arguments (e.g. C's printf). Default is
* non_variadic.
*/
typedef enum variadicity {
- variadicity_non_variadic, /**< non variadic */
- variadicity_variadic /**< variadic */
+ variadicity_non_variadic, /**< non variadic */
+ variadicity_variadic /**< variadic */
} variadicity;
/** Returns the null-terminated name of this variadicity. */
const char *get_variadicity_name(variadicity vari);
/** Returns the variadicity of a method. */
-variadicity get_method_variadicity(const type *method);
+variadicity get_method_variadicity(const ir_type *method);
/** Sets the variadicity of a method. */
-void set_method_variadicity(type *method, variadicity vari);
+void set_method_variadicity(ir_type *method, variadicity vari);
/**
* Returns the first variadic parameter index of a type.
* of the method type plus one is returned for variadic functions.
* Non-variadic function types always return -1 here.
*/
-int get_method_first_variadic_param_index(const type *method);
+int get_method_first_variadic_param_index(const ir_type *method);
/**
* Sets the first variadic parameter index. This allows to specify
* but still have the knowledge, which parameter must be passed as
* variadic one.
*/
-void set_method_first_variadic_param_index(type *method, int index);
+void set_method_first_variadic_param_index(ir_type *method, int index);
+
+/**
+ * additional method type properties:
+ * Tell about special properties of a method type. Some
+ * of these may be discovered by analyses.
+ */
+typedef enum {
+ mtp_no_property = 0x00000000, /**< no additional properties, default */
+ mtp_property_const = 0x00000001, /**< This method did not access memory and calculates
+ its return values solely from its parameters.
+ GCC: __attribute__((const)). */
+ mtp_property_pure = 0x00000002, /**< This method did NOT write to memory and calculates
+ its return values solely form its parameters and
+ the memory they points to (or global vars).
+ GCC: __attribute__((pure)). */
+ mtp_property_noreturn = 0x00000004, /**< This method did not return due to an aborting system
+ call.
+ GCC: __attribute__((noreturn)). */
+ mtp_property_nothrow = 0x00000008, /**< This method cannot throw an exception.
+ GCC: __attribute__((nothrow)). */
+ mtp_property_naked = 0x00000010, /**< This method is naked.
+ GCC: __attribute__((naked)). */
+ mtp_property_malloc = 0x00000020, /**< This method returns newly allocate memory.
+ GCC: __attribute__((malloc)). */
+ mtp_property_intrinsic = 0x00000040, /**< This method is intrinsic. It is expected that
+ a lowering phase will remove all calls to it. */
+ mtp_property_inherited = 0x40000000 /**< used only in irg's, means property is inherited
+ from type. */
+} mtp_additional_property;
+
+/** Returns the mask of the additional graph properties. */
+unsigned get_method_additional_properties(const ir_type *method);
+
+/** Sets the mask of the additional graph properties. */
+void set_method_additional_properties(ir_type *method, unsigned property_mask);
+
+/** Sets one additional graph property. */
+void set_method_additional_property(ir_type *method, mtp_additional_property flag);
+
+/**
+ * calling conventions: lower 24 bits are the number of register parameters,
+ * upper 8 encode the calling conventions
+ */
+typedef enum {
+ cc_reg_param = 0x01000000, /**< Transmit parameters in registers, else the stack is used.
+ This flag may be set as default on some architectures. */
+ cc_last_on_top = 0x02000000, /**< The last non-register parameter is transmitted on top of
+ the stack. This is equivalent to the stdcall or pascal
+ calling convention. If this flag is not set, the first
+ non-register parameter is used (cdecl calling convention) */
+ cc_callee_clear_stk = 0x04000000, /**< The callee clears the stack. This forbids variadic
+ function calls (stdcall). */
+ cc_this_call = 0x08000000, /**< The first parameter is a this pointer and is transmitted
+ in a special way. */
+
+
+ cc_bits = (0xFF << 24) /**< the calling convention bits */
+} calling_convention;
+
+/* some often used cases: made as defines for firmjni */
+/** cdecl calling convention */
+#define cc_cdecl_set (0)
+/** stdcall calling convention */
+#define cc_stdcall_set cc_callee_clear_stk
+/** fastcall calling convention */
+#define cc_fastcall_set (cc_reg_param|cc_callee_clear_stk)
+
+/** return the default calling convention for method types */
+unsigned get_default_cc_mask(void);
+
+/**
+ * check for the CDECL calling convention
+ */
+#define IS_CDECL(cc_mask) (((cc_mask) & cc_bits) == cc_cdecl_set)
+
+/**
+ * check for the STDCALL calling convention
+ */
+#define IS_STDCALL(cc_mask) (((cc_mask) & cc_bits) == cc_stdcall_set)
+
+/**
+ * check for the FASTCALL calling convention
+ */
+#define IS_FASTCALL(cc_mask) (((cc_mask) & cc_bits) == cc_fastcall_set)
+
+/**
+ * set the CDECL convention bits
+ */
+#define SET_CDECL(cc_mask) (((cc_mask) & ~cc_bits) | cc_cdecl_set)
+
+/**
+ * set the STDCALL convention bits
+ */
+#define SET_STDCALL(cc_mask) (((cc_mask) & ~cc_bits) | cc_stdcall_set)
+
+/**
+ * set the FASTCALL convention bits
+ */
+#define SET_FASTCALL(cc_mask) (((cc_mask) & ~cc_bits) | cc_fastcall_set)
+
+/** Returns the calling convention of an entities graph. */
+unsigned get_method_calling_convention(const ir_type *method);
+
+/** Sets the calling convention of an entities graph. */
+void set_method_calling_convention(ir_type *method, unsigned cc_mask);
+
+/** Returns the number of registers parameters, 0 means default. */
+unsigned get_method_n_regparams(ir_type *method);
+
+/** Sets the number of registers parameters, 0 means default. */
+void set_method_n_regparams(ir_type *method, unsigned n_regs);
/** Returns true if a type is a method type. */
-int is_method_type (const type *method);
+int is_Method_type (const ir_type *method);
/**
- * @page union_type Representation of a union type.
+ * @page union_type Representation of a union (variant) type.
*
* The union type represents union types.
* - n_types: Number of unioned types.
* but not shrinked.
*/
/** Creates a new type union. */
-type *new_type_union (ident *name);
+ir_type *new_type_union (ident *name);
/** Creates a new type union with debug information. */
-type *new_d_type_union (ident *name, dbg_info* db);
+ir_type *new_d_type_union (ident *name, dbg_info* db);
/* --- manipulate private fields of struct --- */
/** Returns the number of unioned types of this union */
-int get_union_n_members (const type *uni);
+int get_union_n_members (const ir_type *uni);
/** Adds a new entity to a union type */
-void add_union_member (type *uni, entity *member);
+void add_union_member (ir_type *uni, entity *member);
/** Returns the entity at position pos of a union */
-entity *get_union_member (const type *uni, int pos);
+entity *get_union_member (const ir_type *uni, int pos);
+
+/** Returns index of member in uni, -1 if not contained. */
+int get_union_member_index(const ir_type *uni, entity *member);
/** Overwrites a entity at position pos in a union type. */
-void set_union_member (type *uni, int pos, entity *member);
+void set_union_member (ir_type *uni, int pos, entity *member);
/** Finds member in the list of members and removes it. */
-void remove_union_member (type *uni, entity *member);
+void remove_union_member (ir_type *uni, entity *member);
/** Returns true if a type is a union type. */
-int is_union_type (const type *uni);
+int is_Union_type (const ir_type *uni);
/**
- * @page array_type Representation of an array type
+ * @page array_type Representation of an array type
*
* The array type represents rectangular multi dimensional arrays.
* The constants representing the bounds must be allocated to
* The entity for array elements is built automatically.
* Set dimension sizes after call to constructor with set_* routines.
*/
-type *new_type_array (ident *name, int n_dimensions,
- type *element_type);
+ir_type *new_type_array (ident *name, int n_dimensions,
+ ir_type *element_type);
/** Create a new type array with debug information.
*
* Set dimension sizes after call to constructor with set_* routines.
* A legal array type must have at least one dimension set.
*/
-type *new_d_type_array (ident *name, int n_dimensions,
- type *element_type, dbg_info* db);
+ir_type *new_d_type_array (ident *name, int n_dimensions,
+ ir_type *element_type, dbg_info* db);
/* --- manipulate private fields of array type --- */
/** Returns the number of array dimensions of this type. */
-int get_array_n_dimensions (const type *array);
+int get_array_n_dimensions (const ir_type *array);
-/** Allocates Const nodes of mode_I for the array dimensions */
-void set_array_bounds_int (type *array, int dimension, int lower_bound,
+/**
+ * Allocates Const nodes of mode_I for one array dimension.
+ * Upper bound in Firm is the element next to the last, i.e. [lower,upper[
+ */
+void set_array_bounds_int (ir_type *array, int dimension, int lower_bound,
int upper_bound);
-void set_array_bounds (type *array, int dimension, ir_node *lower_bound,
+/**
+ * Sets the bounds for one array dimension.
+ * Upper bound in Firm is the element next to the last, i.e. [lower,upper[
+ */
+void set_array_bounds (ir_type *array, int dimension, ir_node *lower_bound,
ir_node *upper_bound);
-void set_array_lower_bound (type *array, int dimension, ir_node *lower_bound);
-void set_array_lower_bound_int (type *array, int dimension, int lower_bound);
-void set_array_upper_bound (type *array, int dimension, ir_node *upper_bound);
-void set_array_upper_bound_int (type *array, int dimension, int lower_bound);
-/** returns true if lower bound != Unknown */
-int has_array_lower_bound (const type *array, int dimension);
-ir_node * get_array_lower_bound (const type *array, int dimension);
+/** Sets the lower bound for one array dimension, i.e. [lower,upper[ */
+void set_array_lower_bound (ir_type *array, int dimension, ir_node *lower_bound);
+
+/** Allocates Const nodes of mode_I for the lower bound of an array
+ dimension, i.e. [lower,upper[ */
+void set_array_lower_bound_int (ir_type *array, int dimension, int lower_bound);
+
+/** Sets the upper bound for one array dimension, i.e. [lower,upper[ */
+void set_array_upper_bound (ir_type *array, int dimension, ir_node *upper_bound);
+
+/** Allocates Const nodes of mode_I for the upper bound of an array
+ dimension, i.e. [lower,upper[. */
+void set_array_upper_bound_int (ir_type *array, int dimension, int upper_bound);
+
+/** Returns true if lower bound != Unknown. */
+int has_array_lower_bound (const ir_type *array, int dimension);
+/** Returns the lower bound of an array. */
+ir_node * get_array_lower_bound (const ir_type *array, int dimension);
/** Works only if bound is Const node with tarval that can be converted to long. */
-long get_array_lower_bound_int (const type *array, int dimension);
+long get_array_lower_bound_int (const ir_type *array, int dimension);
/** returns true if lower bound != Unknown */
-int has_array_upper_bound (const type *array, int dimension);
-ir_node * get_array_upper_bound (const type *array, int dimension);
+int has_array_upper_bound (const ir_type *array, int dimension);
+/** Returns the upper bound of an array. */
+ir_node * get_array_upper_bound (const ir_type *array, int dimension);
/** Works only if bound is Const node with tarval that can be converted to long. */
-long get_array_upper_bound_int (const type *array, int dimension);
+long get_array_upper_bound_int (const ir_type *array, int dimension);
+
+/** Sets an array dimension to a specific order. */
+void set_array_order (ir_type *array, int dimension, int order);
+
+/** Returns the order of an array dimension. */
+int get_array_order (const ir_type *array, int dimension);
+
+/** Find the array dimension that is placed at order ord. */
+int find_array_dimension(const ir_type *array, int order);
-void set_array_order (type *array, int dimension, int order);
-int get_array_order (const type *array, int dimension);
+/** Sets the array element type. */
+void set_array_element_type (ir_type *array, ir_type* tp);
-void set_array_element_type (type *array, type *tp);
-type *get_array_element_type (type *array);
+/** Gets the array element type. */
+ir_type *get_array_element_type (ir_type *array);
-void set_array_element_entity (type *array, entity *ent);
-entity *get_array_element_entity (const type *array);
+/** Sets the array element entity. */
+void set_array_element_entity (ir_type *array, entity *ent);
+
+/** Get the array element entity. */
+entity *get_array_element_entity (const ir_type *array);
/** Returns true if a type is an array type. */
-int is_array_type(const type *array);
+int is_Array_type(const ir_type *array);
/**
- * @page enumeration_type Representation of an enumeration type
+ * @page enumeration_type Representation of an enumeration type
*
* Enumeration types need not necessarily be represented explicitly
* by Firm types, as the frontend can lower them to integer constants as
* - *enum: The target values representing the constants used to
* represent individual enumerations.
* - *enum_nameid: Idents containing the source program name of the enumeration
- * constants
+ * constants
*/
/** Create a new type enumeration -- set the enumerators independently. */
-type *new_type_enumeration (ident *name, int n_enums);
+ir_type *new_type_enumeration (ident *name, int n_enums);
/** Create a new type enumeration with debug information -- set the enumerators independently. */
-type *new_d_type_enumeration (ident *name, int n_enums, dbg_info* db);
+ir_type *new_d_type_enumeration (ident *name, int n_enums, dbg_info* db);
/* --- manipulate fields of enumeration type. --- */
/** Returns the number of enumeration values of this enumeration */
-int get_enumeration_n_enums (const type *enumeration);
+int get_enumeration_n_enums (const ir_type *enumeration);
/** Sets the enumeration value at a given position. */
-void set_enumeration_enum (type *enumeration, int pos, tarval *con);
+void set_enumeration_enum (ir_type *enumeration, int pos, tarval *con);
/** Returns the enumeration value at a given position. */
-tarval *get_enumeration_enum (const type *enumeration, int pos);
+tarval *get_enumeration_enum (const ir_type *enumeration, int pos);
/** Assign an ident to an enumeration value at a given position. */
-void set_enumeration_nameid (type *enumeration, int pos, ident *id);
+void set_enumeration_nameid (ir_type *enumeration, int pos, ident *id);
/** Returns the assigned ident of an enumeration value at a given position. */
-ident *get_enumeration_nameid (const type *enumeration, int pos);
+ident *get_enumeration_nameid (const ir_type *enumeration, int pos);
/** Returns the assigned name of an enumeration value at a given position. */
-const char *get_enumeration_name(const type *enumeration, int pos);
+const char *get_enumeration_name(const ir_type *enumeration, int pos);
/** Returns true if a type is a enumeration type. */
-int is_enumeration_type (const type *enumeration);
+int is_Enumeration_type (const ir_type *enumeration);
/**
- * @page pointer_type Representation of a pointer type
+ * @page pointer_type Representation of a pointer type
*
- * The mode of the pointer type must be a mode_reference.
+ * The mode of the pointer type must be a reference mode.
*
* Pointer types:
* - points_to: The type of the entity this pointer points to.
*/
-/** Creates a new type pointer with mode mode_p. */
-#define new_type_pointer(N, P) new_type_pointer_mode(N, P, mode_P_mach)
-
-/** Creates a new type pointer with given pointer mode. */
-type *new_type_pointer_mode (ident *name, type *points_to, ir_mode *ptr_mode);
+/** Creates a new type pointer. */
+ir_type *new_type_pointer (ident *name, ir_type *points_to, ir_mode *ptr_mode);
-/** Creates a new type pointer given pointer mode and with debug information. */
-type *new_d_type_pointer (ident *name, type *points_to, ir_mode *ptr_mode, dbg_info* db);
+/** Creates a new type pointer with debug information. */
+ir_type *new_d_type_pointer (ident *name, ir_type *points_to, ir_mode *ptr_mode, dbg_info* db);
/* --- manipulate fields of type_pointer --- */
/** Sets the type to which a pointer points to. */
-void set_pointer_points_to_type (type *pointer, type *tp);
+void set_pointer_points_to_type (ir_type *pointer, ir_type *tp);
/** Returns the type to which a pointer points to. */
-type *get_pointer_points_to_type (type *pointer);
+ir_type *get_pointer_points_to_type (ir_type *pointer);
/** Returns true if a type is a pointer type. */
-int is_pointer_type (const type *pointer);
+int is_Pointer_type (const ir_type *pointer);
/** Returns the first pointer type that has as points_to tp.
* Not efficient: O(#types).
- * If not found returns unknown_type. */
-type *find_pointer_type_to_type (type *tp);
+ * If not found returns firm_unknown_type. */
+ir_type *find_pointer_type_to_type (ir_type *tp);
/**
* @page primitive_type Representation of a primitive type
* Primitive types are types that represent indivisible data values that
* map directly to modes. They don't have a private attribute. The
* important information they carry is held in the common mode field.
-*/
+ */
/** Creates a new primitive type. */
-type *new_type_primitive (ident *name, ir_mode *mode);
+ir_type *new_type_primitive (ident *name, ir_mode *mode);
/** Creates a new primitive type with debug information. */
-type *new_d_type_primitive (ident *name, ir_mode *mode, dbg_info* db);
+ir_type *new_d_type_primitive (ident *name, ir_mode *mode, dbg_info* db);
/** Returns true if a type is a primitive type. */
-int is_primitive_type (const type *primitive);
+int is_Primitive_type (const ir_type *primitive);
/**
- * @page none_type
+ * @page none_type The None type
*
* This type is an auxiliary type dedicated to support type analyses.
*
* allocated when initializing the type module.
*
* The following values are set:
- * mode: mode_BAD
- * name: "type_none"
- * state: layout_fixed
- * size: 0
+ * - mode: mode_BAD
+ * - name: "type_none"
+ * - state: layout_fixed
+ * - size: 0
*/
-/* A variable that contains the only none type. */
-extern type *firm_none_type;
-/* Returns the none type */
-type *get_none_type(void);
+/** A variable that contains the only none type. */
+extern ir_type *firm_none_type;
+/** Returns the none type */
+ir_type *get_none_type(void);
/**
* @page unknown_type
* allocated when initializing the type module.
*
* The following values are set:
- * mode: mode_ANY
- * name: "type_unknown"
- * state: layout_fixed
- * size: 0
+ * - mode: mode_ANY
+ * - name: "type_unknown"
+ * - state: layout_fixed
+ * - size: 0
*/
-/* A variable that contains the only unknown type. */
-extern type *firm_unknown_type;
-/* Returns the unknown type */
-type *get_unknown_type(void);
+/** A variable that contains the only unknown type. */
+extern ir_type *firm_unknown_type;
+/** Returns the unknown type */
+ir_type *get_unknown_type(void);
/**
* Checks whether a type is atomic.
- * @param tp - any type
+ * @param tp any type
* @return true if type is primitive, pointer or enumeration
*/
-int is_atomic_type(const type *tp);
+int is_atomic_type(const ir_type *tp);
/* --- Support for compound types --- */
*
* @return Number of members in the compound type.
*/
-int get_compound_n_members(const type *tp);
+int get_compound_n_members(const ir_type *tp);
/**
* Gets the member of a firm compound type at position pos.
*
* @return The member entity at position pos.
*
- * @see get_compound_n_members() for justifaction of existence.
+ * @see get_compound_n_members() for justification of existence.
*/
-entity *get_compound_member(const type *tp, int pos);
+entity *get_compound_member(const ir_type *tp, int pos);
+
+/** Returns index of member in tp, -1 if not contained. */
+int get_compound_member_index(const ir_type *tp, entity *member);
/**
- * Checks whether a type is compound.
+ * Checks whether a type is compound.
*
- * @param tp - any type
+ * @param tp - any type
*
- * @return true if the type is class, structure, union or array type.
+ * @return true if the type is class, structure, union or array type.
*/
-int is_compound_type(const type *tp);
+int is_compound_type(const ir_type *tp);
+/**
+ * Checks, whether a type is a frame type.
+ */
+int is_frame_type(const ir_type *tp);
/**
- * Outputs a unique number for this type if libfirm is compiled for
- * debugging, (configure with --enable-debug) else returns the address
- * of the type cast to long.
+ * Checks, whether a type is a lowered type.
*/
-long get_type_nr(const type *tp);
+int is_lowered_type(const ir_type *tp);
-/*******************************************************************/
-/** Debug aides **/
-/*******************************************************************/
+/**
+ * Makes a new frame type. Frame types are class types,
+ * so all class access functions work.
+ * Frame types are not in the global list of types.
+ */
+ir_type *new_type_frame(ident *name);
+/**
+ * Sets a lowered type for a type. This sets both associations
+ * and marks lowered type as a "lowered" one.
+ */
+void set_lowered_type(ir_type *tp, ir_type *lowered_type);
+/**
+ * Gets the lowered/unlowered type of a type or NULL if this type
+ * has no lowered/unlowered one.
+ */
+ir_type *get_associated_type(const ir_type *tp);
+
+/**
+ * Allocate an area of size bytes aligned at alignment
+ * at the start or the end of a frame type.
+ * The frame type must have already an fixed layout.
+ *
+ * @param frame_type a frame type
+ * @param size the size of the entity
+ * @param alignment the alignment of the entity
+ * @param at_start if true, put the area at the frame type's start, else at end
+ *
+ * @return the entity representing the area
+ */
+entity *frame_alloc_area(type *frame_type, int size, int alignment, int at_start);
+
+/*-----------------------------------------------------------------*/
+/** Debug aides **/
+/*-----------------------------------------------------------------*/
+
+/**
+ * Outputs a unique number for this type if libfirm is compiled for
+ * debugging, (configure with --enable-debug) else returns the address
+ * of the type cast to long.
+ */
+long get_type_nr(const ir_type *tp);
# endif /* _TYPE_H_ */