78 lines
2.1 KiB
C
78 lines
2.1 KiB
C
/*
|
|
* Utility function to get QEMU's own process map
|
|
*
|
|
* Copyright (c) 2020 Linaro Ltd
|
|
*
|
|
* SPDX-License-Identifier: GPL-2.0-or-later
|
|
*/
|
|
|
|
#include "qemu/osdep.h"
|
|
#include "qemu/cutils.h"
|
|
#include "qemu/selfmap.h"
|
|
|
|
GSList *read_self_maps(void)
|
|
{
|
|
gchar *maps;
|
|
GSList *map_info = NULL;
|
|
|
|
if (g_file_get_contents("/proc/self/maps", &maps, NULL, NULL)) {
|
|
gchar **lines = g_strsplit(maps, "\n", 0);
|
|
int i, entries = g_strv_length(lines);
|
|
|
|
for (i = 0; i < entries; i++) {
|
|
gchar **fields = g_strsplit(lines[i], " ", 6);
|
|
if (g_strv_length(fields) > 4) {
|
|
MapInfo *e = g_new0(MapInfo, 1);
|
|
int errors;
|
|
const char *end;
|
|
|
|
errors = qemu_strtoul(fields[0], &end, 16, &e->start);
|
|
errors += qemu_strtoul(end + 1, NULL, 16, &e->end);
|
|
|
|
e->is_read = fields[1][0] == 'r';
|
|
e->is_write = fields[1][1] == 'w';
|
|
e->is_exec = fields[1][2] == 'x';
|
|
e->is_priv = fields[1][3] == 'p';
|
|
|
|
errors += qemu_strtoul(fields[2], NULL, 16, &e->offset);
|
|
e->dev = g_strdup(fields[3]);
|
|
errors += qemu_strtou64(fields[4], NULL, 10, &e->inode);
|
|
|
|
/*
|
|
* The last field may have leading spaces which we
|
|
* need to strip.
|
|
*/
|
|
if (g_strv_length(fields) == 6) {
|
|
e->path = g_strdup(g_strchug(fields[5]));
|
|
}
|
|
map_info = g_slist_prepend(map_info, e);
|
|
}
|
|
|
|
g_strfreev(fields);
|
|
}
|
|
g_strfreev(lines);
|
|
g_free(maps);
|
|
}
|
|
|
|
/* ensure the map data is in the same order we collected it */
|
|
return g_slist_reverse(map_info);
|
|
}
|
|
|
|
/**
|
|
* free_self_maps:
|
|
* @info: a GSlist
|
|
*
|
|
* Free a list of MapInfo structures.
|
|
*/
|
|
static void free_info(gpointer data)
|
|
{
|
|
MapInfo *e = (MapInfo *) data;
|
|
g_free(e->dev);
|
|
g_free(e->path);
|
|
g_free(e);
|
|
}
|
|
|
|
void free_self_maps(GSList *info)
|
|
{
|
|
g_slist_free_full(info, &free_info);
|
|
}
|