]> CyberLeo.Net >> Repos - FreeBSD/FreeBSD.git/blob - contrib/compiler-rt/lib/sanitizer_common/sanitizer_coverage_libcdep_new.cc
Merge compiler-rt r291274.
[FreeBSD/FreeBSD.git] / contrib / compiler-rt / lib / sanitizer_common / sanitizer_coverage_libcdep_new.cc
1 //===-- sanitizer_coverage_libcdep_new.cc ---------------------------------===//
2 //
3 //                     The LLVM Compiler Infrastructure
4 //
5 // This file is distributed under the University of Illinois Open Source
6 // License. See LICENSE.TXT for details.
7 //
8 //===----------------------------------------------------------------------===//
9 // Sanitizer Coverage Controller for Trace PC Guard.
10
11 #include "sancov_flags.h"
12 #include "sanitizer_allocator_internal.h"
13 #include "sanitizer_atomic.h"
14 #include "sanitizer_common.h"
15 #include "sanitizer_symbolizer.h"
16
17 using namespace __sanitizer;
18
19 using AddressRange = LoadedModule::AddressRange;
20
21 namespace __sancov {
22 namespace {
23
24 static const u64 Magic64 = 0xC0BFFFFFFFFFFF64ULL;
25 static const u64 Magic32 = 0xC0BFFFFFFFFFFF32ULL;
26 static const u64 Magic = SANITIZER_WORDSIZE == 64 ? Magic64 : Magic32;
27
28 static fd_t OpenFile(const char* path) {
29   error_t err;
30   fd_t fd = OpenFile(path, WrOnly, &err);
31   if (fd == kInvalidFd)
32     Report("SanitizerCoverage: failed to open %s for writing (reason: %d)\n",
33            path, err);
34   return fd;
35 }
36
37 static void GetCoverageFilename(char* path, const char* name,
38                                 const char* extension) {
39   CHECK(name);
40   internal_snprintf(path, kMaxPathLength, "%s/%s.%zd.%s",
41                     common_flags()->coverage_dir, name, internal_getpid(),
42                     extension);
43 }
44
45 static void WriteModuleCoverage(char* file_path, const char* module_name,
46                                 const uptr* pcs, uptr len) {
47   GetCoverageFilename(file_path, StripModuleName(module_name), "sancov");
48   fd_t fd = OpenFile(file_path);
49   WriteToFile(fd, &Magic, sizeof(Magic));
50   WriteToFile(fd, pcs, len * sizeof(*pcs));
51   CloseFile(fd);
52   Printf("SanitizerCoverage: %s %zd PCs written\n", file_path, len);
53 }
54
55 static void SanitizerDumpCoverage(const uptr* unsorted_pcs, uptr len) {
56   if (!len) return;
57
58   char* file_path = static_cast<char*>(InternalAlloc(kMaxPathLength));
59   char* module_name = static_cast<char*>(InternalAlloc(kMaxPathLength));
60   uptr* pcs = static_cast<uptr*>(InternalAlloc(len * sizeof(uptr)));
61
62   internal_memcpy(pcs, unsorted_pcs, len * sizeof(uptr));
63   SortArray(pcs, len);
64
65   bool module_found = false;
66   uptr last_base = 0;
67   uptr module_start_idx = 0;
68
69   for (uptr i = 0; i < len; ++i) {
70     const uptr pc = pcs[i];
71     if (!pc) continue;
72
73     if (!__sanitizer_get_module_and_offset_for_pc(pc, nullptr, 0, &pcs[i])) {
74       Printf("ERROR: bad pc %x\n", pc);
75       continue;
76     }
77     uptr module_base = pc - pcs[i];
78
79     if (module_base != last_base || !module_found) {
80       if (module_found) {
81         WriteModuleCoverage(file_path, module_name, &pcs[module_start_idx],
82                             i - module_start_idx);
83       }
84
85       last_base = module_base;
86       module_start_idx = i;
87       module_found = true;
88       __sanitizer_get_module_and_offset_for_pc(pc, module_name, kMaxPathLength,
89                                                &pcs[i]);
90     }
91   }
92
93   if (module_found) {
94     WriteModuleCoverage(file_path, module_name, &pcs[module_start_idx],
95                         len - module_start_idx);
96   }
97
98   InternalFree(file_path);
99   InternalFree(module_name);
100   InternalFree(pcs);
101
102   if (sancov_flags()->symbolize) {
103     Printf("TODO(aizatsky): call sancov to symbolize\n");
104   }
105 }
106
107 // Collects trace-pc guard coverage.
108 // This class relies on zero-initialization.
109 class TracePcGuardController {
110  public:
111   void Initialize() {
112     CHECK(!initialized);
113
114     initialized = true;
115     InitializeSancovFlags();
116
117     pc_vector.Initialize(0);
118   }
119
120   void InitTracePcGuard(u32* start, u32* end) {
121     if (!initialized) Initialize();
122     CHECK(!*start);
123     CHECK_NE(start, end);
124
125     u32 i = pc_vector.size();
126     for (u32* p = start; p < end; p++) *p = ++i;
127     pc_vector.resize(i);
128   }
129
130   void TracePcGuard(u32* guard, uptr pc) {
131     atomic_uint32_t* guard_ptr = reinterpret_cast<atomic_uint32_t*>(guard);
132     u32 idx = atomic_exchange(guard_ptr, 0, memory_order_relaxed);
133     if (!idx) return;
134     // we start indices from 1.
135     pc_vector[idx - 1] = pc;
136   }
137
138   void Dump() {
139     if (!initialized || !common_flags()->coverage) return;
140     __sanitizer_dump_coverage(pc_vector.data(), pc_vector.size());
141   }
142
143  private:
144   bool initialized;
145   InternalMmapVectorNoCtor<uptr> pc_vector;
146 };
147
148 static TracePcGuardController pc_guard_controller;
149
150 }  // namespace
151 }  // namespace __sancov
152
153 extern "C" {
154 SANITIZER_INTERFACE_ATTRIBUTE void __sanitizer_dump_coverage(  // NOLINT
155     const uptr* pcs, uptr len) {
156   return __sancov::SanitizerDumpCoverage(pcs, len);
157 }
158
159 SANITIZER_INTERFACE_ATTRIBUTE SANITIZER_WEAK_ATTRIBUTE void
160 __sanitizer_cov_trace_pc_guard(u32* guard) {
161   if (!*guard) return;
162   __sancov::pc_guard_controller.TracePcGuard(guard, GET_CALLER_PC() - 1);
163 }
164
165 SANITIZER_INTERFACE_ATTRIBUTE SANITIZER_WEAK_ATTRIBUTE void
166 __sanitizer_cov_trace_pc_guard_init(u32* start, u32* end) {
167   if (start == end || *start) return;
168   __sancov::pc_guard_controller.InitTracePcGuard(start, end);
169 }
170
171 SANITIZER_INTERFACE_ATTRIBUTE void __sanitizer_dump_trace_pc_guard_coverage() {
172   __sancov::pc_guard_controller.Dump();
173 }
174 }  // extern "C"