gcc-common.h 24 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987
  1. /* SPDX-License-Identifier: GPL-2.0 */
  2. #ifndef GCC_COMMON_H_INCLUDED
  3. #define GCC_COMMON_H_INCLUDED
  4. #include "bversion.h"
  5. #if BUILDING_GCC_VERSION >= 6000
  6. #include "gcc-plugin.h"
  7. #else
  8. #include "plugin.h"
  9. #endif
  10. #include "plugin-version.h"
  11. #include "config.h"
  12. #include "system.h"
  13. #include "coretypes.h"
  14. #include "tm.h"
  15. #include "line-map.h"
  16. #include "input.h"
  17. #include "tree.h"
  18. #include "tree-inline.h"
  19. #include "version.h"
  20. #include "rtl.h"
  21. #include "tm_p.h"
  22. #include "flags.h"
  23. #include "hard-reg-set.h"
  24. #include "output.h"
  25. #include "except.h"
  26. #include "function.h"
  27. #include "toplev.h"
  28. #if BUILDING_GCC_VERSION >= 5000
  29. #include "expr.h"
  30. #endif
  31. #include "basic-block.h"
  32. #include "intl.h"
  33. #include "ggc.h"
  34. #include "timevar.h"
  35. #if BUILDING_GCC_VERSION < 10000
  36. #include "params.h"
  37. #endif
  38. #if BUILDING_GCC_VERSION <= 4009
  39. #include "pointer-set.h"
  40. #else
  41. #include "hash-map.h"
  42. #endif
  43. #if BUILDING_GCC_VERSION >= 7000
  44. #include "memmodel.h"
  45. #endif
  46. #include "emit-rtl.h"
  47. #include "debug.h"
  48. #include "target.h"
  49. #include "langhooks.h"
  50. #include "cfgloop.h"
  51. #include "cgraph.h"
  52. #include "opts.h"
  53. #if BUILDING_GCC_VERSION == 4005
  54. #include <sys/mman.h>
  55. #endif
  56. #if BUILDING_GCC_VERSION >= 4007
  57. #include "tree-pretty-print.h"
  58. #include "gimple-pretty-print.h"
  59. #endif
  60. #if BUILDING_GCC_VERSION >= 4006
  61. /*
  62. * The c-family headers were moved into a subdirectory in GCC version
  63. * 4.7, but most plugin-building users of GCC 4.6 are using the Debian
  64. * or Ubuntu package, which has an out-of-tree patch to move this to the
  65. * same location as found in 4.7 and later:
  66. * https://sources.debian.net/src/gcc-4.6/4.6.3-14/debian/patches/pr45078.diff/
  67. */
  68. #include "c-family/c-common.h"
  69. #else
  70. #include "c-common.h"
  71. #endif
  72. #if BUILDING_GCC_VERSION <= 4008
  73. #include "tree-flow.h"
  74. #else
  75. #include "tree-cfgcleanup.h"
  76. #include "tree-ssa-operands.h"
  77. #include "tree-into-ssa.h"
  78. #endif
  79. #if BUILDING_GCC_VERSION >= 4008
  80. #include "is-a.h"
  81. #endif
  82. #include "diagnostic.h"
  83. #include "tree-dump.h"
  84. #include "tree-pass.h"
  85. #if BUILDING_GCC_VERSION >= 4009
  86. #include "pass_manager.h"
  87. #endif
  88. #include "predict.h"
  89. #include "ipa-utils.h"
  90. #if BUILDING_GCC_VERSION >= 8000
  91. #include "stringpool.h"
  92. #endif
  93. #if BUILDING_GCC_VERSION >= 4009
  94. #include "attribs.h"
  95. #include "varasm.h"
  96. #include "stor-layout.h"
  97. #include "internal-fn.h"
  98. #endif
  99. #include "gimple.h"
  100. #if BUILDING_GCC_VERSION >= 4009
  101. #include "gimple-expr.h"
  102. #include "gimple-iterator.h"
  103. #include "gimple-fold.h"
  104. #include "context.h"
  105. #include "tree-ssa-alias.h"
  106. #include "tree-ssa.h"
  107. #include "stringpool.h"
  108. #if BUILDING_GCC_VERSION >= 7000
  109. #include "tree-vrp.h"
  110. #endif
  111. #include "tree-ssanames.h"
  112. #include "print-tree.h"
  113. #include "tree-eh.h"
  114. #include "stmt.h"
  115. #include "gimplify.h"
  116. #endif
  117. #if BUILDING_GCC_VERSION >= 4009
  118. #include "tree-ssa-operands.h"
  119. #include "tree-phinodes.h"
  120. #include "tree-cfg.h"
  121. #include "gimple-ssa.h"
  122. #include "ssa-iterators.h"
  123. #endif
  124. #if BUILDING_GCC_VERSION >= 5000
  125. #include "builtins.h"
  126. #endif
  127. /* missing from basic_block.h... */
  128. void debug_dominance_info(enum cdi_direction dir);
  129. void debug_dominance_tree(enum cdi_direction dir, basic_block root);
  130. #if BUILDING_GCC_VERSION == 4006
  131. void debug_gimple_stmt(gimple);
  132. void debug_gimple_seq(gimple_seq);
  133. void print_gimple_seq(FILE *, gimple_seq, int, int);
  134. void print_gimple_stmt(FILE *, gimple, int, int);
  135. void print_gimple_expr(FILE *, gimple, int, int);
  136. void dump_gimple_stmt(pretty_printer *, gimple, int, int);
  137. #endif
  138. #ifndef __unused
  139. #define __unused __attribute__((__unused__))
  140. #endif
  141. #ifndef __visible
  142. #define __visible __attribute__((visibility("default")))
  143. #endif
  144. #define DECL_NAME_POINTER(node) IDENTIFIER_POINTER(DECL_NAME(node))
  145. #define DECL_NAME_LENGTH(node) IDENTIFIER_LENGTH(DECL_NAME(node))
  146. #define TYPE_NAME_POINTER(node) IDENTIFIER_POINTER(TYPE_NAME(node))
  147. #define TYPE_NAME_LENGTH(node) IDENTIFIER_LENGTH(TYPE_NAME(node))
  148. /* should come from c-tree.h if only it were installed for gcc 4.5... */
  149. #define C_TYPE_FIELDS_READONLY(TYPE) TREE_LANG_FLAG_1(TYPE)
  150. static inline tree build_const_char_string(int len, const char *str)
  151. {
  152. tree cstr, elem, index, type;
  153. cstr = build_string(len, str);
  154. elem = build_type_variant(char_type_node, 1, 0);
  155. index = build_index_type(size_int(len - 1));
  156. type = build_array_type(elem, index);
  157. TREE_TYPE(cstr) = type;
  158. TREE_CONSTANT(cstr) = 1;
  159. TREE_READONLY(cstr) = 1;
  160. TREE_STATIC(cstr) = 1;
  161. return cstr;
  162. }
  163. #define PASS_INFO(NAME, REF, ID, POS) \
  164. struct register_pass_info NAME##_pass_info = { \
  165. .pass = make_##NAME##_pass(), \
  166. .reference_pass_name = REF, \
  167. .ref_pass_instance_number = ID, \
  168. .pos_op = POS, \
  169. }
  170. #if BUILDING_GCC_VERSION == 4005
  171. #define FOR_EACH_LOCAL_DECL(FUN, I, D) \
  172. for (tree vars = (FUN)->local_decls, (I) = 0; \
  173. vars && ((D) = TREE_VALUE(vars)); \
  174. vars = TREE_CHAIN(vars), (I)++)
  175. #define DECL_CHAIN(NODE) (TREE_CHAIN(DECL_MINIMAL_CHECK(NODE)))
  176. #define FOR_EACH_VEC_ELT(T, V, I, P) \
  177. for (I = 0; VEC_iterate(T, (V), (I), (P)); ++(I))
  178. #define TODO_rebuild_cgraph_edges 0
  179. #define SCOPE_FILE_SCOPE_P(EXP) (!(EXP))
  180. #ifndef O_BINARY
  181. #define O_BINARY 0
  182. #endif
  183. typedef struct varpool_node *varpool_node_ptr;
  184. static inline bool gimple_call_builtin_p(gimple stmt, enum built_in_function code)
  185. {
  186. tree fndecl;
  187. if (!is_gimple_call(stmt))
  188. return false;
  189. fndecl = gimple_call_fndecl(stmt);
  190. if (!fndecl || DECL_BUILT_IN_CLASS(fndecl) != BUILT_IN_NORMAL)
  191. return false;
  192. return DECL_FUNCTION_CODE(fndecl) == code;
  193. }
  194. static inline bool is_simple_builtin(tree decl)
  195. {
  196. if (decl && DECL_BUILT_IN_CLASS(decl) != BUILT_IN_NORMAL)
  197. return false;
  198. switch (DECL_FUNCTION_CODE(decl)) {
  199. /* Builtins that expand to constants. */
  200. case BUILT_IN_CONSTANT_P:
  201. case BUILT_IN_EXPECT:
  202. case BUILT_IN_OBJECT_SIZE:
  203. case BUILT_IN_UNREACHABLE:
  204. /* Simple register moves or loads from stack. */
  205. case BUILT_IN_RETURN_ADDRESS:
  206. case BUILT_IN_EXTRACT_RETURN_ADDR:
  207. case BUILT_IN_FROB_RETURN_ADDR:
  208. case BUILT_IN_RETURN:
  209. case BUILT_IN_AGGREGATE_INCOMING_ADDRESS:
  210. case BUILT_IN_FRAME_ADDRESS:
  211. case BUILT_IN_VA_END:
  212. case BUILT_IN_STACK_SAVE:
  213. case BUILT_IN_STACK_RESTORE:
  214. /* Exception state returns or moves registers around. */
  215. case BUILT_IN_EH_FILTER:
  216. case BUILT_IN_EH_POINTER:
  217. case BUILT_IN_EH_COPY_VALUES:
  218. return true;
  219. default:
  220. return false;
  221. }
  222. }
  223. static inline void add_local_decl(struct function *fun, tree d)
  224. {
  225. gcc_assert(TREE_CODE(d) == VAR_DECL);
  226. fun->local_decls = tree_cons(NULL_TREE, d, fun->local_decls);
  227. }
  228. #endif
  229. #if BUILDING_GCC_VERSION <= 4006
  230. #define ANY_RETURN_P(rtx) (GET_CODE(rtx) == RETURN)
  231. #define C_DECL_REGISTER(EXP) DECL_LANG_FLAG_4(EXP)
  232. #define EDGE_PRESERVE 0ULL
  233. #define HOST_WIDE_INT_PRINT_HEX_PURE "%" HOST_WIDE_INT_PRINT "x"
  234. #define flag_fat_lto_objects true
  235. #define get_random_seed(noinit) ({ \
  236. unsigned HOST_WIDE_INT seed; \
  237. sscanf(get_random_seed(noinit), "%" HOST_WIDE_INT_PRINT "x", &seed); \
  238. seed * seed; })
  239. #define int_const_binop(code, arg1, arg2) \
  240. int_const_binop((code), (arg1), (arg2), 0)
  241. static inline bool gimple_clobber_p(gimple s __unused)
  242. {
  243. return false;
  244. }
  245. static inline bool gimple_asm_clobbers_memory_p(const_gimple stmt)
  246. {
  247. unsigned i;
  248. for (i = 0; i < gimple_asm_nclobbers(stmt); i++) {
  249. tree op = gimple_asm_clobber_op(stmt, i);
  250. if (!strcmp(TREE_STRING_POINTER(TREE_VALUE(op)), "memory"))
  251. return true;
  252. }
  253. return false;
  254. }
  255. static inline tree builtin_decl_implicit(enum built_in_function fncode)
  256. {
  257. return implicit_built_in_decls[fncode];
  258. }
  259. static inline int ipa_reverse_postorder(struct cgraph_node **order)
  260. {
  261. return cgraph_postorder(order);
  262. }
  263. static inline struct cgraph_node *cgraph_create_node(tree decl)
  264. {
  265. return cgraph_node(decl);
  266. }
  267. static inline struct cgraph_node *cgraph_get_create_node(tree decl)
  268. {
  269. struct cgraph_node *node = cgraph_get_node(decl);
  270. return node ? node : cgraph_node(decl);
  271. }
  272. static inline bool cgraph_function_with_gimple_body_p(struct cgraph_node *node)
  273. {
  274. return node->analyzed && !node->thunk.thunk_p && !node->alias;
  275. }
  276. static inline struct cgraph_node *cgraph_first_function_with_gimple_body(void)
  277. {
  278. struct cgraph_node *node;
  279. for (node = cgraph_nodes; node; node = node->next)
  280. if (cgraph_function_with_gimple_body_p(node))
  281. return node;
  282. return NULL;
  283. }
  284. static inline struct cgraph_node *cgraph_next_function_with_gimple_body(struct cgraph_node *node)
  285. {
  286. for (node = node->next; node; node = node->next)
  287. if (cgraph_function_with_gimple_body_p(node))
  288. return node;
  289. return NULL;
  290. }
  291. static inline bool cgraph_for_node_and_aliases(cgraph_node_ptr node, bool (*callback)(cgraph_node_ptr, void *), void *data, bool include_overwritable)
  292. {
  293. cgraph_node_ptr alias;
  294. if (callback(node, data))
  295. return true;
  296. for (alias = node->same_body; alias; alias = alias->next) {
  297. if (include_overwritable || cgraph_function_body_availability(alias) > AVAIL_OVERWRITABLE)
  298. if (cgraph_for_node_and_aliases(alias, callback, data, include_overwritable))
  299. return true;
  300. }
  301. return false;
  302. }
  303. #define FOR_EACH_FUNCTION_WITH_GIMPLE_BODY(node) \
  304. for ((node) = cgraph_first_function_with_gimple_body(); (node); \
  305. (node) = cgraph_next_function_with_gimple_body(node))
  306. static inline void varpool_add_new_variable(tree decl)
  307. {
  308. varpool_finalize_decl(decl);
  309. }
  310. #endif
  311. #if BUILDING_GCC_VERSION <= 4007
  312. #define FOR_EACH_FUNCTION(node) \
  313. for (node = cgraph_nodes; node; node = node->next)
  314. #define FOR_EACH_VARIABLE(node) \
  315. for (node = varpool_nodes; node; node = node->next)
  316. #define PROP_loops 0
  317. #define NODE_SYMBOL(node) (node)
  318. #define NODE_DECL(node) (node)->decl
  319. #define INSN_LOCATION(INSN) RTL_LOCATION(INSN)
  320. #define vNULL NULL
  321. static inline int bb_loop_depth(const_basic_block bb)
  322. {
  323. return bb->loop_father ? loop_depth(bb->loop_father) : 0;
  324. }
  325. static inline bool gimple_store_p(gimple gs)
  326. {
  327. tree lhs = gimple_get_lhs(gs);
  328. return lhs && !is_gimple_reg(lhs);
  329. }
  330. static inline void gimple_init_singleton(gimple g __unused)
  331. {
  332. }
  333. #endif
  334. #if BUILDING_GCC_VERSION == 4007 || BUILDING_GCC_VERSION == 4008
  335. static inline struct cgraph_node *cgraph_alias_target(struct cgraph_node *n)
  336. {
  337. return cgraph_alias_aliased_node(n);
  338. }
  339. #endif
  340. #if BUILDING_GCC_VERSION <= 4008
  341. #define ENTRY_BLOCK_PTR_FOR_FN(FN) ENTRY_BLOCK_PTR_FOR_FUNCTION(FN)
  342. #define EXIT_BLOCK_PTR_FOR_FN(FN) EXIT_BLOCK_PTR_FOR_FUNCTION(FN)
  343. #define basic_block_info_for_fn(FN) ((FN)->cfg->x_basic_block_info)
  344. #define n_basic_blocks_for_fn(FN) ((FN)->cfg->x_n_basic_blocks)
  345. #define n_edges_for_fn(FN) ((FN)->cfg->x_n_edges)
  346. #define last_basic_block_for_fn(FN) ((FN)->cfg->x_last_basic_block)
  347. #define label_to_block_map_for_fn(FN) ((FN)->cfg->x_label_to_block_map)
  348. #define profile_status_for_fn(FN) ((FN)->cfg->x_profile_status)
  349. #define BASIC_BLOCK_FOR_FN(FN, N) BASIC_BLOCK_FOR_FUNCTION((FN), (N))
  350. #define NODE_IMPLICIT_ALIAS(node) (node)->same_body_alias
  351. #define VAR_P(NODE) (TREE_CODE(NODE) == VAR_DECL)
  352. static inline bool tree_fits_shwi_p(const_tree t)
  353. {
  354. if (t == NULL_TREE || TREE_CODE(t) != INTEGER_CST)
  355. return false;
  356. if (TREE_INT_CST_HIGH(t) == 0 && (HOST_WIDE_INT)TREE_INT_CST_LOW(t) >= 0)
  357. return true;
  358. if (TREE_INT_CST_HIGH(t) == -1 && (HOST_WIDE_INT)TREE_INT_CST_LOW(t) < 0 && !TYPE_UNSIGNED(TREE_TYPE(t)))
  359. return true;
  360. return false;
  361. }
  362. static inline bool tree_fits_uhwi_p(const_tree t)
  363. {
  364. if (t == NULL_TREE || TREE_CODE(t) != INTEGER_CST)
  365. return false;
  366. return TREE_INT_CST_HIGH(t) == 0;
  367. }
  368. static inline HOST_WIDE_INT tree_to_shwi(const_tree t)
  369. {
  370. gcc_assert(tree_fits_shwi_p(t));
  371. return TREE_INT_CST_LOW(t);
  372. }
  373. static inline unsigned HOST_WIDE_INT tree_to_uhwi(const_tree t)
  374. {
  375. gcc_assert(tree_fits_uhwi_p(t));
  376. return TREE_INT_CST_LOW(t);
  377. }
  378. static inline const char *get_tree_code_name(enum tree_code code)
  379. {
  380. gcc_assert(code < MAX_TREE_CODES);
  381. return tree_code_name[code];
  382. }
  383. #define ipa_remove_stmt_references(cnode, stmt)
  384. typedef union gimple_statement_d gasm;
  385. typedef union gimple_statement_d gassign;
  386. typedef union gimple_statement_d gcall;
  387. typedef union gimple_statement_d gcond;
  388. typedef union gimple_statement_d gdebug;
  389. typedef union gimple_statement_d ggoto;
  390. typedef union gimple_statement_d gphi;
  391. typedef union gimple_statement_d greturn;
  392. static inline gasm *as_a_gasm(gimple stmt)
  393. {
  394. return stmt;
  395. }
  396. static inline const gasm *as_a_const_gasm(const_gimple stmt)
  397. {
  398. return stmt;
  399. }
  400. static inline gassign *as_a_gassign(gimple stmt)
  401. {
  402. return stmt;
  403. }
  404. static inline const gassign *as_a_const_gassign(const_gimple stmt)
  405. {
  406. return stmt;
  407. }
  408. static inline gcall *as_a_gcall(gimple stmt)
  409. {
  410. return stmt;
  411. }
  412. static inline const gcall *as_a_const_gcall(const_gimple stmt)
  413. {
  414. return stmt;
  415. }
  416. static inline gcond *as_a_gcond(gimple stmt)
  417. {
  418. return stmt;
  419. }
  420. static inline const gcond *as_a_const_gcond(const_gimple stmt)
  421. {
  422. return stmt;
  423. }
  424. static inline gdebug *as_a_gdebug(gimple stmt)
  425. {
  426. return stmt;
  427. }
  428. static inline const gdebug *as_a_const_gdebug(const_gimple stmt)
  429. {
  430. return stmt;
  431. }
  432. static inline ggoto *as_a_ggoto(gimple stmt)
  433. {
  434. return stmt;
  435. }
  436. static inline const ggoto *as_a_const_ggoto(const_gimple stmt)
  437. {
  438. return stmt;
  439. }
  440. static inline gphi *as_a_gphi(gimple stmt)
  441. {
  442. return stmt;
  443. }
  444. static inline const gphi *as_a_const_gphi(const_gimple stmt)
  445. {
  446. return stmt;
  447. }
  448. static inline greturn *as_a_greturn(gimple stmt)
  449. {
  450. return stmt;
  451. }
  452. static inline const greturn *as_a_const_greturn(const_gimple stmt)
  453. {
  454. return stmt;
  455. }
  456. #endif
  457. #if BUILDING_GCC_VERSION == 4008
  458. #define NODE_SYMBOL(node) (&(node)->symbol)
  459. #define NODE_DECL(node) (node)->symbol.decl
  460. #endif
  461. #if BUILDING_GCC_VERSION >= 4008
  462. #define add_referenced_var(var)
  463. #define mark_sym_for_renaming(var)
  464. #define varpool_mark_needed_node(node)
  465. #define create_var_ann(var)
  466. #define TODO_dump_func 0
  467. #define TODO_dump_cgraph 0
  468. #endif
  469. #if BUILDING_GCC_VERSION <= 4009
  470. #define TODO_verify_il 0
  471. #define AVAIL_INTERPOSABLE AVAIL_OVERWRITABLE
  472. #define section_name_prefix LTO_SECTION_NAME_PREFIX
  473. #define fatal_error(loc, gmsgid, ...) fatal_error((gmsgid), __VA_ARGS__)
  474. rtx emit_move_insn(rtx x, rtx y);
  475. typedef struct rtx_def rtx_insn;
  476. static inline const char *get_decl_section_name(const_tree decl)
  477. {
  478. if (DECL_SECTION_NAME(decl) == NULL_TREE)
  479. return NULL;
  480. return TREE_STRING_POINTER(DECL_SECTION_NAME(decl));
  481. }
  482. static inline void set_decl_section_name(tree node, const char *value)
  483. {
  484. if (value)
  485. DECL_SECTION_NAME(node) = build_string(strlen(value) + 1, value);
  486. else
  487. DECL_SECTION_NAME(node) = NULL;
  488. }
  489. #endif
  490. #if BUILDING_GCC_VERSION == 4009
  491. typedef struct gimple_statement_asm gasm;
  492. typedef struct gimple_statement_base gassign;
  493. typedef struct gimple_statement_call gcall;
  494. typedef struct gimple_statement_base gcond;
  495. typedef struct gimple_statement_base gdebug;
  496. typedef struct gimple_statement_base ggoto;
  497. typedef struct gimple_statement_phi gphi;
  498. typedef struct gimple_statement_base greturn;
  499. static inline gasm *as_a_gasm(gimple stmt)
  500. {
  501. return as_a<gasm>(stmt);
  502. }
  503. static inline const gasm *as_a_const_gasm(const_gimple stmt)
  504. {
  505. return as_a<const gasm>(stmt);
  506. }
  507. static inline gassign *as_a_gassign(gimple stmt)
  508. {
  509. return stmt;
  510. }
  511. static inline const gassign *as_a_const_gassign(const_gimple stmt)
  512. {
  513. return stmt;
  514. }
  515. static inline gcall *as_a_gcall(gimple stmt)
  516. {
  517. return as_a<gcall>(stmt);
  518. }
  519. static inline const gcall *as_a_const_gcall(const_gimple stmt)
  520. {
  521. return as_a<const gcall>(stmt);
  522. }
  523. static inline gcond *as_a_gcond(gimple stmt)
  524. {
  525. return stmt;
  526. }
  527. static inline const gcond *as_a_const_gcond(const_gimple stmt)
  528. {
  529. return stmt;
  530. }
  531. static inline gdebug *as_a_gdebug(gimple stmt)
  532. {
  533. return stmt;
  534. }
  535. static inline const gdebug *as_a_const_gdebug(const_gimple stmt)
  536. {
  537. return stmt;
  538. }
  539. static inline ggoto *as_a_ggoto(gimple stmt)
  540. {
  541. return stmt;
  542. }
  543. static inline const ggoto *as_a_const_ggoto(const_gimple stmt)
  544. {
  545. return stmt;
  546. }
  547. static inline gphi *as_a_gphi(gimple stmt)
  548. {
  549. return as_a<gphi>(stmt);
  550. }
  551. static inline const gphi *as_a_const_gphi(const_gimple stmt)
  552. {
  553. return as_a<const gphi>(stmt);
  554. }
  555. static inline greturn *as_a_greturn(gimple stmt)
  556. {
  557. return stmt;
  558. }
  559. static inline const greturn *as_a_const_greturn(const_gimple stmt)
  560. {
  561. return stmt;
  562. }
  563. #endif
  564. #if BUILDING_GCC_VERSION >= 4009
  565. #define TODO_ggc_collect 0
  566. #define NODE_SYMBOL(node) (node)
  567. #define NODE_DECL(node) (node)->decl
  568. #define cgraph_node_name(node) (node)->name()
  569. #define NODE_IMPLICIT_ALIAS(node) (node)->cpp_implicit_alias
  570. static inline opt_pass *get_pass_for_id(int id)
  571. {
  572. return g->get_passes()->get_pass_for_id(id);
  573. }
  574. #endif
  575. #if BUILDING_GCC_VERSION >= 5000 && BUILDING_GCC_VERSION < 6000
  576. /* gimple related */
  577. template <>
  578. template <>
  579. inline bool is_a_helper<const gassign *>::test(const_gimple gs)
  580. {
  581. return gs->code == GIMPLE_ASSIGN;
  582. }
  583. #endif
  584. #if BUILDING_GCC_VERSION >= 5000
  585. #define TODO_verify_ssa TODO_verify_il
  586. #define TODO_verify_flow TODO_verify_il
  587. #define TODO_verify_stmts TODO_verify_il
  588. #define TODO_verify_rtl_sharing TODO_verify_il
  589. #define INSN_DELETED_P(insn) (insn)->deleted()
  590. static inline const char *get_decl_section_name(const_tree decl)
  591. {
  592. return DECL_SECTION_NAME(decl);
  593. }
  594. /* symtab/cgraph related */
  595. #define debug_cgraph_node(node) (node)->debug()
  596. #define cgraph_get_node(decl) cgraph_node::get(decl)
  597. #define cgraph_get_create_node(decl) cgraph_node::get_create(decl)
  598. #define cgraph_create_node(decl) cgraph_node::create(decl)
  599. #define cgraph_n_nodes symtab->cgraph_count
  600. #define cgraph_max_uid symtab->cgraph_max_uid
  601. #define varpool_get_node(decl) varpool_node::get(decl)
  602. #define dump_varpool_node(file, node) (node)->dump(file)
  603. #if BUILDING_GCC_VERSION >= 8000
  604. #define cgraph_create_edge(caller, callee, call_stmt, count, freq) \
  605. (caller)->create_edge((callee), (call_stmt), (count))
  606. #define cgraph_create_edge_including_clones(caller, callee, \
  607. old_call_stmt, call_stmt, count, freq, reason) \
  608. (caller)->create_edge_including_clones((callee), \
  609. (old_call_stmt), (call_stmt), (count), (reason))
  610. #else
  611. #define cgraph_create_edge(caller, callee, call_stmt, count, freq) \
  612. (caller)->create_edge((callee), (call_stmt), (count), (freq))
  613. #define cgraph_create_edge_including_clones(caller, callee, \
  614. old_call_stmt, call_stmt, count, freq, reason) \
  615. (caller)->create_edge_including_clones((callee), \
  616. (old_call_stmt), (call_stmt), (count), (freq), (reason))
  617. #endif
  618. typedef struct cgraph_node *cgraph_node_ptr;
  619. typedef struct cgraph_edge *cgraph_edge_p;
  620. typedef struct varpool_node *varpool_node_ptr;
  621. static inline void change_decl_assembler_name(tree decl, tree name)
  622. {
  623. symtab->change_decl_assembler_name(decl, name);
  624. }
  625. static inline void varpool_finalize_decl(tree decl)
  626. {
  627. varpool_node::finalize_decl(decl);
  628. }
  629. static inline void varpool_add_new_variable(tree decl)
  630. {
  631. varpool_node::add(decl);
  632. }
  633. static inline unsigned int rebuild_cgraph_edges(void)
  634. {
  635. return cgraph_edge::rebuild_edges();
  636. }
  637. static inline cgraph_node_ptr cgraph_function_node(cgraph_node_ptr node, enum availability *availability)
  638. {
  639. return node->function_symbol(availability);
  640. }
  641. static inline cgraph_node_ptr cgraph_function_or_thunk_node(cgraph_node_ptr node, enum availability *availability = NULL)
  642. {
  643. return node->ultimate_alias_target(availability);
  644. }
  645. static inline bool cgraph_only_called_directly_p(cgraph_node_ptr node)
  646. {
  647. return node->only_called_directly_p();
  648. }
  649. static inline enum availability cgraph_function_body_availability(cgraph_node_ptr node)
  650. {
  651. return node->get_availability();
  652. }
  653. static inline cgraph_node_ptr cgraph_alias_target(cgraph_node_ptr node)
  654. {
  655. return node->get_alias_target();
  656. }
  657. static inline bool cgraph_for_node_and_aliases(cgraph_node_ptr node, bool (*callback)(cgraph_node_ptr, void *), void *data, bool include_overwritable)
  658. {
  659. return node->call_for_symbol_thunks_and_aliases(callback, data, include_overwritable);
  660. }
  661. static inline struct cgraph_node_hook_list *cgraph_add_function_insertion_hook(cgraph_node_hook hook, void *data)
  662. {
  663. return symtab->add_cgraph_insertion_hook(hook, data);
  664. }
  665. static inline void cgraph_remove_function_insertion_hook(struct cgraph_node_hook_list *entry)
  666. {
  667. symtab->remove_cgraph_insertion_hook(entry);
  668. }
  669. static inline struct cgraph_node_hook_list *cgraph_add_node_removal_hook(cgraph_node_hook hook, void *data)
  670. {
  671. return symtab->add_cgraph_removal_hook(hook, data);
  672. }
  673. static inline void cgraph_remove_node_removal_hook(struct cgraph_node_hook_list *entry)
  674. {
  675. symtab->remove_cgraph_removal_hook(entry);
  676. }
  677. static inline struct cgraph_2node_hook_list *cgraph_add_node_duplication_hook(cgraph_2node_hook hook, void *data)
  678. {
  679. return symtab->add_cgraph_duplication_hook(hook, data);
  680. }
  681. static inline void cgraph_remove_node_duplication_hook(struct cgraph_2node_hook_list *entry)
  682. {
  683. symtab->remove_cgraph_duplication_hook(entry);
  684. }
  685. static inline void cgraph_call_node_duplication_hooks(cgraph_node_ptr node, cgraph_node_ptr node2)
  686. {
  687. symtab->call_cgraph_duplication_hooks(node, node2);
  688. }
  689. static inline void cgraph_call_edge_duplication_hooks(cgraph_edge *cs1, cgraph_edge *cs2)
  690. {
  691. symtab->call_edge_duplication_hooks(cs1, cs2);
  692. }
  693. #if BUILDING_GCC_VERSION >= 6000
  694. typedef gimple *gimple_ptr;
  695. typedef const gimple *const_gimple_ptr;
  696. #define gimple gimple_ptr
  697. #define const_gimple const_gimple_ptr
  698. #undef CONST_CAST_GIMPLE
  699. #define CONST_CAST_GIMPLE(X) CONST_CAST(gimple, (X))
  700. #endif
  701. /* gimple related */
  702. static inline gimple gimple_build_assign_with_ops(enum tree_code subcode, tree lhs, tree op1, tree op2 MEM_STAT_DECL)
  703. {
  704. return gimple_build_assign(lhs, subcode, op1, op2 PASS_MEM_STAT);
  705. }
  706. #if BUILDING_GCC_VERSION < 10000
  707. template <>
  708. template <>
  709. inline bool is_a_helper<const ggoto *>::test(const_gimple gs)
  710. {
  711. return gs->code == GIMPLE_GOTO;
  712. }
  713. template <>
  714. template <>
  715. inline bool is_a_helper<const greturn *>::test(const_gimple gs)
  716. {
  717. return gs->code == GIMPLE_RETURN;
  718. }
  719. #endif
  720. static inline gasm *as_a_gasm(gimple stmt)
  721. {
  722. return as_a<gasm *>(stmt);
  723. }
  724. static inline const gasm *as_a_const_gasm(const_gimple stmt)
  725. {
  726. return as_a<const gasm *>(stmt);
  727. }
  728. static inline gassign *as_a_gassign(gimple stmt)
  729. {
  730. return as_a<gassign *>(stmt);
  731. }
  732. static inline const gassign *as_a_const_gassign(const_gimple stmt)
  733. {
  734. return as_a<const gassign *>(stmt);
  735. }
  736. static inline gcall *as_a_gcall(gimple stmt)
  737. {
  738. return as_a<gcall *>(stmt);
  739. }
  740. static inline const gcall *as_a_const_gcall(const_gimple stmt)
  741. {
  742. return as_a<const gcall *>(stmt);
  743. }
  744. static inline ggoto *as_a_ggoto(gimple stmt)
  745. {
  746. return as_a<ggoto *>(stmt);
  747. }
  748. static inline const ggoto *as_a_const_ggoto(const_gimple stmt)
  749. {
  750. return as_a<const ggoto *>(stmt);
  751. }
  752. static inline gphi *as_a_gphi(gimple stmt)
  753. {
  754. return as_a<gphi *>(stmt);
  755. }
  756. static inline const gphi *as_a_const_gphi(const_gimple stmt)
  757. {
  758. return as_a<const gphi *>(stmt);
  759. }
  760. static inline greturn *as_a_greturn(gimple stmt)
  761. {
  762. return as_a<greturn *>(stmt);
  763. }
  764. static inline const greturn *as_a_const_greturn(const_gimple stmt)
  765. {
  766. return as_a<const greturn *>(stmt);
  767. }
  768. /* IPA/LTO related */
  769. #define ipa_ref_list_referring_iterate(L, I, P) \
  770. (L)->referring.iterate((I), &(P))
  771. #define ipa_ref_list_reference_iterate(L, I, P) \
  772. (L)->reference.iterate((I), &(P))
  773. static inline cgraph_node_ptr ipa_ref_referring_node(struct ipa_ref *ref)
  774. {
  775. return dyn_cast<cgraph_node_ptr>(ref->referring);
  776. }
  777. static inline void ipa_remove_stmt_references(symtab_node *referring_node, gimple stmt)
  778. {
  779. referring_node->remove_stmt_references(stmt);
  780. }
  781. #endif
  782. #if BUILDING_GCC_VERSION < 6000
  783. #define get_inner_reference(exp, pbitsize, pbitpos, poffset, pmode, punsignedp, preversep, pvolatilep, keep_aligning) \
  784. get_inner_reference(exp, pbitsize, pbitpos, poffset, pmode, punsignedp, pvolatilep, keep_aligning)
  785. #define gen_rtx_set(ARG0, ARG1) gen_rtx_SET(VOIDmode, (ARG0), (ARG1))
  786. #endif
  787. #if BUILDING_GCC_VERSION >= 6000
  788. #define gen_rtx_set(ARG0, ARG1) gen_rtx_SET((ARG0), (ARG1))
  789. #endif
  790. #ifdef __cplusplus
  791. static inline void debug_tree(const_tree t)
  792. {
  793. debug_tree(CONST_CAST_TREE(t));
  794. }
  795. static inline void debug_gimple_stmt(const_gimple s)
  796. {
  797. debug_gimple_stmt(CONST_CAST_GIMPLE(s));
  798. }
  799. #else
  800. #define debug_tree(t) debug_tree(CONST_CAST_TREE(t))
  801. #define debug_gimple_stmt(s) debug_gimple_stmt(CONST_CAST_GIMPLE(s))
  802. #endif
  803. #if BUILDING_GCC_VERSION >= 7000
  804. #define get_inner_reference(exp, pbitsize, pbitpos, poffset, pmode, punsignedp, preversep, pvolatilep, keep_aligning) \
  805. get_inner_reference(exp, pbitsize, pbitpos, poffset, pmode, punsignedp, preversep, pvolatilep)
  806. #endif
  807. #if BUILDING_GCC_VERSION < 7000
  808. #define SET_DECL_ALIGN(decl, align) DECL_ALIGN(decl) = (align)
  809. #define SET_DECL_MODE(decl, mode) DECL_MODE(decl) = (mode)
  810. #endif
  811. #if BUILDING_GCC_VERSION >= 14000
  812. #define last_stmt(x) last_nondebug_stmt(x)
  813. #endif
  814. #endif