/*
- * Project: libFIRM
- * File name: ir/debug/dbginfo.h
- * Purpose: Implements the Firm interface to debug information.
- * Author: Goetz Lindenmaier
- * Modified by:
- * Created: 2001
- * CVS-ID: $Id$
- * Copyright: (c) 2001-2003 Universität Karlsruhe
- * Licence: This file protected by GPL - GNU GENERAL PUBLIC LICENSE.
- */
-
-/**
-* @file dbginfo.h
-*
-* This is the Firm interface to debugging support.
-*
-* @author Goetz Lindenmaier
-*
-* Firm requires a debugging module fulfilling this interface, else no
-* debugging information is passed to the backend.
-* The interface requires a datatype representing the debugging
-* information. Firm supports administrating a reference to the debug
-* information in every firm node. Further Firm optimizations call
-* routines to propagate debug information from old nodes to new nodes
-* if the optimization replaces the old ones by the new ones.
-*
-*/
-
-# ifndef _DBGINFO_H_
-# define _DBGINFO_H_
-
-#include "ident.h"
+ * Copyright (C) 1995-2007 University of Karlsruhe. All right reserved.
+ *
+ * This file is part of libFirm.
+ *
+ * This file may be distributed and/or modified under the terms of the
+ * GNU General Public License version 2 as published by the Free Software
+ * Foundation and appearing in the file LICENSE.GPL included in the
+ * packaging of this file.
+ *
+ * Licensees holding valid libFirm Professional Edition licenses may use
+ * this file in accordance with the libFirm Commercial License.
+ * Agreement provided with the Software.
+ *
+ * This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
+ * WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR
+ * PURPOSE.
+ */
-#ifndef _IR_NODE_TYPEDEF_
-#define _IR_NODE_TYPEDEF_
-typedef struct ir_node ir_node;
-#endif
+/**
+ * @file
+ * @brief Implements the Firm interface to debug information.
+ * @author Goetz Lindenmaier, Michael Beck
+ * @date 2001
+ * @version $Id$
+ * @summary
+ * Firm requires a debugging module fulfilling this interface, else no
+ * debugging information is passed to the backend.
+ * The interface requires a datatype representing the debugging
+ * information. Firm supports administrating a reference to the debug
+ * information in every Firm node. Further Firm optimizations call
+ * routines to propagate debug information from old nodes to new nodes
+ * if the optimization replaces the old ones by the new ones.
+ */
+#ifndef FIRM_DEBUG_DBGINFO_H
+#define FIRM_DEBUG_DBGINFO_H
-/* to resolve recursion between entity.h and type.h */
-#ifndef _ENTITY_TYPEDEF_
-#define _ENTITY_TYPEDEF_
-typedef struct entity entity;
-#endif
+#include "firm_types.h"
+#include "ident.h"
-#ifndef _TYPE_TYPEDEF_
-#define _TYPE_TYPEDEF_
-typedef struct type type;
+#ifdef __cplusplus
+extern "C" {
#endif
/**
* An abstract data type containing information for
* debugging support.
*
- * This opaque data type is not defined anywhere in the firm library,
- * but pointers to this type can be stored in firm nodes.
+ * This opaque data type is not defined anywhere in the Firm library,
+ * but pointers to this type can be stored in Firm nodes.
*/
typedef struct dbg_info dbg_info;
/**
* Sets the debug information of a node.
+ *
+ * @param n The node.
+ * @param db The debug info.
*/
void set_irn_dbg_info(ir_node *n, dbg_info *db);
/**
* Returns the debug information of an node.
+ *
+ * @param n The node.
*/
-dbg_info *get_irn_dbg_info(ir_node *n);
+dbg_info *get_irn_dbg_info(const ir_node *n);
/**
* Sets the debug information of an entity.
+ *
+ * @param ent The entity.
+ * @param db The debug info.
*/
-void set_entity_dbg_info(entity *ent, dbg_info *db);
+void set_entity_dbg_info(ir_entity *ent, dbg_info *db);
/**
* Returns the debug information of an entity.
+ *
+ * @param ent The entity.
*/
-dbg_info *get_entity_dbg_info(entity *ent);
+dbg_info *get_entity_dbg_info(const ir_entity *ent);
/**
* Sets the debug information of a type.
+ *
+ * @param tp The type.
+ * @param db The debug info.
*/
-void set_type_dbg_info(type *tp, dbg_info *db);
+void set_type_dbg_info(ir_type *tp, dbg_info *db);
/**
* Returns the debug information of a type.
+ *
+ * @param tp The type.
*/
-dbg_info *get_type_dbg_info(type *tp);
+dbg_info *get_type_dbg_info(const ir_type *tp);
/**
* An enumeration indicating the action performed by a transformation.
*/
typedef enum {
dbg_error = 0,
- dbg_opt_ssa, /**< Optimization of the SSA representation, e.g., removal of superfluent phi nodes. */
+ dbg_opt_ssa, /**< Optimization of the SSA representation, e.g. removal of superfluent Phi nodes. */
dbg_opt_auxnode, /**< Removal of unnecessary auxiliary nodes. */
dbg_const_eval, /**< A Firm subgraph was evaluated to a single constant. */
dbg_opt_cse, /**< A Firm node was replaced due to common subexpression elimination. */
a constant optimization. */
dbg_rem_poly_call, /**< Remove polymorphic call. */
dbg_dead_code, /**< Removing unreachable code, I.e. blocks that are never executed. */
- dbg_opt_confirm, /**< A Firm subgraph was replace because of a Confirmation */
+ dbg_opt_confirm, /**< A Firm subgraph was replace because of a Confirmation. */
+ dbg_backend, /**< A Firm subgraph was replaced because of a Backend transformation */
dbg_max /**< Maximum value. */
-
} dbg_action;
-
/**
- * Converts enum values to strings.
+ * Converts a debug_action into a string.
+ *
+ * @param a the debug action
*/
-#ifdef __GNUC__
-static const char* dbg_action_2_str(dbg_action) __attribute__ ((unused));
-#endif
-
-static const char* dbg_action_2_str(dbg_action a) {
- switch(a) {
- case dbg_error: return "dbg_error"; break;
- case dbg_opt_ssa: return "dbg_opt_ssa"; break;
- case dbg_opt_auxnode: return "dbg_opt_auxnode"; break;
- case dbg_const_eval: return "dbg_const_eval"; break;
- case dbg_opt_cse: return "dbg_opt_cse"; break;
- case dbg_straightening: return "dbg_straightening"; break;
- case dbg_if_simplification: return "dbg_if_simplification"; break;
- case dbg_algebraic_simplification:
- return "dbg_algebraic_simplification"; break;
- case dbg_write_after_write: return "dbg_write_after_write"; break;
- case dbg_write_after_read: return "dbg_write_after_read"; break;
- case dbg_read_after_write: return "dbg_read_after_write"; break;
- case dbg_read_after_read: return "dbg_read_after_read"; break;
- case dbg_read_a_const: return "dbg_read_a_const"; break;
- case dbg_rem_poly_call: return "dbg_rem_poly_call"; break;
- case dbg_opt_confirm: return "dbg_opt_confirm"; break;
- default:
- if (a <= dbg_max)
- return "string conversion not implemented";
- else
- assert(0);
- return NULL;
- }
-}
+const char *dbg_action_2_str(dbg_action a);
/**
* The type of the debug info merge function.
*/
typedef void merge_sets_func(ir_node **new_node_array, int new_num_entries, ir_node **old_node_array, int old_num_entries, dbg_action action);
+/**
+ * The type of the debug info to human readable string function.
+ *
+ * @param buf pointer to a buffer that will hold the info
+ * @param len length of the buffer
+ * @param dbg the debug info
+ *
+ * @return Number of written characters to the buffer.
+ *
+ * @see dbg_init()
+ */
+typedef unsigned snprint_dbg_func(char *buf, unsigned len, const dbg_info *dbg);
+
/**
* Initializes the debug support.
*
* @param dbg_info_merge_pair see function description
* @param dbg_info_merge_sets see function description
+ * @param snprint_dbg see function description
*
- * This function takes Pointers to two functions that merge the
+ * This function takes pointers to two functions that merge the
* debug information when a
- * transformation of a firm graph is performed.
+ * transformation of a Firm graph is performed.
* Firm transformations call one of these functions.
*
* - dbg_info_merge_pair() is called in the following situation:
*
* Further both functions pass an enumeration indicating the action
* performed by the transformation, e.g. the kind of optimization performed.
+ *
+ * The third argument snprint_dbg is called to convert a debug info into a human readable string.
+ * This string is the dumped in the dumper functions.
+ *
+ * Note that if NULL is passed for dbg_info_merge_pair or dbg_info_merge_sets, the default
+ * implementations default_dbg_info_merge_pair() and default_dbg_info_merge_sets() are used.
+ * NULL passed for snprint_dbg means no output.
+ */
+void dbg_init(merge_pair_func *dbg_info_merge_pair, merge_sets_func *dbg_info_merge_sets, snprint_dbg_func *snprint_dbg);
+
+/**
+ * The default merge_pair_func implementation, simply copies the debug info
+ * from the old Firm node to the new one if the new one does not have debug info yet.
+ *
+ * @param nw The new Firm node.
+ * @param old The old Firm node.
+ * @param info The action that cause old node to be replaced by new one.
*/
-void dbg_init(merge_pair_func *dbg_info_merge_pair, merge_sets_func *dbg_info_merge_sets);
+void default_dbg_info_merge_pair(ir_node *nw, ir_node *old, dbg_action info);
+
+/**
+ * The default merge_sets_func implementation. If n_old_nodes is equal 1, copies
+ * the debug info from the old node to all new ones (if they do not have one), else does nothing.
+ *
+ * @param new_nodes An array of new Firm nodes.
+ * @param n_new_nodes The length of the new_nodes array.
+ * @param old_nodes An array of old (replaced) Firm nodes.
+ * @param n_old_nodes The length of the old_nodes array.
+ * @param info The action that cause old node to be replaced by new one.
+ */
+void default_dbg_info_merge_sets(ir_node **new_nodes, int n_new_nodes,
+ ir_node **old_nodes, int n_old_nodes,
+ dbg_action info);
/** @} */
-#endif /* _DBGINFO_H_ */
+#ifdef __cplusplus
+}
+#endif
+
+#endif