minishell/stdme/src/os/abort.c
Maix0 5d2202a0c9
Allocator V1.0
* Allocator Version 1.0
2024-05-18 15:05:28 +02:00

98 lines
2.6 KiB
C

/* ************************************************************************** */
/* */
/* ::: :::::::: */
/* abort.c :+: :+: :+: */
/* +:+ +:+ +:+ */
/* By: maiboyer <maiboyer@student.42.fr> +#+ +:+ +#+ */
/* +#+#+#+#+#+ +#+ */
/* Created: 2024/05/07 11:08:03 by maiboyer #+# #+# */
/* Updated: 2024/05/16 17:26:27 by maiboyer ### ########.fr */
/* */
/* ************************************************************************** */
#define _GNU_SOURCE
#include "me/fs/putendl_fd.h"
#include "me/fs/putstr_fd.h"
#include "me/types.h"
#include <dlfcn.h>
#include <execinfo.h>
#include <link.h>
#include <stdio.h>
#include <stdlib.h>
#ifndef BASE_PATH
# define BASE_PATH "/no_base_path_defined/"
#endif
#if defined(PRINT_BACKTRACE) || defined(BACKTRACE_DEEP) || true
# ifndef BACKTRACE_DEEP
# define BACKTRACE_DEEP 256
# endif
static size_t convert_to_vma(t_usize addr)
{
Dl_info info;
struct link_map *link_map;
dladdr1((void *)addr, &info, (void **)&link_map, RTLD_DL_LINKMAP);
return (addr - link_map->l_addr);
}
static void print_trace_inner(void **trace, t_str *messages, t_usize i)
{
char syscom[1024];
t_i32 p;
p = 0;
fprintf(stderr, "[bt] #%-4zu\t", i);
while (messages[i][p] != '(' && messages[i][p] != ' ' &&
messages[i][p] != 0)
++p;
fflush(stderr);
snprintf(
syscom, sizeof(syscom) / sizeof(syscom[0]),
"addr2line %#x -e %.*s -ipf"
"| 1>&2 rg \"^(.*) at %s(.*)\"'$' --replace '$1 at $2' --color never",
(t_u32)(convert_to_vma((t_usize)trace[i])), p, messages[i], BASE_PATH);
if (system(syscom))
fprintf(stderr, "%s\n", messages[i]);
}
void print_trace(void)
{
void *trace[BACKTRACE_DEEP];
t_str *messages;
t_i32 size;
t_i32 i;
size = backtrace(trace, BACKTRACE_DEEP);
messages = backtrace_symbols(trace, size);
i = 1;
fprintf(stderr, "[bt] Execution path:\n");
if (size >= 3)
size -= 3;
while (i < size)
print_trace_inner(trace, messages, i++);
free(messages);
}
#else
void print_trace(void)
{
}
#endif
void me_abort(t_str msg)
{
if (msg == NULL)
msg = "No message (msg was NULL)";
me_putendl_fd("Memory information:", 2);
me_putstr_fd("Abort: ", 2);
me_putendl_fd(msg, 2);
print_trace();
// me_exit(1);
abort();
}