/
githubmirror
/
glibc
Обзор
Документация
Войти
/
githubmirror
/
glibc
Код
Запросы
0
Пакеты
0
Релизы
0
Аналитика
Безопасность
glibc-2.37
debug/pcprofiledump.c
230 строк
6 KB
Joseph Myers
Update copyright dates not handled by scripts/update-copyrights
07 янв 2023, 00:45
07 янв 2023, 00:45
ae612c4
Код
Авторство
О чём код?
/* Dump information generated by PC profiling. Copyright (C) 1999-2023 Free Software Foundation, Inc. This file is part of the GNU C Library. The GNU C Library is free software; you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. The GNU C Library is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with the GNU C Library; if not, see <https://www.gnu.org/licenses/>. */ /* This is mainly an example. It shows how programs which want to use the information should read the file. */ #ifdef HAVE_CONFIG_H # include <config.h> #endif #include <argp.h> #include <byteswap.h> #include <errno.h> #include <error.h> #include <fcntl.h> #include <inttypes.h> #include <libintl.h> #include <stdlib.h> #include <string.h> #include <unistd.h> #include <stdint.h> #include "../version.h" #define PACKAGE _libc_intl_domainname #ifndef _ # define _(Str) gettext (Str) #endif #ifndef N_ # define N_(Str) Str #endif /* Definitions of arguments for argp functions. */ static const struct argp_option options[] = { { "unbuffered", 'u', NULL, 0, N_("Don't buffer output") }, { NULL, 0, NULL, 0, NULL } }; /* Short description of program. */ static const char doc[] = N_("Dump information generated by PC profiling."); /* Strings for arguments in help texts. */ static const char args_doc[] = N_("[FILE]"); /* Function to print some extra text in the help message. */ static char *more_help (int key, const char *text, void *input); /* Prototype for option handler. */ static error_t parse_opt (int key, char *arg, struct argp_state *state); /* Name and version of program. */ static void print_version (FILE *stream, struct argp_state *state); void (*argp_program_version_hook) (FILE *, struct argp_state *) = print_version; /* Data structure to communicate with argp functions. */ static struct argp argp = { options, parse_opt, args_doc, doc, NULL, more_help }; int main (int argc, char *argv[]) { /* Set locale via LC_ALL. */ setlocale (LC_ALL, ""); /* Set the text message domain. */ textdomain (PACKAGE); /* Parse and process arguments. */ int remaining; argp_parse (&argp, argc, argv, 0, &remaining, NULL); int fd; if (remaining == argc) fd = STDIN_FILENO; else if (remaining + 1 != argc) { argp_help (&argp, stdout, ARGP_HELP_SEE | ARGP_HELP_EXIT_ERR, program_invocation_short_name); exit (1); } else { /* Open the given file. */ fd = open (argv[remaining], O_RDONLY); if (fd == -1) error (EXIT_FAILURE, errno, _("cannot open input file")); } /* Read the first 4-byte word. It contains the information about the word size and the endianess. */ uint32_t word; if (TEMP_FAILURE_RETRY (read (fd, &word, 4)) != 4) error (EXIT_FAILURE, errno, _("cannot read header")); /* Check whether we have to swap the byte order. */ int must_swap = (word & 0x0fffffff) == bswap_32 (0xdeb00000); if (must_swap) word = bswap_32 (word); /* We have two loops, one for 32 bit pointers, one for 64 bit pointers. */ if (word == 0xdeb00004) { union { uint32_t ptrs[2]; char bytes[8]; } pair; while (1) { size_t len = sizeof (pair); size_t n; while (len > 0 && (n = TEMP_FAILURE_RETRY (read (fd, &pair.bytes[8 - len], len))) != 0) len -= n; if (len != 0) /* Nothing to read. */ break; printf ("this = %#010" PRIx32 ", caller = %#010" PRIx32 "\n", must_swap ? bswap_32 (pair.ptrs[0]) : pair.ptrs[0], must_swap ? bswap_32 (pair.ptrs[1]) : pair.ptrs[1]); } } else if (word == 0xdeb00008) { union { uint64_t ptrs[2]; char bytes[16]; } pair; while (1) { size_t len = sizeof (pair); size_t n; while (len > 0 && (n = TEMP_FAILURE_RETRY (read (fd, &pair.bytes[8 - len], len))) != 0) len -= n; if (len != 0) /* Nothing to read. */ break; printf ("this = %#018" PRIx64 ", caller = %#018" PRIx64 "\n", must_swap ? bswap_64 (pair.ptrs[0]) : pair.ptrs[0], must_swap ? bswap_64 (pair.ptrs[1]) : pair.ptrs[1]); } } else /* This should not happen. */ error (EXIT_FAILURE, 0, _("invalid pointer size")); /* Clean up. */ close (fd); return 0; } static error_t parse_opt (int key, char *arg, struct argp_state *state) { switch (key) { case 'u': setbuf (stdout, NULL); break; default: return ARGP_ERR_UNKNOWN; } return 0; } static char * more_help (int key, const char *text, void *input) { char *tp = NULL; switch (key) { case ARGP_KEY_HELP_EXTRA: /* We print some extra information. */ if (asprintf (&tp, gettext ("\ For bug reporting instructions, please see:\n\ %s.\n"), REPORT_BUGS_TO) < 0) return NULL; return tp; default: break; } return (char *) text; } /* Print the version information. */ static void print_version (FILE *stream, struct argp_state *state) { fprintf (stream, "pcprofiledump %s%s\n", PKGVERSION, VERSION); fprintf (stream, gettext ("\ Copyright (C) %s Free Software Foundation, Inc.\n\ This is free software; see the source for copying conditions. There is NO\n\ warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.\n\ "), "2023"); fprintf (stream, gettext ("Written by %s.\n"), "Ulrich Drepper"); }