1 /* GCC instrumentation plugin for ThreadSanitizer.
2 Copyright (C) 2011-2016 Free Software Foundation, Inc.
3 Contributed by Dmitry Vyukov <dvyukov@google.com>
5 This file is part of GCC.
7 GCC is free software; you can redistribute it and/or modify it under
8 the terms of the GNU General Public License as published by the Free
9 Software Foundation; either version 3, or (at your option) any later
12 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
13 WARRANTY; without even the implied warranty of MERCHANTABILITY or
14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
17 You should have received a copy of the GNU General Public License
18 along with GCC; see the file COPYING3. If not see
19 <http://www.gnu.org/licenses/>. */
24 #include "coretypes.h"
29 #include "tree-pass.h"
32 #include "fold-const.h"
34 #include "gimple-iterator.h"
35 #include "gimplify-me.h"
37 #include "tree-iterator.h"
38 #include "tree-ssa-propagate.h"
39 #include "tree-ssa-loop-ivopts.h"
45 /* Number of instrumented memory accesses in the current function. */
47 /* Builds the following decl
48 void __tsan_read/writeX (void *addr); */
51 get_memory_access_decl (bool is_write
, unsigned size
)
53 enum built_in_function fcode
;
56 fcode
= is_write
? BUILT_IN_TSAN_WRITE1
57 : BUILT_IN_TSAN_READ1
;
59 fcode
= is_write
? BUILT_IN_TSAN_WRITE2
60 : BUILT_IN_TSAN_READ2
;
62 fcode
= is_write
? BUILT_IN_TSAN_WRITE4
63 : BUILT_IN_TSAN_READ4
;
65 fcode
= is_write
? BUILT_IN_TSAN_WRITE8
66 : BUILT_IN_TSAN_READ8
;
68 fcode
= is_write
? BUILT_IN_TSAN_WRITE16
69 : BUILT_IN_TSAN_READ16
;
71 return builtin_decl_implicit (fcode
);
74 /* Check as to whether EXPR refers to a store to vptr. */
77 is_vptr_store (gimple
*stmt
, tree expr
, bool is_write
)
80 && gimple_assign_single_p (stmt
)
81 && TREE_CODE (expr
) == COMPONENT_REF
)
83 tree field
= TREE_OPERAND (expr
, 1);
84 if (TREE_CODE (field
) == FIELD_DECL
85 && DECL_VIRTUAL_P (field
))
86 return gimple_assign_rhs1 (stmt
);
91 /* Instruments EXPR if needed. If any instrumentation is inserted,
95 instrument_expr (gimple_stmt_iterator gsi
, tree expr
, bool is_write
)
97 tree base
, rhs
, expr_ptr
, builtin_decl
;
105 size
= int_size_in_bytes (TREE_TYPE (expr
));
109 HOST_WIDE_INT bitsize
, bitpos
;
112 int unsignedp
, reversep
, volatilep
= 0;
113 base
= get_inner_reference (expr
, &bitsize
, &bitpos
, &offset
, &mode
,
114 &unsignedp
, &reversep
, &volatilep
);
116 /* No need to instrument accesses to decls that don't escape,
117 they can't escape to other threads then. */
118 if (DECL_P (base
) && !is_global_var (base
))
120 struct pt_solution pt
;
121 memset (&pt
, 0, sizeof (pt
));
123 pt
.ipa_escaped
= flag_ipa_pta
!= 0;
124 if (!pt_solution_includes (&pt
, base
))
126 if (!may_be_aliased (base
))
130 if (TREE_READONLY (base
)
131 || (TREE_CODE (base
) == VAR_DECL
132 && DECL_HARD_REGISTER (base
)))
135 stmt
= gsi_stmt (gsi
);
136 loc
= gimple_location (stmt
);
137 rhs
= is_vptr_store (stmt
, expr
, is_write
);
139 if ((TREE_CODE (expr
) == COMPONENT_REF
140 && DECL_BIT_FIELD_TYPE (TREE_OPERAND (expr
, 1)))
141 || TREE_CODE (expr
) == BIT_FIELD_REF
)
143 base
= TREE_OPERAND (expr
, 0);
144 if (TREE_CODE (expr
) == COMPONENT_REF
)
146 expr
= TREE_OPERAND (expr
, 1);
147 if (is_write
&& DECL_BIT_FIELD_REPRESENTATIVE (expr
))
148 expr
= DECL_BIT_FIELD_REPRESENTATIVE (expr
);
149 if (!tree_fits_uhwi_p (DECL_FIELD_OFFSET (expr
))
150 || !tree_fits_uhwi_p (DECL_FIELD_BIT_OFFSET (expr
))
151 || !tree_fits_uhwi_p (DECL_SIZE (expr
)))
153 bitpos
= tree_to_uhwi (DECL_FIELD_OFFSET (expr
)) * BITS_PER_UNIT
154 + tree_to_uhwi (DECL_FIELD_BIT_OFFSET (expr
));
155 bitsize
= tree_to_uhwi (DECL_SIZE (expr
));
159 if (!tree_fits_uhwi_p (TREE_OPERAND (expr
, 2))
160 || !tree_fits_uhwi_p (TREE_OPERAND (expr
, 1)))
162 bitpos
= tree_to_uhwi (TREE_OPERAND (expr
, 2));
163 bitsize
= tree_to_uhwi (TREE_OPERAND (expr
, 1));
165 if (bitpos
< 0 || bitsize
<= 0)
167 size
= (bitpos
% BITS_PER_UNIT
+ bitsize
+ BITS_PER_UNIT
- 1)
169 if (may_be_nonaddressable_p (base
))
171 align
= get_object_alignment (base
);
172 if (align
< BITS_PER_UNIT
)
174 bitpos
= bitpos
& ~(BITS_PER_UNIT
- 1);
175 if ((align
- 1) & bitpos
)
177 align
= (align
- 1) & bitpos
;
178 align
= align
& -align
;
180 expr
= build_fold_addr_expr (unshare_expr (base
));
181 expr
= build2 (MEM_REF
, char_type_node
, expr
,
182 build_int_cst (TREE_TYPE (expr
), bitpos
/ BITS_PER_UNIT
));
183 expr_ptr
= build_fold_addr_expr (expr
);
187 if (may_be_nonaddressable_p (expr
))
189 align
= get_object_alignment (expr
);
190 if (align
< BITS_PER_UNIT
)
192 expr_ptr
= build_fold_addr_expr (unshare_expr (expr
));
194 expr_ptr
= force_gimple_operand (expr_ptr
, &seq
, true, NULL_TREE
);
195 if ((size
& (size
- 1)) != 0 || size
> 16
196 || align
< MIN (size
, 8) * BITS_PER_UNIT
)
198 builtin_decl
= builtin_decl_implicit (is_write
199 ? BUILT_IN_TSAN_WRITE_RANGE
200 : BUILT_IN_TSAN_READ_RANGE
);
201 g
= gimple_build_call (builtin_decl
, 2, expr_ptr
, size_int (size
));
203 else if (rhs
== NULL
)
204 g
= gimple_build_call (get_memory_access_decl (is_write
, size
),
208 builtin_decl
= builtin_decl_implicit (BUILT_IN_TSAN_VPTR_UPDATE
);
209 g
= gimple_build_call (builtin_decl
, 2, expr_ptr
, unshare_expr (rhs
));
211 gimple_set_location (g
, loc
);
212 gimple_seq_add_stmt_without_update (&seq
, g
);
213 /* Instrumentation for assignment of a function result
214 must be inserted after the call. Instrumentation for
215 reads of function arguments must be inserted before the call.
216 That's because the call can contain synchronization. */
217 if (is_gimple_call (stmt
) && is_write
)
219 /* If the call can throw, it must be the last stmt in
220 a basic block, so the instrumented stmts need to be
221 inserted in successor bbs. */
222 if (is_ctrl_altering_stmt (stmt
))
227 e
= find_fallthru_edge (bb
->succs
);
229 gsi_insert_seq_on_edge_immediate (e
, seq
);
232 gsi_insert_seq_after (&gsi
, seq
, GSI_NEW_STMT
);
235 gsi_insert_seq_before (&gsi
, seq
, GSI_SAME_STMT
);
240 /* Actions for sync/atomic builtin transformations. */
241 enum tsan_atomic_action
243 check_last
, add_seq_cst
, add_acquire
, weak_cas
, strong_cas
,
244 bool_cas
, val_cas
, lock_release
, fetch_op
, fetch_op_seq_cst
,
245 bool_clear
, bool_test_and_set
248 /* Table how to map sync/atomic builtins to their corresponding
250 static const struct tsan_map_atomic
252 enum built_in_function fcode
, tsan_fcode
;
253 enum tsan_atomic_action action
;
255 } tsan_atomic_table
[] =
257 #define TRANSFORM(fcode, tsan_fcode, action, code) \
258 { BUILT_IN_##fcode, BUILT_IN_##tsan_fcode, action, code }
259 #define CHECK_LAST(fcode, tsan_fcode) \
260 TRANSFORM (fcode, tsan_fcode, check_last, ERROR_MARK)
261 #define ADD_SEQ_CST(fcode, tsan_fcode) \
262 TRANSFORM (fcode, tsan_fcode, add_seq_cst, ERROR_MARK)
263 #define ADD_ACQUIRE(fcode, tsan_fcode) \
264 TRANSFORM (fcode, tsan_fcode, add_acquire, ERROR_MARK)
265 #define WEAK_CAS(fcode, tsan_fcode) \
266 TRANSFORM (fcode, tsan_fcode, weak_cas, ERROR_MARK)
267 #define STRONG_CAS(fcode, tsan_fcode) \
268 TRANSFORM (fcode, tsan_fcode, strong_cas, ERROR_MARK)
269 #define BOOL_CAS(fcode, tsan_fcode) \
270 TRANSFORM (fcode, tsan_fcode, bool_cas, ERROR_MARK)
271 #define VAL_CAS(fcode, tsan_fcode) \
272 TRANSFORM (fcode, tsan_fcode, val_cas, ERROR_MARK)
273 #define LOCK_RELEASE(fcode, tsan_fcode) \
274 TRANSFORM (fcode, tsan_fcode, lock_release, ERROR_MARK)
275 #define FETCH_OP(fcode, tsan_fcode, code) \
276 TRANSFORM (fcode, tsan_fcode, fetch_op, code)
277 #define FETCH_OPS(fcode, tsan_fcode, code) \
278 TRANSFORM (fcode, tsan_fcode, fetch_op_seq_cst, code)
279 #define BOOL_CLEAR(fcode, tsan_fcode) \
280 TRANSFORM (fcode, tsan_fcode, bool_clear, ERROR_MARK)
281 #define BOOL_TEST_AND_SET(fcode, tsan_fcode) \
282 TRANSFORM (fcode, tsan_fcode, bool_test_and_set, ERROR_MARK)
284 CHECK_LAST (ATOMIC_LOAD_1
, TSAN_ATOMIC8_LOAD
),
285 CHECK_LAST (ATOMIC_LOAD_2
, TSAN_ATOMIC16_LOAD
),
286 CHECK_LAST (ATOMIC_LOAD_4
, TSAN_ATOMIC32_LOAD
),
287 CHECK_LAST (ATOMIC_LOAD_8
, TSAN_ATOMIC64_LOAD
),
288 CHECK_LAST (ATOMIC_LOAD_16
, TSAN_ATOMIC128_LOAD
),
289 CHECK_LAST (ATOMIC_STORE_1
, TSAN_ATOMIC8_STORE
),
290 CHECK_LAST (ATOMIC_STORE_2
, TSAN_ATOMIC16_STORE
),
291 CHECK_LAST (ATOMIC_STORE_4
, TSAN_ATOMIC32_STORE
),
292 CHECK_LAST (ATOMIC_STORE_8
, TSAN_ATOMIC64_STORE
),
293 CHECK_LAST (ATOMIC_STORE_16
, TSAN_ATOMIC128_STORE
),
294 CHECK_LAST (ATOMIC_EXCHANGE_1
, TSAN_ATOMIC8_EXCHANGE
),
295 CHECK_LAST (ATOMIC_EXCHANGE_2
, TSAN_ATOMIC16_EXCHANGE
),
296 CHECK_LAST (ATOMIC_EXCHANGE_4
, TSAN_ATOMIC32_EXCHANGE
),
297 CHECK_LAST (ATOMIC_EXCHANGE_8
, TSAN_ATOMIC64_EXCHANGE
),
298 CHECK_LAST (ATOMIC_EXCHANGE_16
, TSAN_ATOMIC128_EXCHANGE
),
299 CHECK_LAST (ATOMIC_FETCH_ADD_1
, TSAN_ATOMIC8_FETCH_ADD
),
300 CHECK_LAST (ATOMIC_FETCH_ADD_2
, TSAN_ATOMIC16_FETCH_ADD
),
301 CHECK_LAST (ATOMIC_FETCH_ADD_4
, TSAN_ATOMIC32_FETCH_ADD
),
302 CHECK_LAST (ATOMIC_FETCH_ADD_8
, TSAN_ATOMIC64_FETCH_ADD
),
303 CHECK_LAST (ATOMIC_FETCH_ADD_16
, TSAN_ATOMIC128_FETCH_ADD
),
304 CHECK_LAST (ATOMIC_FETCH_SUB_1
, TSAN_ATOMIC8_FETCH_SUB
),
305 CHECK_LAST (ATOMIC_FETCH_SUB_2
, TSAN_ATOMIC16_FETCH_SUB
),
306 CHECK_LAST (ATOMIC_FETCH_SUB_4
, TSAN_ATOMIC32_FETCH_SUB
),
307 CHECK_LAST (ATOMIC_FETCH_SUB_8
, TSAN_ATOMIC64_FETCH_SUB
),
308 CHECK_LAST (ATOMIC_FETCH_SUB_16
, TSAN_ATOMIC128_FETCH_SUB
),
309 CHECK_LAST (ATOMIC_FETCH_AND_1
, TSAN_ATOMIC8_FETCH_AND
),
310 CHECK_LAST (ATOMIC_FETCH_AND_2
, TSAN_ATOMIC16_FETCH_AND
),
311 CHECK_LAST (ATOMIC_FETCH_AND_4
, TSAN_ATOMIC32_FETCH_AND
),
312 CHECK_LAST (ATOMIC_FETCH_AND_8
, TSAN_ATOMIC64_FETCH_AND
),
313 CHECK_LAST (ATOMIC_FETCH_AND_16
, TSAN_ATOMIC128_FETCH_AND
),
314 CHECK_LAST (ATOMIC_FETCH_OR_1
, TSAN_ATOMIC8_FETCH_OR
),
315 CHECK_LAST (ATOMIC_FETCH_OR_2
, TSAN_ATOMIC16_FETCH_OR
),
316 CHECK_LAST (ATOMIC_FETCH_OR_4
, TSAN_ATOMIC32_FETCH_OR
),
317 CHECK_LAST (ATOMIC_FETCH_OR_8
, TSAN_ATOMIC64_FETCH_OR
),
318 CHECK_LAST (ATOMIC_FETCH_OR_16
, TSAN_ATOMIC128_FETCH_OR
),
319 CHECK_LAST (ATOMIC_FETCH_XOR_1
, TSAN_ATOMIC8_FETCH_XOR
),
320 CHECK_LAST (ATOMIC_FETCH_XOR_2
, TSAN_ATOMIC16_FETCH_XOR
),
321 CHECK_LAST (ATOMIC_FETCH_XOR_4
, TSAN_ATOMIC32_FETCH_XOR
),
322 CHECK_LAST (ATOMIC_FETCH_XOR_8
, TSAN_ATOMIC64_FETCH_XOR
),
323 CHECK_LAST (ATOMIC_FETCH_XOR_16
, TSAN_ATOMIC128_FETCH_XOR
),
324 CHECK_LAST (ATOMIC_FETCH_NAND_1
, TSAN_ATOMIC8_FETCH_NAND
),
325 CHECK_LAST (ATOMIC_FETCH_NAND_2
, TSAN_ATOMIC16_FETCH_NAND
),
326 CHECK_LAST (ATOMIC_FETCH_NAND_4
, TSAN_ATOMIC32_FETCH_NAND
),
327 CHECK_LAST (ATOMIC_FETCH_NAND_8
, TSAN_ATOMIC64_FETCH_NAND
),
328 CHECK_LAST (ATOMIC_FETCH_NAND_16
, TSAN_ATOMIC128_FETCH_NAND
),
330 CHECK_LAST (ATOMIC_THREAD_FENCE
, TSAN_ATOMIC_THREAD_FENCE
),
331 CHECK_LAST (ATOMIC_SIGNAL_FENCE
, TSAN_ATOMIC_SIGNAL_FENCE
),
333 FETCH_OP (ATOMIC_ADD_FETCH_1
, TSAN_ATOMIC8_FETCH_ADD
, PLUS_EXPR
),
334 FETCH_OP (ATOMIC_ADD_FETCH_2
, TSAN_ATOMIC16_FETCH_ADD
, PLUS_EXPR
),
335 FETCH_OP (ATOMIC_ADD_FETCH_4
, TSAN_ATOMIC32_FETCH_ADD
, PLUS_EXPR
),
336 FETCH_OP (ATOMIC_ADD_FETCH_8
, TSAN_ATOMIC64_FETCH_ADD
, PLUS_EXPR
),
337 FETCH_OP (ATOMIC_ADD_FETCH_16
, TSAN_ATOMIC128_FETCH_ADD
, PLUS_EXPR
),
338 FETCH_OP (ATOMIC_SUB_FETCH_1
, TSAN_ATOMIC8_FETCH_SUB
, MINUS_EXPR
),
339 FETCH_OP (ATOMIC_SUB_FETCH_2
, TSAN_ATOMIC16_FETCH_SUB
, MINUS_EXPR
),
340 FETCH_OP (ATOMIC_SUB_FETCH_4
, TSAN_ATOMIC32_FETCH_SUB
, MINUS_EXPR
),
341 FETCH_OP (ATOMIC_SUB_FETCH_8
, TSAN_ATOMIC64_FETCH_SUB
, MINUS_EXPR
),
342 FETCH_OP (ATOMIC_SUB_FETCH_16
, TSAN_ATOMIC128_FETCH_SUB
, MINUS_EXPR
),
343 FETCH_OP (ATOMIC_AND_FETCH_1
, TSAN_ATOMIC8_FETCH_AND
, BIT_AND_EXPR
),
344 FETCH_OP (ATOMIC_AND_FETCH_2
, TSAN_ATOMIC16_FETCH_AND
, BIT_AND_EXPR
),
345 FETCH_OP (ATOMIC_AND_FETCH_4
, TSAN_ATOMIC32_FETCH_AND
, BIT_AND_EXPR
),
346 FETCH_OP (ATOMIC_AND_FETCH_8
, TSAN_ATOMIC64_FETCH_AND
, BIT_AND_EXPR
),
347 FETCH_OP (ATOMIC_AND_FETCH_16
, TSAN_ATOMIC128_FETCH_AND
, BIT_AND_EXPR
),
348 FETCH_OP (ATOMIC_OR_FETCH_1
, TSAN_ATOMIC8_FETCH_OR
, BIT_IOR_EXPR
),
349 FETCH_OP (ATOMIC_OR_FETCH_2
, TSAN_ATOMIC16_FETCH_OR
, BIT_IOR_EXPR
),
350 FETCH_OP (ATOMIC_OR_FETCH_4
, TSAN_ATOMIC32_FETCH_OR
, BIT_IOR_EXPR
),
351 FETCH_OP (ATOMIC_OR_FETCH_8
, TSAN_ATOMIC64_FETCH_OR
, BIT_IOR_EXPR
),
352 FETCH_OP (ATOMIC_OR_FETCH_16
, TSAN_ATOMIC128_FETCH_OR
, BIT_IOR_EXPR
),
353 FETCH_OP (ATOMIC_XOR_FETCH_1
, TSAN_ATOMIC8_FETCH_XOR
, BIT_XOR_EXPR
),
354 FETCH_OP (ATOMIC_XOR_FETCH_2
, TSAN_ATOMIC16_FETCH_XOR
, BIT_XOR_EXPR
),
355 FETCH_OP (ATOMIC_XOR_FETCH_4
, TSAN_ATOMIC32_FETCH_XOR
, BIT_XOR_EXPR
),
356 FETCH_OP (ATOMIC_XOR_FETCH_8
, TSAN_ATOMIC64_FETCH_XOR
, BIT_XOR_EXPR
),
357 FETCH_OP (ATOMIC_XOR_FETCH_16
, TSAN_ATOMIC128_FETCH_XOR
, BIT_XOR_EXPR
),
358 FETCH_OP (ATOMIC_NAND_FETCH_1
, TSAN_ATOMIC8_FETCH_NAND
, BIT_NOT_EXPR
),
359 FETCH_OP (ATOMIC_NAND_FETCH_2
, TSAN_ATOMIC16_FETCH_NAND
, BIT_NOT_EXPR
),
360 FETCH_OP (ATOMIC_NAND_FETCH_4
, TSAN_ATOMIC32_FETCH_NAND
, BIT_NOT_EXPR
),
361 FETCH_OP (ATOMIC_NAND_FETCH_8
, TSAN_ATOMIC64_FETCH_NAND
, BIT_NOT_EXPR
),
362 FETCH_OP (ATOMIC_NAND_FETCH_16
, TSAN_ATOMIC128_FETCH_NAND
, BIT_NOT_EXPR
),
364 ADD_ACQUIRE (SYNC_LOCK_TEST_AND_SET_1
, TSAN_ATOMIC8_EXCHANGE
),
365 ADD_ACQUIRE (SYNC_LOCK_TEST_AND_SET_2
, TSAN_ATOMIC16_EXCHANGE
),
366 ADD_ACQUIRE (SYNC_LOCK_TEST_AND_SET_4
, TSAN_ATOMIC32_EXCHANGE
),
367 ADD_ACQUIRE (SYNC_LOCK_TEST_AND_SET_8
, TSAN_ATOMIC64_EXCHANGE
),
368 ADD_ACQUIRE (SYNC_LOCK_TEST_AND_SET_16
, TSAN_ATOMIC128_EXCHANGE
),
370 ADD_SEQ_CST (SYNC_FETCH_AND_ADD_1
, TSAN_ATOMIC8_FETCH_ADD
),
371 ADD_SEQ_CST (SYNC_FETCH_AND_ADD_2
, TSAN_ATOMIC16_FETCH_ADD
),
372 ADD_SEQ_CST (SYNC_FETCH_AND_ADD_4
, TSAN_ATOMIC32_FETCH_ADD
),
373 ADD_SEQ_CST (SYNC_FETCH_AND_ADD_8
, TSAN_ATOMIC64_FETCH_ADD
),
374 ADD_SEQ_CST (SYNC_FETCH_AND_ADD_16
, TSAN_ATOMIC128_FETCH_ADD
),
375 ADD_SEQ_CST (SYNC_FETCH_AND_SUB_1
, TSAN_ATOMIC8_FETCH_SUB
),
376 ADD_SEQ_CST (SYNC_FETCH_AND_SUB_2
, TSAN_ATOMIC16_FETCH_SUB
),
377 ADD_SEQ_CST (SYNC_FETCH_AND_SUB_4
, TSAN_ATOMIC32_FETCH_SUB
),
378 ADD_SEQ_CST (SYNC_FETCH_AND_SUB_8
, TSAN_ATOMIC64_FETCH_SUB
),
379 ADD_SEQ_CST (SYNC_FETCH_AND_SUB_16
, TSAN_ATOMIC128_FETCH_SUB
),
380 ADD_SEQ_CST (SYNC_FETCH_AND_AND_1
, TSAN_ATOMIC8_FETCH_AND
),
381 ADD_SEQ_CST (SYNC_FETCH_AND_AND_2
, TSAN_ATOMIC16_FETCH_AND
),
382 ADD_SEQ_CST (SYNC_FETCH_AND_AND_4
, TSAN_ATOMIC32_FETCH_AND
),
383 ADD_SEQ_CST (SYNC_FETCH_AND_AND_8
, TSAN_ATOMIC64_FETCH_AND
),
384 ADD_SEQ_CST (SYNC_FETCH_AND_AND_16
, TSAN_ATOMIC128_FETCH_AND
),
385 ADD_SEQ_CST (SYNC_FETCH_AND_OR_1
, TSAN_ATOMIC8_FETCH_OR
),
386 ADD_SEQ_CST (SYNC_FETCH_AND_OR_2
, TSAN_ATOMIC16_FETCH_OR
),
387 ADD_SEQ_CST (SYNC_FETCH_AND_OR_4
, TSAN_ATOMIC32_FETCH_OR
),
388 ADD_SEQ_CST (SYNC_FETCH_AND_OR_8
, TSAN_ATOMIC64_FETCH_OR
),
389 ADD_SEQ_CST (SYNC_FETCH_AND_OR_16
, TSAN_ATOMIC128_FETCH_OR
),
390 ADD_SEQ_CST (SYNC_FETCH_AND_XOR_1
, TSAN_ATOMIC8_FETCH_XOR
),
391 ADD_SEQ_CST (SYNC_FETCH_AND_XOR_2
, TSAN_ATOMIC16_FETCH_XOR
),
392 ADD_SEQ_CST (SYNC_FETCH_AND_XOR_4
, TSAN_ATOMIC32_FETCH_XOR
),
393 ADD_SEQ_CST (SYNC_FETCH_AND_XOR_8
, TSAN_ATOMIC64_FETCH_XOR
),
394 ADD_SEQ_CST (SYNC_FETCH_AND_XOR_16
, TSAN_ATOMIC128_FETCH_XOR
),
395 ADD_SEQ_CST (SYNC_FETCH_AND_NAND_1
, TSAN_ATOMIC8_FETCH_NAND
),
396 ADD_SEQ_CST (SYNC_FETCH_AND_NAND_2
, TSAN_ATOMIC16_FETCH_NAND
),
397 ADD_SEQ_CST (SYNC_FETCH_AND_NAND_4
, TSAN_ATOMIC32_FETCH_NAND
),
398 ADD_SEQ_CST (SYNC_FETCH_AND_NAND_8
, TSAN_ATOMIC64_FETCH_NAND
),
399 ADD_SEQ_CST (SYNC_FETCH_AND_NAND_16
, TSAN_ATOMIC128_FETCH_NAND
),
401 ADD_SEQ_CST (SYNC_SYNCHRONIZE
, TSAN_ATOMIC_THREAD_FENCE
),
403 FETCH_OPS (SYNC_ADD_AND_FETCH_1
, TSAN_ATOMIC8_FETCH_ADD
, PLUS_EXPR
),
404 FETCH_OPS (SYNC_ADD_AND_FETCH_2
, TSAN_ATOMIC16_FETCH_ADD
, PLUS_EXPR
),
405 FETCH_OPS (SYNC_ADD_AND_FETCH_4
, TSAN_ATOMIC32_FETCH_ADD
, PLUS_EXPR
),
406 FETCH_OPS (SYNC_ADD_AND_FETCH_8
, TSAN_ATOMIC64_FETCH_ADD
, PLUS_EXPR
),
407 FETCH_OPS (SYNC_ADD_AND_FETCH_16
, TSAN_ATOMIC128_FETCH_ADD
, PLUS_EXPR
),
408 FETCH_OPS (SYNC_SUB_AND_FETCH_1
, TSAN_ATOMIC8_FETCH_SUB
, MINUS_EXPR
),
409 FETCH_OPS (SYNC_SUB_AND_FETCH_2
, TSAN_ATOMIC16_FETCH_SUB
, MINUS_EXPR
),
410 FETCH_OPS (SYNC_SUB_AND_FETCH_4
, TSAN_ATOMIC32_FETCH_SUB
, MINUS_EXPR
),
411 FETCH_OPS (SYNC_SUB_AND_FETCH_8
, TSAN_ATOMIC64_FETCH_SUB
, MINUS_EXPR
),
412 FETCH_OPS (SYNC_SUB_AND_FETCH_16
, TSAN_ATOMIC128_FETCH_SUB
, MINUS_EXPR
),
413 FETCH_OPS (SYNC_AND_AND_FETCH_1
, TSAN_ATOMIC8_FETCH_AND
, BIT_AND_EXPR
),
414 FETCH_OPS (SYNC_AND_AND_FETCH_2
, TSAN_ATOMIC16_FETCH_AND
, BIT_AND_EXPR
),
415 FETCH_OPS (SYNC_AND_AND_FETCH_4
, TSAN_ATOMIC32_FETCH_AND
, BIT_AND_EXPR
),
416 FETCH_OPS (SYNC_AND_AND_FETCH_8
, TSAN_ATOMIC64_FETCH_AND
, BIT_AND_EXPR
),
417 FETCH_OPS (SYNC_AND_AND_FETCH_16
, TSAN_ATOMIC128_FETCH_AND
, BIT_AND_EXPR
),
418 FETCH_OPS (SYNC_OR_AND_FETCH_1
, TSAN_ATOMIC8_FETCH_OR
, BIT_IOR_EXPR
),
419 FETCH_OPS (SYNC_OR_AND_FETCH_2
, TSAN_ATOMIC16_FETCH_OR
, BIT_IOR_EXPR
),
420 FETCH_OPS (SYNC_OR_AND_FETCH_4
, TSAN_ATOMIC32_FETCH_OR
, BIT_IOR_EXPR
),
421 FETCH_OPS (SYNC_OR_AND_FETCH_8
, TSAN_ATOMIC64_FETCH_OR
, BIT_IOR_EXPR
),
422 FETCH_OPS (SYNC_OR_AND_FETCH_16
, TSAN_ATOMIC128_FETCH_OR
, BIT_IOR_EXPR
),
423 FETCH_OPS (SYNC_XOR_AND_FETCH_1
, TSAN_ATOMIC8_FETCH_XOR
, BIT_XOR_EXPR
),
424 FETCH_OPS (SYNC_XOR_AND_FETCH_2
, TSAN_ATOMIC16_FETCH_XOR
, BIT_XOR_EXPR
),
425 FETCH_OPS (SYNC_XOR_AND_FETCH_4
, TSAN_ATOMIC32_FETCH_XOR
, BIT_XOR_EXPR
),
426 FETCH_OPS (SYNC_XOR_AND_FETCH_8
, TSAN_ATOMIC64_FETCH_XOR
, BIT_XOR_EXPR
),
427 FETCH_OPS (SYNC_XOR_AND_FETCH_16
, TSAN_ATOMIC128_FETCH_XOR
, BIT_XOR_EXPR
),
428 FETCH_OPS (SYNC_NAND_AND_FETCH_1
, TSAN_ATOMIC8_FETCH_NAND
, BIT_NOT_EXPR
),
429 FETCH_OPS (SYNC_NAND_AND_FETCH_2
, TSAN_ATOMIC16_FETCH_NAND
, BIT_NOT_EXPR
),
430 FETCH_OPS (SYNC_NAND_AND_FETCH_4
, TSAN_ATOMIC32_FETCH_NAND
, BIT_NOT_EXPR
),
431 FETCH_OPS (SYNC_NAND_AND_FETCH_8
, TSAN_ATOMIC64_FETCH_NAND
, BIT_NOT_EXPR
),
432 FETCH_OPS (SYNC_NAND_AND_FETCH_16
, TSAN_ATOMIC128_FETCH_NAND
, BIT_NOT_EXPR
),
434 WEAK_CAS (ATOMIC_COMPARE_EXCHANGE_1
, TSAN_ATOMIC8_COMPARE_EXCHANGE_WEAK
),
435 WEAK_CAS (ATOMIC_COMPARE_EXCHANGE_2
, TSAN_ATOMIC16_COMPARE_EXCHANGE_WEAK
),
436 WEAK_CAS (ATOMIC_COMPARE_EXCHANGE_4
, TSAN_ATOMIC32_COMPARE_EXCHANGE_WEAK
),
437 WEAK_CAS (ATOMIC_COMPARE_EXCHANGE_8
, TSAN_ATOMIC64_COMPARE_EXCHANGE_WEAK
),
438 WEAK_CAS (ATOMIC_COMPARE_EXCHANGE_16
, TSAN_ATOMIC128_COMPARE_EXCHANGE_WEAK
),
440 STRONG_CAS (ATOMIC_COMPARE_EXCHANGE_1
, TSAN_ATOMIC8_COMPARE_EXCHANGE_STRONG
),
441 STRONG_CAS (ATOMIC_COMPARE_EXCHANGE_2
,
442 TSAN_ATOMIC16_COMPARE_EXCHANGE_STRONG
),
443 STRONG_CAS (ATOMIC_COMPARE_EXCHANGE_4
,
444 TSAN_ATOMIC32_COMPARE_EXCHANGE_STRONG
),
445 STRONG_CAS (ATOMIC_COMPARE_EXCHANGE_8
,
446 TSAN_ATOMIC64_COMPARE_EXCHANGE_STRONG
),
447 STRONG_CAS (ATOMIC_COMPARE_EXCHANGE_16
,
448 TSAN_ATOMIC128_COMPARE_EXCHANGE_STRONG
),
450 BOOL_CAS (SYNC_BOOL_COMPARE_AND_SWAP_1
,
451 TSAN_ATOMIC8_COMPARE_EXCHANGE_STRONG
),
452 BOOL_CAS (SYNC_BOOL_COMPARE_AND_SWAP_2
,
453 TSAN_ATOMIC16_COMPARE_EXCHANGE_STRONG
),
454 BOOL_CAS (SYNC_BOOL_COMPARE_AND_SWAP_4
,
455 TSAN_ATOMIC32_COMPARE_EXCHANGE_STRONG
),
456 BOOL_CAS (SYNC_BOOL_COMPARE_AND_SWAP_8
,
457 TSAN_ATOMIC64_COMPARE_EXCHANGE_STRONG
),
458 BOOL_CAS (SYNC_BOOL_COMPARE_AND_SWAP_16
,
459 TSAN_ATOMIC128_COMPARE_EXCHANGE_STRONG
),
461 VAL_CAS (SYNC_VAL_COMPARE_AND_SWAP_1
, TSAN_ATOMIC8_COMPARE_EXCHANGE_STRONG
),
462 VAL_CAS (SYNC_VAL_COMPARE_AND_SWAP_2
, TSAN_ATOMIC16_COMPARE_EXCHANGE_STRONG
),
463 VAL_CAS (SYNC_VAL_COMPARE_AND_SWAP_4
, TSAN_ATOMIC32_COMPARE_EXCHANGE_STRONG
),
464 VAL_CAS (SYNC_VAL_COMPARE_AND_SWAP_8
, TSAN_ATOMIC64_COMPARE_EXCHANGE_STRONG
),
465 VAL_CAS (SYNC_VAL_COMPARE_AND_SWAP_16
,
466 TSAN_ATOMIC128_COMPARE_EXCHANGE_STRONG
),
468 LOCK_RELEASE (SYNC_LOCK_RELEASE_1
, TSAN_ATOMIC8_STORE
),
469 LOCK_RELEASE (SYNC_LOCK_RELEASE_2
, TSAN_ATOMIC16_STORE
),
470 LOCK_RELEASE (SYNC_LOCK_RELEASE_4
, TSAN_ATOMIC32_STORE
),
471 LOCK_RELEASE (SYNC_LOCK_RELEASE_8
, TSAN_ATOMIC64_STORE
),
472 LOCK_RELEASE (SYNC_LOCK_RELEASE_16
, TSAN_ATOMIC128_STORE
),
474 BOOL_CLEAR (ATOMIC_CLEAR
, TSAN_ATOMIC8_STORE
),
476 BOOL_TEST_AND_SET (ATOMIC_TEST_AND_SET
, TSAN_ATOMIC8_EXCHANGE
)
479 /* Instrument an atomic builtin. */
482 instrument_builtin_call (gimple_stmt_iterator
*gsi
)
484 gimple
*stmt
= gsi_stmt (*gsi
), *g
;
485 tree callee
= gimple_call_fndecl (stmt
), last_arg
, args
[6], t
, lhs
;
486 enum built_in_function fcode
= DECL_FUNCTION_CODE (callee
);
487 unsigned int i
, num
= gimple_call_num_args (stmt
), j
;
488 for (j
= 0; j
< 6 && j
< num
; j
++)
489 args
[j
] = gimple_call_arg (stmt
, j
);
490 for (i
= 0; i
< ARRAY_SIZE (tsan_atomic_table
); i
++)
491 if (fcode
!= tsan_atomic_table
[i
].fcode
)
495 tree decl
= builtin_decl_implicit (tsan_atomic_table
[i
].tsan_fcode
);
496 if (decl
== NULL_TREE
)
498 switch (tsan_atomic_table
[i
].action
)
502 last_arg
= gimple_call_arg (stmt
, num
- 1);
503 if (!tree_fits_uhwi_p (last_arg
)
504 || memmodel_base (tree_to_uhwi (last_arg
)) >= MEMMODEL_LAST
)
506 gimple_call_set_fndecl (stmt
, decl
);
508 if (tsan_atomic_table
[i
].action
== fetch_op
)
510 args
[1] = gimple_call_arg (stmt
, 1);
516 case fetch_op_seq_cst
:
517 gcc_assert (num
<= 2);
518 for (j
= 0; j
< num
; j
++)
519 args
[j
] = gimple_call_arg (stmt
, j
);
522 args
[num
] = build_int_cst (NULL_TREE
,
523 tsan_atomic_table
[i
].action
527 update_gimple_call (gsi
, decl
, num
+ 1, args
[0], args
[1], args
[2]);
528 stmt
= gsi_stmt (*gsi
);
529 if (tsan_atomic_table
[i
].action
== fetch_op_seq_cst
)
532 lhs
= gimple_call_lhs (stmt
);
533 if (lhs
== NULL_TREE
)
535 if (!useless_type_conversion_p (TREE_TYPE (lhs
),
536 TREE_TYPE (args
[1])))
538 tree var
= make_ssa_name (TREE_TYPE (lhs
));
539 g
= gimple_build_assign (var
, NOP_EXPR
, args
[1]);
540 gsi_insert_after (gsi
, g
, GSI_NEW_STMT
);
543 gimple_call_set_lhs (stmt
, make_ssa_name (TREE_TYPE (lhs
)));
544 /* BIT_NOT_EXPR stands for NAND. */
545 if (tsan_atomic_table
[i
].code
== BIT_NOT_EXPR
)
547 tree var
= make_ssa_name (TREE_TYPE (lhs
));
548 g
= gimple_build_assign (var
, BIT_AND_EXPR
,
549 gimple_call_lhs (stmt
), args
[1]);
550 gsi_insert_after (gsi
, g
, GSI_NEW_STMT
);
551 g
= gimple_build_assign (lhs
, BIT_NOT_EXPR
, var
);
554 g
= gimple_build_assign (lhs
, tsan_atomic_table
[i
].code
,
555 gimple_call_lhs (stmt
), args
[1]);
557 gsi_insert_after (gsi
, g
, GSI_NEW_STMT
);
561 if (!integer_nonzerop (gimple_call_arg (stmt
, 3)))
565 gcc_assert (num
== 6);
566 for (j
= 0; j
< 6; j
++)
567 args
[j
] = gimple_call_arg (stmt
, j
);
568 if (!tree_fits_uhwi_p (args
[4])
569 || memmodel_base (tree_to_uhwi (args
[4])) >= MEMMODEL_LAST
)
571 if (!tree_fits_uhwi_p (args
[5])
572 || memmodel_base (tree_to_uhwi (args
[5])) >= MEMMODEL_LAST
)
574 update_gimple_call (gsi
, decl
, 5, args
[0], args
[1], args
[2],
579 gcc_assert (num
== 3);
580 for (j
= 0; j
< 3; j
++)
581 args
[j
] = gimple_call_arg (stmt
, j
);
582 t
= TYPE_ARG_TYPES (TREE_TYPE (decl
));
583 t
= TREE_VALUE (TREE_CHAIN (TREE_CHAIN (t
)));
584 t
= create_tmp_var (t
);
585 mark_addressable (t
);
586 if (!useless_type_conversion_p (TREE_TYPE (t
),
587 TREE_TYPE (args
[1])))
589 g
= gimple_build_assign (make_ssa_name (TREE_TYPE (t
)),
591 gsi_insert_before (gsi
, g
, GSI_SAME_STMT
);
592 args
[1] = gimple_assign_lhs (g
);
594 g
= gimple_build_assign (t
, args
[1]);
595 gsi_insert_before (gsi
, g
, GSI_SAME_STMT
);
596 lhs
= gimple_call_lhs (stmt
);
597 update_gimple_call (gsi
, decl
, 5, args
[0],
598 build_fold_addr_expr (t
), args
[2],
599 build_int_cst (NULL_TREE
,
601 build_int_cst (NULL_TREE
,
603 if (tsan_atomic_table
[i
].action
== val_cas
&& lhs
)
606 stmt
= gsi_stmt (*gsi
);
607 g
= gimple_build_assign (make_ssa_name (TREE_TYPE (t
)), t
);
608 gsi_insert_after (gsi
, g
, GSI_NEW_STMT
);
609 t
= make_ssa_name (TREE_TYPE (TREE_TYPE (decl
)), stmt
);
610 cond
= build2 (NE_EXPR
, boolean_type_node
, t
,
611 build_int_cst (TREE_TYPE (t
), 0));
612 g
= gimple_build_assign (lhs
, COND_EXPR
, cond
, args
[1],
613 gimple_assign_lhs (g
));
614 gimple_call_set_lhs (stmt
, t
);
616 gsi_insert_after (gsi
, g
, GSI_NEW_STMT
);
620 gcc_assert (num
== 1);
621 t
= TYPE_ARG_TYPES (TREE_TYPE (decl
));
622 t
= TREE_VALUE (TREE_CHAIN (t
));
623 update_gimple_call (gsi
, decl
, 3, gimple_call_arg (stmt
, 0),
624 build_int_cst (t
, 0),
625 build_int_cst (NULL_TREE
,
629 case bool_test_and_set
:
630 if (BOOL_TYPE_SIZE
!= 8)
633 for (j
= 1; j
< 5; j
++)
634 if (BOOL_TYPE_SIZE
== (8 << j
))
636 enum built_in_function tsan_fcode
637 = (enum built_in_function
)
638 (tsan_atomic_table
[i
].tsan_fcode
+ j
);
639 decl
= builtin_decl_implicit (tsan_fcode
);
642 if (decl
== NULL_TREE
)
645 last_arg
= gimple_call_arg (stmt
, num
- 1);
646 if (!tree_fits_uhwi_p (last_arg
)
647 || memmodel_base (tree_to_uhwi (last_arg
)) >= MEMMODEL_LAST
)
649 t
= TYPE_ARG_TYPES (TREE_TYPE (decl
));
650 t
= TREE_VALUE (TREE_CHAIN (t
));
651 if (tsan_atomic_table
[i
].action
== bool_clear
)
653 update_gimple_call (gsi
, decl
, 3, gimple_call_arg (stmt
, 0),
654 build_int_cst (t
, 0), last_arg
);
657 t
= build_int_cst (t
, targetm
.atomic_test_and_set_trueval
);
658 update_gimple_call (gsi
, decl
, 3, gimple_call_arg (stmt
, 0),
660 stmt
= gsi_stmt (*gsi
);
661 lhs
= gimple_call_lhs (stmt
);
662 if (lhs
== NULL_TREE
)
664 if (targetm
.atomic_test_and_set_trueval
!= 1
665 || !useless_type_conversion_p (TREE_TYPE (lhs
),
668 tree new_lhs
= make_ssa_name (TREE_TYPE (t
));
669 gimple_call_set_lhs (stmt
, new_lhs
);
670 if (targetm
.atomic_test_and_set_trueval
!= 1)
671 g
= gimple_build_assign (lhs
, NE_EXPR
, new_lhs
,
672 build_int_cst (TREE_TYPE (t
), 0));
674 g
= gimple_build_assign (lhs
, NOP_EXPR
, new_lhs
);
675 gsi_insert_after (gsi
, g
, GSI_NEW_STMT
);
685 /* Instruments the gimple pointed to by GSI. Return
686 true if func entry/exit should be instrumented. */
689 instrument_gimple (gimple_stmt_iterator
*gsi
)
693 bool instrumented
= false;
695 stmt
= gsi_stmt (*gsi
);
696 if (is_gimple_call (stmt
)
697 && (gimple_call_fndecl (stmt
)
698 != builtin_decl_implicit (BUILT_IN_TSAN_INIT
)))
700 /* All functions with function call will have exit instrumented,
701 therefore no function calls other than __tsan_func_exit
702 shall appear in the functions. */
703 gimple_call_set_tail (as_a
<gcall
*> (stmt
), false);
704 if (gimple_call_builtin_p (stmt
, BUILT_IN_NORMAL
))
705 instrument_builtin_call (gsi
);
708 else if (is_gimple_assign (stmt
)
709 && !gimple_clobber_p (stmt
))
711 if (gimple_store_p (stmt
))
713 lhs
= gimple_assign_lhs (stmt
);
714 instrumented
= instrument_expr (*gsi
, lhs
, true);
716 if (gimple_assign_load_p (stmt
))
718 rhs
= gimple_assign_rhs1 (stmt
);
719 instrumented
= instrument_expr (*gsi
, rhs
, false);
725 /* Replace TSAN_FUNC_EXIT internal call with function exit tsan builtin. */
728 replace_func_exit (gimple
*stmt
)
730 tree builtin_decl
= builtin_decl_implicit (BUILT_IN_TSAN_FUNC_EXIT
);
731 gimple
*g
= gimple_build_call (builtin_decl
, 0);
732 gimple_set_location (g
, cfun
->function_end_locus
);
733 gimple_stmt_iterator gsi
= gsi_for_stmt (stmt
);
734 gsi_replace (&gsi
, g
, true);
737 /* Instrument function exit. Used when TSAN_FUNC_EXIT does not exist. */
740 instrument_func_exit (void)
744 gimple_stmt_iterator gsi
;
750 /* Find all function exits. */
751 exit_bb
= EXIT_BLOCK_PTR_FOR_FN (cfun
);
752 FOR_EACH_EDGE (e
, ei
, exit_bb
->preds
)
754 gsi
= gsi_last_bb (e
->src
);
755 stmt
= gsi_stmt (gsi
);
756 gcc_assert (gimple_code (stmt
) == GIMPLE_RETURN
757 || gimple_call_builtin_p (stmt
, BUILT_IN_RETURN
));
758 loc
= gimple_location (stmt
);
759 builtin_decl
= builtin_decl_implicit (BUILT_IN_TSAN_FUNC_EXIT
);
760 g
= gimple_build_call (builtin_decl
, 0);
761 gimple_set_location (g
, loc
);
762 gsi_insert_before (&gsi
, g
, GSI_SAME_STMT
);
766 /* Instruments all interesting memory accesses in the current function.
767 Return true if func entry/exit should be instrumented. */
770 instrument_memory_accesses (void)
773 gimple_stmt_iterator gsi
;
774 bool fentry_exit_instrument
= false;
775 bool func_exit_seen
= false;
776 auto_vec
<gimple
*> tsan_func_exits
;
778 FOR_EACH_BB_FN (bb
, cfun
)
779 for (gsi
= gsi_start_bb (bb
); !gsi_end_p (gsi
); gsi_next (&gsi
))
781 gimple
*stmt
= gsi_stmt (gsi
);
782 if (is_gimple_call (stmt
)
783 && gimple_call_internal_p (stmt
)
784 && gimple_call_internal_fn (stmt
) == IFN_TSAN_FUNC_EXIT
)
786 if (fentry_exit_instrument
)
787 replace_func_exit (stmt
);
789 tsan_func_exits
.safe_push (stmt
);
790 func_exit_seen
= true;
793 fentry_exit_instrument
|= instrument_gimple (&gsi
);
797 FOR_EACH_VEC_ELT (tsan_func_exits
, i
, stmt
)
798 if (fentry_exit_instrument
)
799 replace_func_exit (stmt
);
802 gsi
= gsi_for_stmt (stmt
);
803 gsi_remove (&gsi
, true);
805 if (fentry_exit_instrument
&& !func_exit_seen
)
806 instrument_func_exit ();
807 return fentry_exit_instrument
;
810 /* Instruments function entry. */
813 instrument_func_entry (void)
815 tree ret_addr
, builtin_decl
;
817 gimple_seq seq
= NULL
;
819 builtin_decl
= builtin_decl_implicit (BUILT_IN_RETURN_ADDRESS
);
820 g
= gimple_build_call (builtin_decl
, 1, integer_zero_node
);
821 ret_addr
= make_ssa_name (ptr_type_node
);
822 gimple_call_set_lhs (g
, ret_addr
);
823 gimple_set_location (g
, cfun
->function_start_locus
);
824 gimple_seq_add_stmt_without_update (&seq
, g
);
826 builtin_decl
= builtin_decl_implicit (BUILT_IN_TSAN_FUNC_ENTRY
);
827 g
= gimple_build_call (builtin_decl
, 1, ret_addr
);
828 gimple_set_location (g
, cfun
->function_start_locus
);
829 gimple_seq_add_stmt_without_update (&seq
, g
);
831 edge e
= single_succ_edge (ENTRY_BLOCK_PTR_FOR_FN (cfun
));
832 gsi_insert_seq_on_edge_immediate (e
, seq
);
835 /* ThreadSanitizer instrumentation pass. */
840 initialize_sanitizer_builtins ();
841 if (instrument_memory_accesses ())
842 instrument_func_entry ();
846 /* Inserts __tsan_init () into the list of CTORs. */
849 tsan_finish_file (void)
851 tree ctor_statements
= NULL_TREE
;
853 initialize_sanitizer_builtins ();
854 tree init_decl
= builtin_decl_implicit (BUILT_IN_TSAN_INIT
);
855 append_to_statement_list (build_call_expr (init_decl
, 0),
857 cgraph_build_static_cdtor ('I', ctor_statements
,
858 MAX_RESERVED_INIT_PRIORITY
- 1);
861 /* The pass descriptor. */
865 const pass_data pass_data_tsan
=
867 GIMPLE_PASS
, /* type */
869 OPTGROUP_NONE
, /* optinfo_flags */
871 ( PROP_ssa
| PROP_cfg
), /* properties_required */
872 0, /* properties_provided */
873 0, /* properties_destroyed */
874 0, /* todo_flags_start */
875 TODO_update_ssa
, /* todo_flags_finish */
878 class pass_tsan
: public gimple_opt_pass
881 pass_tsan (gcc::context
*ctxt
)
882 : gimple_opt_pass (pass_data_tsan
, ctxt
)
885 /* opt_pass methods: */
886 opt_pass
* clone () { return new pass_tsan (m_ctxt
); }
887 virtual bool gate (function
*)
889 return ((flag_sanitize
& SANITIZE_THREAD
) != 0
890 && !lookup_attribute ("no_sanitize_thread",
891 DECL_ATTRIBUTES (current_function_decl
)));
894 virtual unsigned int execute (function
*) { return tsan_pass (); }
896 }; // class pass_tsan
901 make_pass_tsan (gcc::context
*ctxt
)
903 return new pass_tsan (ctxt
);
908 const pass_data pass_data_tsan_O0
=
910 GIMPLE_PASS
, /* type */
912 OPTGROUP_NONE
, /* optinfo_flags */
914 ( PROP_ssa
| PROP_cfg
), /* properties_required */
915 0, /* properties_provided */
916 0, /* properties_destroyed */
917 0, /* todo_flags_start */
918 TODO_update_ssa
, /* todo_flags_finish */
921 class pass_tsan_O0
: public gimple_opt_pass
924 pass_tsan_O0 (gcc::context
*ctxt
)
925 : gimple_opt_pass (pass_data_tsan_O0
, ctxt
)
928 /* opt_pass methods: */
929 virtual bool gate (function
*)
931 return ((flag_sanitize
& SANITIZE_THREAD
) != 0 && !optimize
932 && !lookup_attribute ("no_sanitize_thread",
933 DECL_ATTRIBUTES (current_function_decl
)));
936 virtual unsigned int execute (function
*) { return tsan_pass (); }
938 }; // class pass_tsan_O0
943 make_pass_tsan_O0 (gcc::context
*ctxt
)
945 return new pass_tsan_O0 (ctxt
);