Blob: backtrace.c

Blob id: 50f71e88adf5b7234d178cb70bb1c668ecba0038

Size: 2.6 KB

  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
 70
 71
 72
 73
 74
 75
 76
 77
 78
 79
 80
 81
 82
 83
 84
 85
 86
 87
 88
 89
 90
 91
 92
 93
 94
 95
 96
 97
 98
 99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
// SPDX-License-Identifier: GPL-2.0-or-later
/*
 *
 *  BlueZ - Bluetooth protocol stack for Linux
 *
 *  Copyright (C) 2004-2010  Marcel Holtmann <marcel@holtmann.org>
 *
 *
 */

#ifdef HAVE_CONFIG_H
#include <config.h>
#endif

#include <unistd.h>
#include <inttypes.h>

#ifdef HAVE_BACKTRACE_SUPPORT
#include <execinfo.h>
#include <elfutils/libdwfl.h>
#endif

#include "src/log.h"
#include "src/backtrace.h"

void btd_backtrace_init(void)
{
#ifdef HAVE_BACKTRACE_SUPPORT
	void *frames[1];

	/*
	 * initialize the backtracer, since the ctor calls dlopen(), which
	 * calls malloc(), which isn't signal-safe.
	 */
	backtrace(frames, 1);
#endif
}

void btd_backtrace(uint16_t index)
{
#ifdef HAVE_BACKTRACE_SUPPORT
	char *debuginfo_path = NULL;
	const Dwfl_Callbacks callbacks = {
		.find_debuginfo = dwfl_standard_find_debuginfo,
		.find_elf = dwfl_linux_proc_find_elf,
		.debuginfo_path = &debuginfo_path,
	};
	Dwfl *dwfl;
	void *frames[48];
	int n, n_ptrs;

	dwfl = dwfl_begin(&callbacks);

	if (dwfl_linux_proc_report(dwfl, getpid()))
		goto done;

	dwfl_report_end(dwfl, NULL, NULL);

	n_ptrs = backtrace(frames, 48);
	if (n_ptrs < 1)
		goto done;

	btd_error(index, "++++++++ backtrace ++++++++");

	for (n = 1; n < n_ptrs; n++) {
		GElf_Addr addr = (uintptr_t) frames[n];
		GElf_Sym sym;
		GElf_Word shndx;
		Dwfl_Module *module = dwfl_addrmodule(dwfl, addr);
		Dwfl_Line *line;
		const char *name, *modname;

		if (!module) {
			btd_error(index, "#%-2u ?? [%#" PRIx64 "]", n, addr);
			continue;
		}

		name = dwfl_module_addrsym(module, addr, &sym, &shndx);
		if (!name) {
			modname = dwfl_module_info(module, NULL, NULL, NULL,
							NULL, NULL, NULL, NULL);
			btd_error(index, "#%-2u ?? (%s) [%#" PRIx64 "]",
							n, modname, addr);
			continue;
		}

		line = dwfl_module_getsrc(module, addr);
		if (line) {
			int lineno;
			const char *src = dwfl_lineinfo(line, NULL, &lineno,
							NULL, NULL, NULL);

			if (src) {
				btd_error(index, "#%-2u %s+%#" PRIx64 " "
						"(%s:%d) [%#" PRIx64 "]",
						n, name, addr - sym.st_value,
							src, lineno, addr);
				continue;
			}
		}

		modname = dwfl_module_info(module, NULL, NULL, NULL,
						NULL, NULL, NULL, NULL);
		btd_error(index, "#%-2u %s+%#" PRIx64 " (%s) [%#" PRIx64 "]",
						n, name, addr - sym.st_value,
								modname, addr);
	}

	btd_error(index, "+++++++++++++++++++++++++++");

done:
	dwfl_end(dwfl);
#endif
}

void btd_assertion_message_expr(const char *file, int line,
					const char *func, const char *expr)
{
	btd_error(0xffff, "Assertion failed: (%s) %s:%d in %s",
						expr, file, line, func);
	btd_backtrace(0xffff);
}