/* Callgraph summary data structure.
Copyright (C) 2014-2020 Free Software Foundation, Inc.
Contributed by Martin Liska
This file is part of GCC.
GCC is free software; you can redistribute it and/or modify it under
the terms of the GNU General Public License as published by the Free
Software Foundation; either version 3, or (at your option) any later
version.
GCC is distributed in the hope that it will be useful, but WITHOUT ANY
WARRANTY; without even the implied warranty of MERCHANTABILITY or
FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
for more details.
You should have received a copy of the GNU General Public License
along with GCC; see the file COPYING3. If not see
. */
#ifndef GCC_SYMBOL_SUMMARY_H
#define GCC_SYMBOL_SUMMARY_H
/* Base class for function_summary and fast_function_summary classes. */
template
class function_summary_base
{
public:
/* Default construction takes SYMTAB as an argument. */
function_summary_base (symbol_table *symtab CXX_MEM_STAT_INFO):
m_symtab (symtab),
m_insertion_enabled (true),
m_allocator ("function summary" PASS_MEM_STAT)
{}
/* Basic implementation of insert operation. */
virtual void insert (cgraph_node *, T *) {}
/* Basic implementation of removal operation. */
virtual void remove (cgraph_node *, T *) {}
/* Basic implementation of duplication operation. */
virtual void duplicate (cgraph_node *, cgraph_node *, T *, T *) {}
/* Enable insertion hook invocation. */
void enable_insertion_hook ()
{
m_insertion_enabled = true;
}
/* Enable insertion hook invocation. */
void disable_insertion_hook ()
{
m_insertion_enabled = false;
}
protected:
/* Allocates new data that are stored within map. */
T* allocate_new ()
{
/* Call gcc_internal_because we do not want to call finalizer for
a type T. We call dtor explicitly. */
return is_ggc () ? new (ggc_internal_alloc (sizeof (T))) T ()
: m_allocator.allocate () ;
}
/* Release an item that is stored within map. */
void release (T *item)
{
if (is_ggc ())
ggc_delete (item);
else
m_allocator.remove (item);
}
/* Unregister all call-graph hooks. */
void unregister_hooks ();
/* Internal summary insertion hook pointer. */
cgraph_node_hook_list *m_symtab_insertion_hook;
/* Internal summary removal hook pointer. */
cgraph_node_hook_list *m_symtab_removal_hook;
/* Internal summary duplication hook pointer. */
cgraph_2node_hook_list *m_symtab_duplication_hook;
/* Symbol table the summary is registered to. */
symbol_table *m_symtab;
/* Indicates if insertion hook is enabled. */
bool m_insertion_enabled;
private:
/* Return true when the summary uses GGC memory for allocation. */
virtual bool is_ggc () = 0;
/* Object allocator for heap allocation. */
object_allocator m_allocator;
};
template
void
function_summary_base::unregister_hooks ()
{
m_symtab->remove_cgraph_insertion_hook (m_symtab_insertion_hook);
m_symtab->remove_cgraph_removal_hook (m_symtab_removal_hook);
m_symtab->remove_cgraph_duplication_hook (m_symtab_duplication_hook);
}
/* We want to pass just pointer types as argument for function_summary
template class. */
template
class function_summary
{
private:
function_summary();
};
/* Function summary is a helper class that is used to associate a data structure
related to a callgraph node. Typical usage can be seen in IPA passes which
create a temporary pass-related structures. The summary class registers
hooks that are triggered when a new node is inserted, duplicated and deleted.
A user of a summary class can ovewrite virtual methods than are triggered by
the summary if such hook is triggered. Apart from a callgraph node, the user
is given a data structure tied to the node.
The function summary class can work both with a heap-allocated memory and
a memory gained by garbage collected memory. */
template
class GTY((user)) function_summary : public function_summary_base
{
public:
/* Default construction takes SYMTAB as an argument. */
function_summary (symbol_table *symtab, bool ggc = false CXX_MEM_STAT_INFO);
/* Destructor. */
virtual ~function_summary ();
/* Traverses all summarys with a function F called with
ARG as argument. */
template
void traverse (Arg a) const
{
m_map.template traverse (a);
}
/* Getter for summary callgraph node pointer. If a summary for a node
does not exist it will be created. */
T* get_create (cgraph_node *node)
{
bool existed;
T **v = &m_map.get_or_insert (node->get_uid (), &existed);
if (!existed)
*v = this->allocate_new ();
return *v;
}
/* Getter for summary callgraph node pointer. */
T* get (cgraph_node *node) ATTRIBUTE_PURE
{
T **v = m_map.get (node->get_uid ());
return v == NULL ? NULL : *v;
}
/* Remove node from summary. */
using function_summary_base::remove;
void remove (cgraph_node *node)
{
int uid = node->get_uid ();
T **v = m_map.get (uid);
if (v)
{
m_map.remove (uid);
this->release (*v);
}
}
/* Return true if a summary for the given NODE already exists. */
bool exists (cgraph_node *node)
{
return m_map.get (node->get_uid ()) != NULL;
}
/* Symbol insertion hook that is registered to symbol table. */
static void symtab_insertion (cgraph_node *node, void *data);
/* Symbol removal hook that is registered to symbol table. */
static void symtab_removal (cgraph_node *node, void *data);
/* Symbol duplication hook that is registered to symbol table. */
static void symtab_duplication (cgraph_node *node, cgraph_node *node2,
void *data);
protected:
/* Indication if we use ggc summary. */
bool m_ggc;
private:
/* Indication if we use ggc summary. */
virtual bool is_ggc ()
{
return m_ggc;
}
typedef int_hash map_hash;
/* Main summary store, where summary ID is used as key. */
hash_map m_map;
template friend void gt_ggc_mx (function_summary * const &);
template friend void gt_pch_nx (function_summary * const &);
template friend void gt_pch_nx (function_summary * const &,
gt_pointer_operator, void *);
};
template
function_summary::function_summary (symbol_table *symtab, bool ggc
MEM_STAT_DECL):
function_summary_base (symtab PASS_MEM_STAT), m_ggc (ggc),
m_map (13, ggc, true, GATHER_STATISTICS PASS_MEM_STAT)
{
this->m_symtab_insertion_hook
= this->m_symtab->add_cgraph_insertion_hook (function_summary::symtab_insertion,
this);
this->m_symtab_removal_hook
= this->m_symtab->add_cgraph_removal_hook (function_summary::symtab_removal,
this);
this->m_symtab_duplication_hook
= this->m_symtab->add_cgraph_duplication_hook (function_summary::symtab_duplication,
this);
}
template
function_summary::~function_summary ()
{
this->unregister_hooks ();
/* Release all summaries. */
typedef typename hash_map ::iterator map_iterator;
for (map_iterator it = m_map.begin (); it != m_map.end (); ++it)
this->release ((*it).second);
}
template
void
function_summary::symtab_insertion (cgraph_node *node, void *data)
{
gcc_checking_assert (node->get_uid ());
function_summary *summary = (function_summary *) (data);
if (summary->m_insertion_enabled)
summary->insert (node, summary->get_create (node));
}
template
void
function_summary::symtab_removal (cgraph_node *node, void *data)
{
gcc_checking_assert (node->get_uid ());
function_summary *summary = (function_summary *) (data);
summary->remove (node);
}
template
void
function_summary::symtab_duplication (cgraph_node *node,
cgraph_node *node2, void *data)
{
function_summary *summary = (function_summary *) (data);
T *v = summary->get (node);
if (v)
summary->duplicate (node, node2, v, summary->get_create (node2));
}
template
void
gt_ggc_mx(function_summary* const &summary)
{
gcc_checking_assert (summary->m_ggc);
gt_ggc_mx (&summary->m_map);
}
template
void
gt_pch_nx (function_summary *const &)
{
gcc_unreachable ();
}
template
void
gt_pch_nx (function_summary *const &, gt_pointer_operator, void *)
{
gcc_unreachable ();
}
/* Help template from std c++11. */
template
struct is_same
{
static const bool value = false;
};
template
struct is_same //specialization
{
static const bool value = true;
};
/* We want to pass just pointer types as argument for fast_function_summary
template class. */
template
class fast_function_summary
{
private:
fast_function_summary ();
};
/* Function vector summary is a fast implementation of function_summary that
utilizes vector as primary storage of summaries. */
template
class GTY((user)) fast_function_summary
: public function_summary_base
{
public:
/* Default construction takes SYMTAB as an argument. */
fast_function_summary (symbol_table *symtab CXX_MEM_STAT_INFO);
/* Destructor. */
virtual ~fast_function_summary ();
/* Traverses all summarys with a function F called with
ARG as argument. */
template
void traverse (Arg a) const
{
for (unsigned i = 0; i < m_vector->length (); i++)
if ((*m_vector[i]) != NULL)
f ((*m_vector)[i], a);
}
/* Getter for summary callgraph node pointer. If a summary for a node
does not exist it will be created. */
T* get_create (cgraph_node *node)
{
int id = node->get_summary_id ();
if (id == -1)
id = this->m_symtab->assign_summary_id (node);
if ((unsigned int)id >= m_vector->length ())
{
int newlen = this->m_symtab->cgraph_max_summary_id;
vec_safe_reserve (m_vector, newlen - m_vector->length ());
m_vector->quick_grow_cleared (newlen);
}
if ((*m_vector)[id] == NULL)
(*m_vector)[id] = this->allocate_new ();
return (*m_vector)[id];
}
/* Getter for summary callgraph node pointer. */
T* get (cgraph_node *node) ATTRIBUTE_PURE
{
return exists (node) ? (*m_vector)[node->get_summary_id ()] : NULL;
}
using function_summary_base::remove;
void remove (cgraph_node *node)
{
if (exists (node))
{
int id = node->get_summary_id ();
this->release ((*m_vector)[id]);
(*m_vector)[id] = NULL;
}
}
/* Return true if a summary for the given NODE already exists. */
bool exists (cgraph_node *node)
{
int id = node->get_summary_id ();
return (id != -1
&& (unsigned int)id < m_vector->length ()
&& (*m_vector)[id] != NULL);
}
/* Symbol insertion hook that is registered to symbol table. */
static void symtab_insertion (cgraph_node *node, void *data);
/* Symbol removal hook that is registered to symbol table. */
static void symtab_removal (cgraph_node *node, void *data);
/* Symbol duplication hook that is registered to symbol table. */
static void symtab_duplication (cgraph_node *node, cgraph_node *node2,
void *data);
private:
virtual bool is_ggc ();
/* Summary is stored in the vector. */
vec *m_vector;
template friend void gt_ggc_mx (fast_function_summary * const &);
template friend void gt_pch_nx (fast_function_summary * const &);
template friend void gt_pch_nx (fast_function_summary * const &,
gt_pointer_operator, void *);
};
template
fast_function_summary::fast_function_summary (symbol_table *symtab MEM_STAT_DECL):
function_summary_base (symtab PASS_MEM_STAT), m_vector (NULL)
{
vec_alloc (m_vector, 13 PASS_MEM_STAT);
this->m_symtab_insertion_hook
= this->m_symtab->add_cgraph_insertion_hook (fast_function_summary::symtab_insertion,
this);
this->m_symtab_removal_hook
= this->m_symtab->add_cgraph_removal_hook (fast_function_summary::symtab_removal,
this);
this->m_symtab_duplication_hook
= this->m_symtab->add_cgraph_duplication_hook (fast_function_summary::symtab_duplication,
this);
}
template
fast_function_summary::~fast_function_summary ()
{
this->unregister_hooks ();
/* Release all summaries. */
for (unsigned i = 0; i < m_vector->length (); i++)
if ((*m_vector)[i] != NULL)
this->release ((*m_vector)[i]);
vec_free (m_vector);
}
template
void
fast_function_summary::symtab_insertion (cgraph_node *node, void *data)
{
gcc_checking_assert (node->get_uid ());
fast_function_summary *summary = (fast_function_summary *) (data);
if (summary->m_insertion_enabled)
summary->insert (node, summary->get_create (node));
}
template
void
fast_function_summary::symtab_removal (cgraph_node *node, void *data)
{
gcc_checking_assert (node->get_uid ());
fast_function_summary *summary = (fast_function_summary *) (data);
if (summary->exists (node))
summary->remove (node);
}
template
void
fast_function_summary::symtab_duplication (cgraph_node *node,
cgraph_node *node2,
void *data)
{
fast_function_summary *summary = (fast_function_summary *) (data);
T *v = summary->get (node);
if (v)
{
T *duplicate = summary->get_create (node2);
summary->duplicate (node, node2, v, duplicate);
}
}
template
inline bool
fast_function_summary::is_ggc ()
{
return is_same::value;
}
template
void
gt_ggc_mx (fast_function_summary* const &)
{
}
template
void
gt_pch_nx (fast_function_summary* const &)
{
}
template
void
gt_pch_nx (fast_function_summary* const&, gt_pointer_operator,
void *)
{
}
template
void
gt_ggc_mx (fast_function_summary* const &summary)
{
ggc_test_and_set_mark (summary->m_vector);
gt_ggc_mx (summary->m_vector);
}
template
void
gt_pch_nx (fast_function_summary *const &)
{
gcc_unreachable ();
}
template
void
gt_pch_nx (fast_function_summary *const &, gt_pointer_operator,
void *)
{
gcc_unreachable ();
}
/* Base class for call_summary and fast_call_summary classes. */
template
class call_summary_base
{
public:
/* Default construction takes SYMTAB as an argument. */
call_summary_base (symbol_table *symtab CXX_MEM_STAT_INFO):
m_symtab (symtab),
m_initialize_when_cloning (false),
m_allocator ("call summary" PASS_MEM_STAT)
{}
/* Basic implementation of removal operation. */
virtual void remove (cgraph_edge *, T *) {}
/* Basic implementation of duplication operation. */
virtual void duplicate (cgraph_edge *, cgraph_edge *, T *, T *) {}
protected:
/* Allocates new data that are stored within map. */
T* allocate_new ()
{
/* Call gcc_internal_because we do not want to call finalizer for
a type T. We call dtor explicitly. */
return is_ggc () ? new (ggc_internal_alloc (sizeof (T))) T ()
: m_allocator.allocate ();
}
/* Release an item that is stored within map. */
void release (T *item)
{
if (is_ggc ())
ggc_delete (item);
else
m_allocator.remove (item);
}
/* Unregister all call-graph hooks. */
void unregister_hooks ();
/* Symbol table the summary is registered to. */
symbol_table *m_symtab;
/* Internal summary removal hook pointer. */
cgraph_edge_hook_list *m_symtab_removal_hook;
/* Internal summary duplication hook pointer. */
cgraph_2edge_hook_list *m_symtab_duplication_hook;
/* Initialize summary for an edge that is cloned. */
bool m_initialize_when_cloning;
private:
/* Return true when the summary uses GGC memory for allocation. */
virtual bool is_ggc () = 0;
/* Object allocator for heap allocation. */
object_allocator m_allocator;
};
template
void
call_summary_base::unregister_hooks ()
{
m_symtab->remove_edge_removal_hook (m_symtab_removal_hook);
m_symtab->remove_edge_duplication_hook (m_symtab_duplication_hook);
}
/* An impossible class templated by non-pointers so, which makes sure that only
summaries gathering pointers can be created. */
template
class call_summary
{
private:
call_summary ();
};
/* Class to store auxiliary information about call graph edges. */
template
class GTY((user)) call_summary : public call_summary_base
{
public:
/* Default construction takes SYMTAB as an argument. */
call_summary (symbol_table *symtab, bool ggc = false
CXX_MEM_STAT_INFO)
: call_summary_base (symtab PASS_MEM_STAT), m_ggc (ggc),
m_map (13, ggc, true, GATHER_STATISTICS PASS_MEM_STAT)
{
this->m_symtab_removal_hook
= this->m_symtab->add_edge_removal_hook (call_summary::symtab_removal,
this);
this->m_symtab_duplication_hook
= this->m_symtab->add_edge_duplication_hook (call_summary::symtab_duplication,
this);
}
/* Destructor. */
virtual ~call_summary ();
/* Traverses all summarys with an edge E called with
ARG as argument. */
template
void traverse (Arg a) const
{
m_map.template traverse (a);
}
/* Getter for summary callgraph edge pointer.
If a summary for an edge does not exist, it will be created. */
T* get_create (cgraph_edge *edge)
{
bool existed;
T **v = &m_map.get_or_insert (edge->get_uid (), &existed);
if (!existed)
*v = this->allocate_new ();
return *v;
}
/* Getter for summary callgraph edge pointer. */
T* get (cgraph_edge *edge) ATTRIBUTE_PURE
{
T **v = m_map.get (edge->get_uid ());
return v == NULL ? NULL : *v;
}
/* Remove edge from summary. */
using call_summary_base::remove;
void remove (cgraph_edge *edge)
{
int uid = edge->get_uid ();
T **v = m_map.get (uid);
if (v)
{
m_map.remove (uid);
this->release (*v);
}
}
/* Return true if a summary for the given EDGE already exists. */
bool exists (cgraph_edge *edge)
{
return m_map.get (edge->get_uid ()) != NULL;
}
/* Symbol removal hook that is registered to symbol table. */
static void symtab_removal (cgraph_edge *edge, void *data);
/* Symbol duplication hook that is registered to symbol table. */
static void symtab_duplication (cgraph_edge *edge1, cgraph_edge *edge2,
void *data);
protected:
/* Indication if we use ggc summary. */
bool m_ggc;
private:
/* Indication if we use ggc summary. */
virtual bool is_ggc ()
{
return m_ggc;
}
typedef int_hash map_hash;
/* Main summary store, where summary ID is used as key. */
hash_map m_map;
template friend void gt_ggc_mx (call_summary * const &);
template friend void gt_pch_nx (call_summary * const &);
template friend void gt_pch_nx (call_summary * const &,
gt_pointer_operator, void *);
};
template
call_summary::~call_summary ()
{
this->unregister_hooks ();
/* Release all summaries. */
typedef typename hash_map ::iterator map_iterator;
for (map_iterator it = m_map.begin (); it != m_map.end (); ++it)
this->release ((*it).second);
}
template
void
call_summary::symtab_removal (cgraph_edge *edge, void *data)
{
call_summary *summary = (call_summary *) (data);
summary->remove (edge);
}
template
void
call_summary::symtab_duplication (cgraph_edge *edge1,
cgraph_edge *edge2, void *data)
{
call_summary *summary = (call_summary *) (data);
T *edge1_summary = NULL;
if (summary->m_initialize_when_cloning)
edge1_summary = summary->get_create (edge1);
else
edge1_summary = summary->get (edge1);
if (edge1_summary)
summary->duplicate (edge1, edge2, edge1_summary,
summary->get_create (edge2));
}
template
void
gt_ggc_mx(call_summary* const &summary)
{
gcc_checking_assert (summary->m_ggc);
gt_ggc_mx (&summary->m_map);
}
template
void
gt_pch_nx (call_summary *const &)
{
gcc_unreachable ();
}
template
void
gt_pch_nx (call_summary *const &, gt_pointer_operator, void *)
{
gcc_unreachable ();
}
/* We want to pass just pointer types as argument for fast_call_summary
template class. */
template
class fast_call_summary
{
private:
fast_call_summary ();
};
/* Call vector summary is a fast implementation of call_summary that
utilizes vector as primary storage of summaries. */
template
class GTY((user)) fast_call_summary : public call_summary_base
{
public:
/* Default construction takes SYMTAB as an argument. */
fast_call_summary (symbol_table *symtab CXX_MEM_STAT_INFO)
: call_summary_base (symtab PASS_MEM_STAT), m_vector (NULL)
{
vec_alloc (m_vector, 13 PASS_MEM_STAT);
this->m_symtab_removal_hook
= this->m_symtab->add_edge_removal_hook (fast_call_summary::symtab_removal,
this);
this->m_symtab_duplication_hook
= this->m_symtab->add_edge_duplication_hook (fast_call_summary::symtab_duplication,
this);
}
/* Destructor. */
virtual ~fast_call_summary ();
/* Traverses all summarys with an edge F called with
ARG as argument. */
template
void traverse (Arg a) const
{
for (unsigned i = 0; i < m_vector->length (); i++)
if ((*m_vector[i]) != NULL)
f ((*m_vector)[i], a);
}
/* Getter for summary callgraph edge pointer.
If a summary for an edge does not exist, it will be created. */
T* get_create (cgraph_edge *edge)
{
int id = edge->get_summary_id ();
if (id == -1)
id = this->m_symtab->assign_summary_id (edge);
if ((unsigned)id >= m_vector->length ())
{
int newlen = this->m_symtab->edges_max_summary_id;
m_vector->reserve (newlen - m_vector->length ());
m_vector->quick_grow_cleared (newlen);
}
if ((*m_vector)[id] == NULL)
(*m_vector)[id] = this->allocate_new ();
return (*m_vector)[id];
}
/* Getter for summary callgraph edge pointer. */
T* get (cgraph_edge *edge) ATTRIBUTE_PURE
{
return exists (edge) ? (*m_vector)[edge->get_summary_id ()] : NULL;
}
/* Remove edge from summary. */
using call_summary_base::remove;
void remove (cgraph_edge *edge)
{
if (exists (edge))
{
int id = edge->get_summary_id ();
this->release ((*m_vector)[id]);
(*m_vector)[id] = NULL;
}
}
/* Return true if a summary for the given EDGE already exists. */
bool exists (cgraph_edge *edge)
{
int id = edge->get_summary_id ();
return (id != -1
&& (unsigned)id < m_vector->length ()
&& (*m_vector)[id] != NULL);
}
/* Symbol removal hook that is registered to symbol table. */
static void symtab_removal (cgraph_edge *edge, void *data);
/* Symbol duplication hook that is registered to symbol table. */
static void symtab_duplication (cgraph_edge *edge1, cgraph_edge *edge2,
void *data);
private:
virtual bool is_ggc ();
/* Summary is stored in the vector. */
vec *m_vector;
template friend void gt_ggc_mx (fast_call_summary * const &);
template friend void gt_pch_nx (fast_call_summary * const &);
template friend void gt_pch_nx (fast_call_summary * const &,
gt_pointer_operator, void *);
};
template
fast_call_summary::~fast_call_summary ()
{
this->unregister_hooks ();
/* Release all summaries. */
for (unsigned i = 0; i < m_vector->length (); i++)
if ((*m_vector)[i] != NULL)
this->release ((*m_vector)[i]);
vec_free (m_vector);
}
template
void
fast_call_summary::symtab_removal (cgraph_edge *edge, void *data)
{
fast_call_summary *summary = (fast_call_summary *) (data);
summary->remove (edge);
}
template
void
fast_call_summary::symtab_duplication (cgraph_edge *edge1,
cgraph_edge *edge2, void *data)
{
fast_call_summary *summary = (fast_call_summary *) (data);
T *edge1_summary = NULL;
if (summary->m_initialize_when_cloning)
edge1_summary = summary->get_create (edge1);
else
edge1_summary = summary->get (edge1);
if (edge1_summary)
{
T *duplicate = summary->get_create (edge2);
summary->duplicate (edge1, edge2, edge1_summary, duplicate);
}
}
template
inline bool
fast_call_summary::is_ggc ()
{
return is_same::value;
}
template
void
gt_ggc_mx (fast_call_summary* const &summary ATTRIBUTE_UNUSED)
{
}
template
void
gt_pch_nx (fast_call_summary* const &summary ATTRIBUTE_UNUSED)
{
}
template
void
gt_pch_nx (fast_call_summary* const& summary ATTRIBUTE_UNUSED,
gt_pointer_operator op ATTRIBUTE_UNUSED,
void *cookie ATTRIBUTE_UNUSED)
{
}
template
void
gt_ggc_mx (fast_call_summary* const &summary)
{
ggc_test_and_set_mark (summary->m_vector);
gt_ggc_mx (&summary->m_vector);
}
template
void
gt_pch_nx (fast_call_summary *const &)
{
gcc_unreachable ();
}
template
void
gt_pch_nx (fast_call_summary *const &, gt_pointer_operator, void *)
{
gcc_unreachable ();
}
#endif /* GCC_SYMBOL_SUMMARY_H */