mirror of
https://github.com/tobast/libunwind-eh_elf.git
synced 2024-11-14 04:18:11 +01:00
5f440b4af2
Older kernels interpret the pid argument of the process information sysctls as pid only. If libunwind UPT consumer passed tid to _UPT_create, tdep_get_elf_image() returns error due to sysctls failure. Provide a slow workaround by searching for a process owning the supplied tid if sysctl returned ESRCH.
145 lines
3.6 KiB
C
145 lines
3.6 KiB
C
/* libunwind - a platform-independent unwind library
|
|
Copyright (C) 2010 Konstantin Belousov <kib@freebsd.org>
|
|
|
|
This file is part of libunwind.
|
|
|
|
Permission is hereby granted, free of charge, to any person obtaining
|
|
a copy of this software and associated documentation files (the
|
|
"Software"), to deal in the Software without restriction, including
|
|
without limitation the rights to use, copy, modify, merge, publish,
|
|
distribute, sublicense, and/or sell copies of the Software, and to
|
|
permit persons to whom the Software is furnished to do so, subject to
|
|
the following conditions:
|
|
|
|
The above copyright notice and this permission notice shall be
|
|
included in all copies or substantial portions of the Software.
|
|
|
|
THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
|
|
EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
|
|
MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
|
|
NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
|
|
LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
|
|
OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
|
|
WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. */
|
|
|
|
#include <sys/param.h>
|
|
#include <sys/types.h>
|
|
#include <sys/mman.h>
|
|
#include <sys/sysctl.h>
|
|
#include <sys/user.h>
|
|
#include <stdio.h>
|
|
#include <errno.h>
|
|
|
|
#include "libunwind_i.h"
|
|
|
|
static void *
|
|
get_mem(size_t sz)
|
|
{
|
|
void *res;
|
|
|
|
res = mmap(NULL, sz, PROT_READ | PROT_WRITE, MAP_ANON | MAP_PRIVATE, -1, 0);
|
|
if (res == MAP_FAILED)
|
|
return (NULL);
|
|
return (res);
|
|
}
|
|
|
|
static void
|
|
free_mem(void *ptr, size_t sz)
|
|
{
|
|
munmap(ptr, sz);
|
|
}
|
|
|
|
static int
|
|
get_pid_by_tid(int tid)
|
|
{
|
|
int mib[3], error;
|
|
size_t len, len1;
|
|
char *buf;
|
|
struct kinfo_proc *kv;
|
|
int i, pid;
|
|
|
|
len = 0;
|
|
mib[0] = CTL_KERN;
|
|
mib[1] = KERN_PROC;
|
|
mib[2] = KERN_PROC_ALL;
|
|
|
|
error = sysctl(mib, 3, NULL, &len, NULL, 0);
|
|
if (error == -1)
|
|
return (-1);
|
|
len1 = len * 4 / 3;
|
|
buf = get_mem(len1);
|
|
if (buf == NULL)
|
|
return (-1);
|
|
len = len1;
|
|
error = sysctl(mib, 3, buf, &len, NULL, 0);
|
|
if (error == -1) {
|
|
free_mem(buf, len1);
|
|
return (-1);
|
|
}
|
|
pid = -1;
|
|
for (i = 0, kv = (struct kinfo_proc *)buf; i < len / sizeof(*kv);
|
|
i++, kv++) {
|
|
if (kv->ki_tid == tid) {
|
|
pid = kv->ki_pid;
|
|
break;
|
|
}
|
|
}
|
|
free_mem(buf, len1);
|
|
return (pid);
|
|
}
|
|
|
|
PROTECTED int
|
|
tdep_get_elf_image (struct elf_image *ei, pid_t pid, unw_word_t ip,
|
|
unsigned long *segbase, unsigned long *mapoff, char *path, size_t pathlen)
|
|
{
|
|
int mib[4], error, ret;
|
|
size_t len, len1;
|
|
char *buf, *bp, *eb;
|
|
struct kinfo_vmentry *kv;
|
|
|
|
len = 0;
|
|
mib[0] = CTL_KERN;
|
|
mib[1] = KERN_PROC;
|
|
mib[2] = KERN_PROC_VMMAP;
|
|
mib[3] = pid;
|
|
|
|
error = sysctl(mib, 4, NULL, &len, NULL, 0);
|
|
if (error == -1) {
|
|
if (errno == ESRCH) {
|
|
mib[3] = get_pid_by_tid(pid);
|
|
if (mib[3] != -1)
|
|
error = sysctl(mib, 4, NULL, &len, NULL, 0);
|
|
if (error == -1)
|
|
return (-UNW_EUNSPEC);
|
|
} else
|
|
return (-UNW_EUNSPEC);
|
|
}
|
|
len1 = len * 4 / 3;
|
|
buf = get_mem(len1);
|
|
if (buf == NULL)
|
|
return (-UNW_EUNSPEC);
|
|
len = len1;
|
|
error = sysctl(mib, 4, buf, &len, NULL, 0);
|
|
if (error == -1) {
|
|
free_mem(buf, len1);
|
|
return (-UNW_EUNSPEC);
|
|
}
|
|
ret = -UNW_EUNSPEC;
|
|
for (bp = buf, eb = buf + len; bp < eb; bp += kv->kve_structsize) {
|
|
kv = (struct kinfo_vmentry *)(uintptr_t)bp;
|
|
if (ip < kv->kve_start || ip >= kv->kve_end)
|
|
continue;
|
|
if (kv->kve_type != KVME_TYPE_VNODE)
|
|
continue;
|
|
*segbase = kv->kve_start;
|
|
*mapoff = kv->kve_offset;
|
|
if (path)
|
|
{
|
|
strncpy(path, kv->kve_path, pathlen);
|
|
}
|
|
ret = elf_map_image (ei, kv->kve_path);
|
|
break;
|
|
}
|
|
free_mem(buf, len1);
|
|
return (ret);
|
|
}
|