mirror of
https://github.com/autc04/Retro68.git
synced 2024-09-07 13:54:33 +00:00
183 lines
5.6 KiB
C++
183 lines
5.6 KiB
C++
|
//===-- sanitizer_symbolizer_mac.cc ---------------------------------------===//
|
||
|
//
|
||
|
// This file is distributed under the University of Illinois Open Source
|
||
|
// License. See LICENSE.TXT for details.
|
||
|
//
|
||
|
//===----------------------------------------------------------------------===//
|
||
|
//
|
||
|
// This file is shared between various sanitizers' runtime libraries.
|
||
|
//
|
||
|
// Implementation of Mac-specific "atos" symbolizer.
|
||
|
//===----------------------------------------------------------------------===//
|
||
|
|
||
|
#include "sanitizer_platform.h"
|
||
|
#if SANITIZER_MAC
|
||
|
|
||
|
#include "sanitizer_allocator_internal.h"
|
||
|
#include "sanitizer_mac.h"
|
||
|
#include "sanitizer_symbolizer_mac.h"
|
||
|
|
||
|
namespace __sanitizer {
|
||
|
|
||
|
#include <dlfcn.h>
|
||
|
#include <errno.h>
|
||
|
#include <stdlib.h>
|
||
|
#include <sys/wait.h>
|
||
|
#include <unistd.h>
|
||
|
#include <util.h>
|
||
|
|
||
|
bool DlAddrSymbolizer::SymbolizePC(uptr addr, SymbolizedStack *stack) {
|
||
|
Dl_info info;
|
||
|
int result = dladdr((const void *)addr, &info);
|
||
|
if (!result) return false;
|
||
|
const char *demangled = DemangleCXXABI(info.dli_sname);
|
||
|
stack->info.function = internal_strdup(demangled);
|
||
|
return true;
|
||
|
}
|
||
|
|
||
|
bool DlAddrSymbolizer::SymbolizeData(uptr addr, DataInfo *datainfo) {
|
||
|
Dl_info info;
|
||
|
int result = dladdr((const void *)addr, &info);
|
||
|
if (!result) return false;
|
||
|
const char *demangled = DemangleCXXABI(info.dli_sname);
|
||
|
datainfo->name = internal_strdup(demangled);
|
||
|
datainfo->start = (uptr)info.dli_saddr;
|
||
|
return true;
|
||
|
}
|
||
|
|
||
|
class AtosSymbolizerProcess : public SymbolizerProcess {
|
||
|
public:
|
||
|
explicit AtosSymbolizerProcess(const char *path, pid_t parent_pid)
|
||
|
: SymbolizerProcess(path, /*use_forkpty*/ true) {
|
||
|
// Put the string command line argument in the object so that it outlives
|
||
|
// the call to GetArgV.
|
||
|
internal_snprintf(pid_str_, sizeof(pid_str_), "%d", parent_pid);
|
||
|
}
|
||
|
|
||
|
private:
|
||
|
bool ReachedEndOfOutput(const char *buffer, uptr length) const override {
|
||
|
return (length >= 1 && buffer[length - 1] == '\n');
|
||
|
}
|
||
|
|
||
|
void GetArgV(const char *path_to_binary,
|
||
|
const char *(&argv)[kArgVMax]) const override {
|
||
|
int i = 0;
|
||
|
argv[i++] = path_to_binary;
|
||
|
argv[i++] = "-p";
|
||
|
argv[i++] = &pid_str_[0];
|
||
|
if (GetMacosVersion() == MACOS_VERSION_MAVERICKS) {
|
||
|
// On Mavericks atos prints a deprecation warning which we suppress by
|
||
|
// passing -d. The warning isn't present on other OSX versions, even the
|
||
|
// newer ones.
|
||
|
argv[i++] = "-d";
|
||
|
}
|
||
|
argv[i++] = nullptr;
|
||
|
}
|
||
|
|
||
|
char pid_str_[16];
|
||
|
};
|
||
|
|
||
|
static const char *kAtosErrorMessages[] = {
|
||
|
"atos cannot examine process",
|
||
|
"unable to get permission to examine process",
|
||
|
"An admin user name and password is required",
|
||
|
"could not load inserted library",
|
||
|
"architecture mismatch between analysis process",
|
||
|
};
|
||
|
|
||
|
static bool IsAtosErrorMessage(const char *str) {
|
||
|
for (uptr i = 0; i < ARRAY_SIZE(kAtosErrorMessages); i++) {
|
||
|
if (internal_strstr(str, kAtosErrorMessages[i])) {
|
||
|
return true;
|
||
|
}
|
||
|
}
|
||
|
return false;
|
||
|
}
|
||
|
|
||
|
static bool ParseCommandOutput(const char *str, uptr addr, char **out_name,
|
||
|
char **out_module, char **out_file, uptr *line,
|
||
|
uptr *start_address) {
|
||
|
// Trim ending newlines.
|
||
|
char *trim;
|
||
|
ExtractTokenUpToDelimiter(str, "\n", &trim);
|
||
|
|
||
|
// The line from `atos` is in one of these formats:
|
||
|
// myfunction (in library.dylib) (sourcefile.c:17)
|
||
|
// myfunction (in library.dylib) + 0x1fe
|
||
|
// myfunction (in library.dylib) + 15
|
||
|
// 0xdeadbeef (in library.dylib) + 0x1fe
|
||
|
// 0xdeadbeef (in library.dylib) + 15
|
||
|
// 0xdeadbeef (in library.dylib)
|
||
|
// 0xdeadbeef
|
||
|
|
||
|
if (IsAtosErrorMessage(trim)) {
|
||
|
Report("atos returned an error: %s\n", trim);
|
||
|
InternalFree(trim);
|
||
|
return false;
|
||
|
}
|
||
|
|
||
|
const char *rest = trim;
|
||
|
char *symbol_name;
|
||
|
rest = ExtractTokenUpToDelimiter(rest, " (in ", &symbol_name);
|
||
|
if (internal_strncmp(symbol_name, "0x", 2) != 0)
|
||
|
*out_name = symbol_name;
|
||
|
else
|
||
|
InternalFree(symbol_name);
|
||
|
rest = ExtractTokenUpToDelimiter(rest, ") ", out_module);
|
||
|
|
||
|
if (rest[0] == '(') {
|
||
|
if (out_file) {
|
||
|
rest++;
|
||
|
rest = ExtractTokenUpToDelimiter(rest, ":", out_file);
|
||
|
char *extracted_line_number;
|
||
|
rest = ExtractTokenUpToDelimiter(rest, ")", &extracted_line_number);
|
||
|
if (line) *line = (uptr)internal_atoll(extracted_line_number);
|
||
|
InternalFree(extracted_line_number);
|
||
|
}
|
||
|
} else if (rest[0] == '+') {
|
||
|
rest += 2;
|
||
|
uptr offset = internal_atoll(rest);
|
||
|
if (start_address) *start_address = addr - offset;
|
||
|
}
|
||
|
|
||
|
InternalFree(trim);
|
||
|
return true;
|
||
|
}
|
||
|
|
||
|
AtosSymbolizer::AtosSymbolizer(const char *path, LowLevelAllocator *allocator)
|
||
|
: process_(new(*allocator) AtosSymbolizerProcess(path, getpid())) {}
|
||
|
|
||
|
bool AtosSymbolizer::SymbolizePC(uptr addr, SymbolizedStack *stack) {
|
||
|
if (!process_) return false;
|
||
|
char command[32];
|
||
|
internal_snprintf(command, sizeof(command), "0x%zx\n", addr);
|
||
|
const char *buf = process_->SendCommand(command);
|
||
|
if (!buf) return false;
|
||
|
uptr line;
|
||
|
if (!ParseCommandOutput(buf, addr, &stack->info.function, &stack->info.module,
|
||
|
&stack->info.file, &line, nullptr)) {
|
||
|
process_ = nullptr;
|
||
|
return false;
|
||
|
}
|
||
|
stack->info.line = (int)line;
|
||
|
return true;
|
||
|
}
|
||
|
|
||
|
bool AtosSymbolizer::SymbolizeData(uptr addr, DataInfo *info) {
|
||
|
if (!process_) return false;
|
||
|
char command[32];
|
||
|
internal_snprintf(command, sizeof(command), "0x%zx\n", addr);
|
||
|
const char *buf = process_->SendCommand(command);
|
||
|
if (!buf) return false;
|
||
|
if (!ParseCommandOutput(buf, addr, &info->name, &info->module, nullptr,
|
||
|
nullptr, &info->start)) {
|
||
|
process_ = nullptr;
|
||
|
return false;
|
||
|
}
|
||
|
return true;
|
||
|
}
|
||
|
|
||
|
} // namespace __sanitizer
|
||
|
|
||
|
#endif // SANITIZER_MAC
|