testsuite, threads: fix LD_LIBRARY_PATH in 'tls-sepdebug.exp'
[binutils-gdb.git] / gdb / target-connection.c
blobd9a529ae9bb3d979c4d4ce177efc666aefa1ced5
1 /* List of target connections for GDB.
3 Copyright (C) 2017-2024 Free Software Foundation, Inc.
5 This file is part of GDB.
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 3 of the License, or
10 (at your option) any later version.
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with this program. If not, see <http://www.gnu.org/licenses/>. */
20 #include "target-connection.h"
22 #include <map>
24 #include "inferior.h"
25 #include "target.h"
26 #include "observable.h"
28 /* A map between connection number and representative process_stratum
29 target. */
30 static std::map<int, process_stratum_target *> process_targets;
32 /* The highest connection number ever given to a target. */
33 static int highest_target_connection_num;
35 /* See target-connection.h. */
37 void
38 connection_list_add (process_stratum_target *t)
40 if (t->connection_number == 0)
42 t->connection_number = ++highest_target_connection_num;
43 process_targets[t->connection_number] = t;
47 /* See target-connection.h. */
49 void
50 connection_list_remove (process_stratum_target *t)
52 /* Notify about the connection being removed before we reset the
53 connection number to zero. */
54 gdb::observers::connection_removed.notify (t);
55 process_targets.erase (t->connection_number);
56 t->connection_number = 0;
59 /* See target-connection.h. */
61 std::string
62 make_target_connection_string (process_stratum_target *t)
64 if (t->connection_string () != NULL)
65 return string_printf ("%s %s", t->shortname (),
66 t->connection_string ());
67 else
68 return t->shortname ();
71 /* Prints the list of target connections and their details on UIOUT.
73 If REQUESTED_CONNECTIONS is not NULL, it's a list of GDB ids of the
74 target connections that should be printed. Otherwise, all target
75 connections are printed. */
77 static void
78 print_connection (struct ui_out *uiout, const char *requested_connections)
80 int count = 0;
81 size_t what_len = 0;
83 /* Compute number of lines we will print. */
84 for (const auto &it : process_targets)
86 if (!number_is_in_list (requested_connections, it.first))
87 continue;
89 ++count;
91 process_stratum_target *t = it.second;
93 size_t l = make_target_connection_string (t).length ();
94 if (l > what_len)
95 what_len = l;
98 if (count == 0)
100 uiout->message (_("No connections.\n"));
101 return;
104 ui_out_emit_table table_emitter (uiout, 4, process_targets.size (),
105 "connections");
107 uiout->table_header (1, ui_left, "current", "");
108 uiout->table_header (4, ui_left, "number", "Num");
109 /* The text in the "what" column may include spaces. Add one extra
110 space to visually separate the What and Description columns a
111 little better. Compare:
112 "* 1 remote :9999 Remote serial target in gdb-specific protocol"
113 "* 1 remote :9999 Remote serial target in gdb-specific protocol"
115 uiout->table_header (what_len + 1, ui_left, "what", "What");
116 uiout->table_header (17, ui_left, "description", "Description");
118 uiout->table_body ();
120 for (const auto &it : process_targets)
122 process_stratum_target *t = it.second;
124 if (!number_is_in_list (requested_connections, t->connection_number))
125 continue;
127 ui_out_emit_tuple tuple_emitter (uiout, NULL);
129 if (current_inferior ()->process_target () == t)
130 uiout->field_string ("current", "*");
131 else
132 uiout->field_skip ("current");
134 uiout->field_signed ("number", t->connection_number);
136 uiout->field_string ("what", make_target_connection_string (t));
138 uiout->field_string ("description", t->longname ());
140 uiout->text ("\n");
144 /* The "info connections" command. */
146 static void
147 info_connections_command (const char *args, int from_tty)
149 print_connection (current_uiout, args);
152 void _initialize_target_connection ();
154 void
155 _initialize_target_connection ()
157 add_info ("connections", info_connections_command,
158 _("\
159 Target connections in use.\n\
160 Shows the list of target connections currently in use."));