15 #include <unordered_set>
35 const exprt &e = it->second;
45 const exprt &expr)
const
52 const typet &type)
const
61 if(type.
id() == ID_c_enum_tag)
63 else if(type.
id()==ID_struct_tag)
65 else if(type.
id()==ID_union_tag)
73 const typet &type)
const
77 if(followed.
id()==ID_struct || followed.
id()==ID_union)
81 const std::string &tag=followed.
get_string(ID_tag);
95 const typet &subtype = c.type();
100 if(!c.get_base_name().empty())
113 else if(followed.
id()==ID_pointer)
127 exprt &conflict_path)
130 debug() <<
"<BEGIN DEPTH " << depth <<
">" <<
eom;
139 msg=
"type classes differ";
140 else if(t1.
id()==ID_pointer ||
146 if(conflict_path.
type().
id() == ID_pointer)
157 else if(t1.
id()==ID_pointer)
158 msg=
"pointer types differ";
160 msg=
"array types differ";
162 else if(t1.
id()==ID_struct ||
171 exprt conflict_path_before=conflict_path;
173 if(components1.size()!=components2.size())
175 msg=
"number of members is different (";
181 for(std::size_t i=0; i<components1.size(); ++i)
183 const typet &subtype1=components1[i].type();
184 const typet &subtype2=components2[i].type();
186 if(components1[i].get_name()!=components2[i].get_name())
189 msg+=
id2string(components1[i].get_name())+
'/';
190 msg+=
id2string(components2[i].get_name())+
')';
195 typedef std::unordered_set<typet, irep_hash> type_sett;
196 type_sett parent_types;
198 exprt e=conflict_path_before;
199 while(e.
id()==ID_dereference ||
203 parent_types.insert(e.
type());
204 if(e.
id() == ID_dereference)
206 else if(e.
id() == ID_member)
208 else if(e.
id() == ID_index)
214 conflict_path=conflict_path_before;
215 conflict_path.
type()=t1;
220 parent_types.find(t1)==parent_types.end())
230 msg=
"type of member "+
249 if(parent_types.find(t1)==parent_types.end())
255 else if(t1.
id()==ID_c_enum)
265 msg=
"enum value types are different (";
269 else if(members1.size()!=members2.size())
271 msg=
"number of enum members is different (";
277 for(std::size_t i=0; i<members1.size(); ++i)
286 else if(members1[i].get_value()!=members2[i].get_value())
289 msg+=
id2string(members1[i].get_value())+
'/';
290 msg+=
id2string(members2[i].get_value())+
')';
296 msg+=
"\nenum declarations at\n";
300 else if(t1.
id()==ID_code)
311 if(parameters1.size()!=parameters2.size())
313 msg=
"parameter counts differ (";
332 msg=
"return types differ";
336 for(std::size_t i=0; i<parameters1.size(); i++)
338 const typet &subtype1=parameters1[i].type();
339 const typet &subtype2=parameters2[i].type();
356 msg=
"parameter types differ";
364 msg=
"conflict on POD";
369 error() <<
"reason for conflict at "
378 debug() <<
"<END DEPTH " << depth <<
">" <<
eom;
385 const std::string &msg)
391 error() <<
"old definition in module '" << old_symbol.
module <<
"' "
394 error() <<
"new definition in module '" << new_symbol.
module <<
"' "
402 const std::string &msg)
406 warning() <<
"warning: " << msg <<
" \""
409 warning() <<
"old definition in module " << old_symbol.
module <<
" "
412 warning() <<
"new definition in module " << new_symbol.
module <<
" "
437 return new_identifier;
475 "implicit function declaration");
480 "implicit function declaration");
493 "ignoring conflicting implicit function declaration");
498 "implicit function declaration");
525 "function declaration conflicts with with weak definition");
539 "ignoring conflicting weak function declaration");
553 "ignoring conflicting function alias declaration");
564 "ignoring conflicting function declarations");
584 "conflicting parameter counts of function declarations");
593 std::string warn_msg;
595 typedef std::deque<std::pair<typet, typet> > conflictst;
596 conflictst conflicts;
602 code_typet::parameterst::const_iterator
612 std::make_pair(o_it->type(), n_it->type()));
621 "conflicting parameter counts of function declarations");
636 "conflicting parameter counts of function declarations");
645 while(!conflicts.empty())
652 if((t1.
id()==ID_empty || t2.
id()==ID_empty) &&
656 warn_msg=
"void/non-void return type conflict on function";
662 else if((t1.
id()==ID_pointer || t2.
id()==ID_pointer) &&
667 warn_msg=
"different pointer types in extern function";
672 else if((t1.
id()==ID_pointer || t2.
id()==ID_pointer) &&
677 warn_msg=
"pointer parameter types differ between "
678 "declaration and definition";
684 else if((t1.
id()==ID_union &&
685 (t1.
get_bool(ID_C_transparent_union) ||
686 conflicts.front().first.get_bool(ID_C_transparent_union))) ||
687 (t2.
id()==ID_union &&
688 (t2.
get_bool(ID_C_transparent_union) ||
689 conflicts.front().second.get_bool(ID_C_transparent_union))))
693 (t1.
get_bool(ID_C_transparent_union) ||
694 conflicts.front().first.get_bool(ID_C_transparent_union)) &&
699 const typet &src_type=t1.
id()==ID_union?t2:t1;
707 warn_msg=
"conflict on transparent union parameter in function";
721 warn_msg=
"non-pointer parameter types differ between "
722 "declaration and definition";
728 conflicts.pop_front();
731 if(!conflicts.empty())
736 conflicts.front().first,
737 conflicts.front().second);
742 "conflicting function declarations");
783 warning() <<
"function '" << old_symbol.
name <<
"' in module '"
785 <<
"' is shadowed by a definition in module '"
792 "duplicate definition of function");
805 t1.
id() == ID_struct_tag || t1.
id() == ID_union_tag ||
806 t1.
id() == ID_c_enum_tag)
810 if(info.
o_symbols.insert(identifier).second)
822 t2.
id() == ID_struct_tag || t2.
id() == ID_union_tag ||
823 t2.
id() == ID_c_enum_tag)
827 if(info.
n_symbols.insert(identifier).second)
838 else if(t1.
id()==ID_pointer && t2.
id()==ID_array)
844 else if(t1.
id()==ID_array && t2.
id()==ID_pointer)
879 else if(t1.
id()!=t2.
id())
885 if(t1.
id()==ID_pointer)
894 "conflicting pointer types for variable");
901 "conflicting pointer types for variable");
911 else if(t1.
id()==ID_array &&
924 else if(new_size.
is_nil() ||
939 "conflicting array sizes for variable");
948 else if(t1.
id()==ID_struct || t1.
id()==ID_union)
956 struct_union_typet::componentst::const_iterator
957 it1=components1.begin(), it2=components2.begin();
959 it1!=components1.end() && it2!=components2.end();
962 if(it1->get_name()!=it2->get_name() ||
966 if(it1!=components1.end() || it2!=components2.end())
995 bool set_to_new =
false;
1008 if(old_type.
id()==ID_struct ||
1009 old_type.
id()==ID_union ||
1010 old_type.
id()==ID_array ||
1011 old_type.
id()==ID_c_enum)
1021 "conflicting types for variable");
1048 tmp_new=new_symbol.
value;
1061 warning() <<
"warning: conflicting initializers for"
1062 <<
" variable \"" << old_symbol.
name <<
"\"\n";
1063 warning() <<
"using old value in module " << old_symbol.
module <<
" "
1066 warning() <<
"ignoring new value in module " << new_symbol.
module <<
" "
1086 bool is_code_old_symbol=old_symbol.
type.
id()==ID_code;
1087 bool is_code_new_symbol=new_symbol.
type.
id()==ID_code;
1089 if(is_code_old_symbol!=is_code_new_symbol)
1094 "conflicting definition for symbol");
1100 if(is_code_old_symbol)
1125 "conflicting definition for symbol");
1131 if(old_symbol.
type==new_symbol.
type)
1135 old_symbol.
type.
id() == ID_struct &&
1137 new_symbol.
type.
id() == ID_struct &&
1146 old_symbol.
type.
id() == ID_struct &&
1148 new_symbol.
type.
id() == ID_struct &&
1156 old_symbol.
type.
id() == ID_union &&
1158 new_symbol.
type.
id() == ID_union &&
1167 old_symbol.
type.
id() == ID_union &&
1169 new_symbol.
type.
id() == ID_union &&
1176 if(old_symbol.
type.
id()==ID_array &&
1177 new_symbol.
type.
id()==ID_array &&
1205 "unexpected difference between type symbols");
1217 if(old_symbol.
type==new_symbol.
type)
1221 old_symbol.
type.
id() == ID_struct &&
1223 new_symbol.
type.
id() == ID_struct &&
1228 old_symbol.
type.
id() == ID_struct &&
1230 new_symbol.
type.
id() == ID_struct &&
1235 old_symbol.
type.
id() == ID_union &&
1237 new_symbol.
type.
id() == ID_union &&
1242 old_symbol.
type.
id() == ID_union &&
1244 new_symbol.
type.
id() == ID_union &&
1248 if(old_symbol.
type.
id()==ID_array &&
1249 new_symbol.
type.
id()==ID_array &&
1265 std::unordered_set<irep_idt> &needs_to_be_renamed)
1274 if(symbol_pair.second.is_type)
1280 for(
const auto &symbol_used : symbols_used)
1282 used_by[symbol_used].insert(symbol_pair.first);
1287 std::deque<irep_idt> queue(
1288 needs_to_be_renamed.begin(), needs_to_be_renamed.end());
1290 while(!queue.empty())
1295 const std::unordered_set<irep_idt> &u = used_by[id];
1297 for(
const auto &dep : u)
1298 if(needs_to_be_renamed.insert(dep).second)
1300 queue.push_back(dep);
1302 debug() <<
"LINKING: needs to be renamed (dependency): "
1310 const std::unordered_set<irep_idt> &needs_to_be_renamed)
1314 for(
const irep_idt &
id : needs_to_be_renamed)
1323 new_identifier=
rename(
id);
1325 new_symbol.
name=new_identifier;
1328 debug() <<
"LINKING: renaming " <<
id <<
" to "
1329 << new_identifier <<
eom;
1341 std::map<irep_idt, symbolt> src_symbols;
1345 symbolt symbol=named_symbol.second;
1350 src_symbols.emplace(named_symbol.first, std::move(symbol));
1354 std::unordered_set<irep_idt> collisions;
1356 for(
const auto &named_symbol : src_symbols)
1359 if(named_symbol.first!=named_symbol.second.name)
1372 collisions.insert(named_symbol.first);
1377 for(
const irep_idt &collision : collisions)
1380 symbolt &new_symbol=src_symbols.at(collision);
1391 if(!named_symbol.second.is_type &&
1392 !named_symbol.second.is_macro &&
1393 named_symbol.second.value.is_not_nil())
1409 std::unordered_set<irep_idt> needs_to_be_renamed;
1413 symbol_tablet::symbolst::const_iterator m_it =
1420 needs_to_be_renamed.insert(symbol_pair.first);
1422 debug() <<
"LINKING: needs to be renamed: " << symbol_pair.first <<
eom;
1443 dest_symbol_table, new_symbol_table, message_handler);
1445 return linking.typecheck_main();
bool base_type_eq(const typet &type1, const typet &type2, const namespacet &ns)
Check types for equality across all levels of hierarchy.
const exprt & size() const
const memberst & members() const
std::vector< c_enum_membert > memberst
bool replace_symbol_expr(symbol_exprt &dest) const override
std::vector< parametert > parameterst
const typet & return_type() const
bool has_ellipsis() const
const parameterst & parameters() const
A constant literal expression.
Operator to dereference a pointer.
dstringt has one field, an unsigned integer no which is an index into a static table of strings.
Base class for all expressions.
const source_locationt & find_source_location() const
Get a source_locationt from the expression or from its operands (non-recursively).
bool is_zero() const
Return whether the expression is a constant representing 0.
typet & type()
Return the type of the expression.
Unbounded, signed integers (mathematical integers, not bitvectors)
const std::string & get_string(const irep_namet &name) const
bool get_bool(const irep_namet &name) const
const std::string & id_string() const
const irep_idt & id() const
void duplicate_non_type_symbol(symbolt &old_symbol, symbolt &new_symbol)
bool adjust_object_type(const symbolt &old_symbol, const symbolt &new_symbol, bool &set_to_new)
bool needs_renaming_type(const symbolt &old_symbol, const symbolt &new_symbol)
symbol_table_baset & src_symbol_table
rename_symbolt rename_symbol
bool adjust_object_type_rec(const typet &type1, const typet &type2, adjust_type_infot &info)
bool needs_renaming_non_type(const symbolt &old_symbol, const symbolt &new_symbol)
symbol_table_baset & main_symbol_table
std::unordered_map< irep_idt, std::unordered_set< irep_idt > > used_byt
std::string expr_to_string(const irep_idt &identifier, const exprt &expr) const
void detailed_conflict_report_rec(const symbolt &old_symbol, const symbolt &new_symbol, const typet &type1, const typet &type2, unsigned depth, exprt &conflict_path)
void do_type_dependencies(std::unordered_set< irep_idt > &)
void link_warning(const symbolt &old_symbol, const symbolt &new_symbol, const std::string &msg)
void duplicate_object_symbol(symbolt &old_symbol, symbolt &new_symbol)
void rename_symbols(const std::unordered_set< irep_idt > &needs_to_be_renamed)
casting_replace_symbolt object_type_updates
std::string type_to_string(const irep_idt &identifier, const typet &type) const
std::unordered_set< irep_idt > renamed_ids
void duplicate_type_symbol(symbolt &old_symbol, const symbolt &new_symbol)
std::string type_to_string_verbose(const symbolt &symbol, const typet &type) const
void detailed_conflict_report(const symbolt &old_symbol, const symbolt &new_symbol, const typet &type1, const typet &type2)
bool needs_renaming(const symbolt &old_symbol, const symbolt &new_symbol)
void duplicate_code_symbol(symbolt &old_symbol, symbolt &new_symbol)
void link_error(const symbolt &old_symbol, const symbolt &new_symbol, const std::string &msg)
irep_idt rename(irep_idt)
Extract member of struct or union.
const exprt & compound() const
source_locationt source_location
mstreamt & warning() const
mstreamt & result() const
const union_typet & follow_tag(const union_tag_typet &) const
Follow type tag of union type.
A namespacet is essentially one or two symbol tables bound together, to allow for symbol lookups in t...
void insert_type(const irep_idt &old_id, const irep_idt &new_id)
void insert_expr(const irep_idt &old_id, const irep_idt &new_id)
void insert(const class symbol_exprt &old_expr, const exprt &new_expr)
Sets old_expr to be replaced by new_expr if we don't already have a replacement; otherwise does nothi...
std::string as_string() const
bool is_incomplete() const
A struct/union may be incomplete.
const componentst & components() const
std::vector< componentt > componentst
Expression to hold a symbol (variable)
static symbol_exprt typeless(const irep_idt &id)
Generate a symbol_exprt without a proper type.
const irep_idt & get_identifier() const
symbolt & get_writeable_ref(const irep_idt &name)
Find a symbol in the symbol table for read-write access.
const symbolst & symbols
Read-only field, used to look up symbols given their names.
bool has_symbol(const irep_idt &name) const
Check whether a symbol exists in the symbol table.
bool add(const symbolt &symbol)
Add a new symbol to the symbol table.
const irep_idt & display_name() const
Return language specific display name if present.
irep_idt module
Name of module the symbol belongs to.
source_locationt location
Source code location of definition of symbol.
class symbol_exprt symbol_expr() const
Produces a symbol_exprt for a symbol.
typet type
Type of symbol.
irep_idt name
The unique identifier.
exprt value
Initial value of symbol.
const irep_idt & get_identifier() const
Semantic type conversion.
static exprt conditional_cast(const exprt &expr, const typet &type)
The type of an expression, extends irept.
const source_locationt & source_location() const
const typet & subtype() const
void find_type_and_expr_symbols(const exprt &src, find_symbols_sett &dest)
std::unordered_set< irep_idt > find_symbols_sett
std::string get_base_name(const std::string &in, bool strip_suffix)
cleans a filename from path and extension
const std::string & id2string(const irep_idt &d)
std::string from_expr(const namespacet &ns, const irep_idt &identifier, const exprt &expr)
std::string type_to_name(const namespacet &ns, const irep_idt &identifier, const typet &type)
std::string from_type(const namespacet &ns, const irep_idt &identifier, const typet &type)
bool linking(symbol_tablet &dest_symbol_table, symbol_tablet &new_symbol_table, message_handlert &message_handler)
static const typet & follow_tags_symbols(const namespacet &ns, const typet &type)
bool is_true(const literalt &l)
API to expression classes for Pointers.
const dereference_exprt & to_dereference_expr(const exprt &expr)
Cast an exprt to a dereference_exprt.
optionalt< mp_integer > pointer_offset_bits(const typet &type, const namespacet &ns)
bool simplify(exprt &expr, const namespacet &ns)
exprt simplify_expr(exprt src, const namespacet &ns)
#define UNREACHABLE
This should be used to mark dead code.
const member_exprt & to_member_expr(const exprt &expr)
Cast an exprt to a member_exprt.
const index_exprt & to_index_expr(const exprt &expr)
Cast an exprt to an index_exprt.
const struct_typet & to_struct_type(const typet &type)
Cast a typet to a struct_typet.
const code_typet & to_code_type(const typet &type)
Cast a typet to a code_typet.
const c_enum_typet & to_c_enum_type(const typet &type)
Cast a typet to a c_enum_typet.
const union_tag_typet & to_union_tag_type(const typet &type)
Cast a typet to a union_tag_typet.
const array_typet & to_array_type(const typet &type)
Cast a typet to an array_typet.
const struct_union_typet & to_struct_union_type(const typet &type)
Cast a typet to a struct_union_typet.
const union_typet & to_union_type(const typet &type)
Cast a typet to a union_typet.
const c_enum_tag_typet & to_c_enum_tag_type(const typet &type)
Cast a typet to a c_enum_tag_typet.
const struct_tag_typet & to_struct_tag_type(const typet &type)
Cast a typet to a struct_tag_typet.
const tag_typet & to_tag_type(const typet &type)
Cast a typet to a tag_typet.
void replace(const union_find_replacet &replace_map, string_not_contains_constraintt &constraint)
std::string to_string(const string_not_contains_constraintt &expr)
Used for debug printing.
const symbolt & old_symbol
std::unordered_set< irep_idt > o_symbols
std::unordered_set< irep_idt > n_symbols
const symbolt & new_symbol
static bool failed(bool error_indicator)