File: fork_deadlock.cpp

package info (click to toggle)
swiftlang 6.1.3-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 2,791,532 kB
  • sloc: cpp: 9,901,743; ansic: 2,201,431; asm: 1,091,827; python: 308,252; objc: 82,166; f90: 80,126; lisp: 38,358; pascal: 25,559; sh: 20,429; ml: 5,058; perl: 4,745; makefile: 4,484; awk: 3,535; javascript: 3,018; xml: 918; fortran: 664; cs: 573; ruby: 396
file content (69 lines) | stat: -rw-r--r-- 1,785 bytes parent folder | download | duplicates (17)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
// TODO(#96597): fix and reenable
// UNSUPPORTED: darwin

// RUN: %clangxx_tsan -O1 %s -o %t && %env_tsan_opts=atexit_sleep_ms=0 %run %t 2>&1 | FileCheck %s

// This test models what happens on Mac when fork
// calls malloc/free inside of our atfork callbacks.
// and ensures that we don't deadlock on malloc/free calls.

#include "../test.h"
#include "syscall.h"
#include <errno.h>
#include <string.h>
#include <sys/types.h>
#include <sys/wait.h>

// disable_sanitizer_instrumentation on __tsan_test_only_on_fork is not
// transitive, so we must apply it here as well.
// Instrumenting alloc_free_blocks() will result in deadlocks in TSan.
__attribute__((disable_sanitizer_instrumentation)) void alloc_free_blocks() {
  // Allocate a bunch of blocks to drain local allocator cache
  // and provoke it to lock allocator global mutexes.
  const int kBlocks = 1000;
  void *blocks[kBlocks];
  for (int i = 0; i < kBlocks; i++) {
    void *p = malloc(10);
    *(volatile char *)p = 0;
    blocks[i] = p;
  }
  for (int i = 0; i < kBlocks; i++)
    free(blocks[i]);
}

__attribute__((disable_sanitizer_instrumentation)) extern "C" void
__tsan_test_only_on_fork() {
  const char *msg = "__tsan_test_only_on_fork\n";
  write(2, msg, strlen(msg));
  alloc_free_blocks();
}

static void *background(void *p) {
  for (;;)
    alloc_free_blocks();
  return 0;
}

int main() {
  pthread_t th;
  pthread_create(&th, 0, background, 0);
  pthread_detach(th);
  for (int i = 0; i < 10; i++) {
    int pid = myfork();
    if (pid < 0) {
      fprintf(stderr, "failed to fork (%d)\n", errno);
      exit(1);
    }
    if (pid == 0) {
      // child
      exit(0);
    }
    // parent
    while (wait(0) < 0) {
    }
  }
  fprintf(stderr, "DONE\n");
}

// CHECK: __tsan_test_only_on_fork
// CHECK: DONE