1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283 |
- /*
- * 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 = 0;
- 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);
- if (!errors) {
- /*
- * 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);
- } else {
- g_free(e->dev);
- g_free(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);
- }
|