nsz Git - libfirm/blob - ir/tr/tpop_t.h

   1 /*
   2  * Copyright (C) 1995-2008 University of Karlsruhe.  All right reserved.
   3  *
   4  * This file is part of libFirm.
   5  *
   6  * This file may be distributed and/or modified under the terms of the
   7  * GNU General Public License version 2 as published by the Free Software
   8  * Foundation and appearing in the file LICENSE.GPL included in the
   9  * packaging of this file.
  10  *
  11  * Licensees holding valid libFirm Professional Edition licenses may use
  12  * this file in accordance with the libFirm Commercial License.
  13  * Agreement provided with the Software.
  14  *
  15  * This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
  16  * WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  17  * PURPOSE.
  18  */
  19
  20 /**
  21  * @file
  22  * @brief   Opcode of types -- private header.
  23  * @author  Goetz Lindenmaier, Michael Beck
  24  * @version $Id$
  25  */
  26 #ifndef FIRM_TR_TPOP_T_H
  27 #define FIRM_TR_TPOP_T_H
  28
  29 #include <stdlib.h>
  30
  31 #include "firm_types.h"
  32 #include "typerep.h"
  33 #include "irmode.h"
  34
  35 /** A function called to free attributes of a type. */
  36 typedef void (*free_attrs_func)(ir_type *tp);
  37
  38 /** A function called to free owned entities of a type. */
  39 typedef void (*free_entities_func)(ir_type *tp);
  40
  41 /** A function called to free all automatic allocated entities of a type. */
  42 typedef void (*free_auto_entities_func)(ir_type *tp);
  43
  44 /** A function called to set the mode of a type. */
  45 typedef void (*set_type_mode_func)(ir_type *tp, ir_mode *m);
  46
  47 /** A function called to set the size of a type in bytes. */
  48 typedef void (*set_type_size_func)(ir_type *tp, unsigned size);
  49
  50 /** A function called to get the number of compound members */
  51 typedef int (*get_n_members_func)(const ir_type *tp);
  52
  53 /** A function called to get the pos'th compound member */
  54 typedef ir_entity *(*get_member_func)(const ir_type *tp, int pos);
  55
  56 typedef int (*get_member_index_func)(const ir_type *tp, ir_entity *member);
  57
  58 /** A function called to insert an entity into the type */
  59 typedef void (*insert_entity_func)(ir_type *tp, ir_entity *member);
  60
  61 /**
  62  * tp_op operations.
  63  */
  64 typedef struct _tp_op_ops {
  65         free_attrs_func         free_attrs;         /**< Called to free the attributes of a type. */
  66         free_entities_func      free_entities;      /**< Called to free the owned entities of a type. */
  67         free_auto_entities_func free_auto_entities; /**< Called to free the automatic allocated entities of a type. */
  68         set_type_mode_func      set_type_mode;      /**< Called to set a ir_mode of a type. */
  69         set_type_size_func      set_type_size;      /**< Called to set the byte size of a type. */
  70         get_n_members_func      get_n_members;      /**< Called to return the number of compound members. */
  71         get_member_func         get_member;         /**< Called to get the pos'th compound member. */
  72         get_member_index_func   get_member_index;   /**< Called to get the index of a compound member. */
  73 } tp_op_ops;
  74
  75 /** possible flags for a type opcode */
  76 enum tp_op_flags_t {
  77         TP_OP_FLAG_COMPOUND = 1   /**< is a compound type */
  78 };
  79
  80 /** The type opcode. */
  81 struct tp_op {
  82         tp_opcode code;                     /**< The tpop code. */
  83         ident     *name;                    /**< The name of the type opcode. */
  84         size_t    attr_size;                /**< The attribute size for a type of this opcode. */
  85         unsigned  flags;                    /**< Flags for this opcode. */
  86         tp_op_ops ops;                      /**< tp_op operations. */
  87 };
  88
  89 /**
  90  * Returns a new type opcode.
  91  *
  92  * Allocates a new tp_op struct and initializes it's fields with
  93  * the passed values.  This function is only to be used during
  94  * initialization of the library.
  95  *
  96  * @param code        the enum for this type opcode.
  97  * @param name        an ident for the name of the type opcode.
  98  * @param flags       additional flags
  99  * @param attr_size   the size of the attributes necessary for a type with
 100  *                    this opcode
 101  * @param ops         the tp_op operations for this type
 102  * @return A new type opcode.
 103  */
 104 tp_op *new_tpop (tp_opcode code, ident *name, unsigned flags, size_t attr_size,
 105                  const tp_op_ops *ops);
 106
 107 /**
 108  * Free a tpop datastructure.
 109  */
 110 void free_tpop(tp_op *tpop);
 111
 112 /**
 113  * Initialize the tpop module.
 114  *
 115  * Must be called during the initialization of the library. Allocates
 116  * opcodes and sets the globals that are external visible as specified
 117  * in tpop.h.
 118  * Allocates opcodes for classes, struct, method, union, array,
 119  * enumeration, pointer and primitive and sets the according values.
 120  */
 121 void init_tpop (void);
 122
 123 /**
 124  * Finalize the tpop module.
 125  *
 126  * Frees all type opcodes.
 127  */
 128 void finish_tpop(void);
 129
 130 /**
 131  * Returns the size of the attribute to this kind
 132  * of type.
 133  *
 134  * Internal feature.
 135  *
 136  * @param op  The type opcode to get the size for.
 137  * @return The size of the attribute of types with this opcode.
 138  */
 139 int get_tpop_attr_size (const tp_op *op);
 140
 141
 142 /* ---------------- *
 143  * inline functions *
 144  * -----------------*/
 145
 146 static INLINE tp_opcode
 147 _get_tpop_code(const tp_op *op) {
 148         return op->code;
 149 }
 150
 151 static INLINE ident *
 152 _get_tpop_ident(const tp_op *op){
 153         return op->name;
 154 }
 155
 156 static INLINE size_t
 157 _get_tpop_attr_size(const tp_op *op) {
 158         return op->attr_size;
 159 }
 160
 161 #define get_tpop_code(op)      _get_tpop_code(op)
 162 #define get_tpop_ident(op)     _get_tpop_ident(op)
 163 #define get_tpop_attr_size(op) _get_tpop_attr_size(op)
 164
 165 #endif /* FIRM_TR_TPOP_T_H */