1/* General utility routines for the remote server for GDB.
2   Copyright (C) 1986-2020 Free Software Foundation, Inc.
3
4   This file is part of GDB.
5
6   This program is free software; you can redistribute it and/or modify
7   it under the terms of the GNU General Public License as published by
8   the Free Software Foundation; either version 3 of the License, or
9   (at your option) any later version.
10
11   This program is distributed in the hope that it will be useful,
12   but WITHOUT ANY WARRANTY; without even the implied warranty of
13   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14   GNU General Public License for more details.
15
16   You should have received a copy of the GNU General Public License
17   along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
18
19#include "server.h"
20
21#ifdef IN_PROCESS_AGENT
22#  define PREFIX "ipa: "
23#  define TOOLNAME "GDBserver in-process agent"
24#else
25#  define PREFIX "gdbserver: "
26#  define TOOLNAME "GDBserver"
27#endif
28
29/* Generally useful subroutines used throughout the program.  */
30
31void
32malloc_failure (long size)
33{
34  fprintf (stderr,
35	   PREFIX "ran out of memory while trying to allocate %lu bytes\n",
36	   (unsigned long) size);
37  exit (1);
38}
39
40/* Print the system error message for errno, and also mention STRING
41   as the file name for which the error was encountered.
42   Then return to command level.  */
43
44void
45perror_with_name (const char *string)
46{
47  const char *err;
48  char *combined;
49
50  err = safe_strerror (errno);
51  if (err == NULL)
52    err = "unknown error";
53
54  combined = (char *) alloca (strlen (err) + strlen (string) + 3);
55  strcpy (combined, string);
56  strcat (combined, ": ");
57  strcat (combined, err);
58
59  error ("%s.", combined);
60}
61
62/* Print an error message and return to top level.  */
63
64void
65verror (const char *string, va_list args)
66{
67#ifdef IN_PROCESS_AGENT
68  fflush (stdout);
69  vfprintf (stderr, string, args);
70  fprintf (stderr, "\n");
71  exit (1);
72#else
73  throw_verror (GENERIC_ERROR, string, args);
74#endif
75}
76
77void
78vwarning (const char *string, va_list args)
79{
80  fprintf (stderr, PREFIX);
81  vfprintf (stderr, string, args);
82  fprintf (stderr, "\n");
83}
84
85/* Report a problem internal to GDBserver, and exit.  */
86
87void
88internal_verror (const char *file, int line, const char *fmt, va_list args)
89{
90  fprintf (stderr,  "\
91%s:%d: A problem internal to " TOOLNAME " has been detected.\n", file, line);
92  vfprintf (stderr, fmt, args);
93  fprintf (stderr, "\n");
94  exit (1);
95}
96
97/* Report a problem internal to GDBserver.  */
98
99void
100internal_vwarning (const char *file, int line, const char *fmt, va_list args)
101{
102  fprintf (stderr,  "\
103%s:%d: A problem internal to " TOOLNAME " has been detected.\n", file, line);
104  vfprintf (stderr, fmt, args);
105  fprintf (stderr, "\n");
106}
107
108/* Convert a CORE_ADDR into a HEX string, like %lx.
109   The result is stored in a circular static buffer, NUMCELLS deep.  */
110
111char *
112paddress (CORE_ADDR addr)
113{
114  return phex_nz (addr, sizeof (CORE_ADDR));
115}
116