| /* |
| * 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); |
| } |