From: Luc Michel <luc.michel@greensocs.com>
To: qemu-devel@nongnu.org
Cc: "Luc Michel" <luc.michel@greensocs.com>,
qemu-arm@nongnu.org, "Peter Maydell" <peter.maydell@linaro.org>,
saipava@xilinx.com, edgari@xilinx.com, alistair@alistair23.me,
"Philippe Mathieu-Daudé" <f4bug@amsat.org>,
mark.burton@greensocs.com
Subject: [Qemu-devel] [PATCH v2 03/15] gdbstub: add multiprocess support to 'H' and 'T' packets
Date: Mon, 1 Oct 2018 13:56:52 +0200 [thread overview]
Message-ID: <20181001115704.701-4-luc.michel@greensocs.com> (raw)
In-Reply-To: <20181001115704.701-1-luc.michel@greensocs.com>
Add a couple of helper functions to cope with GDB threads and processes.
The gdb_get_process() function looks for a process given a pid.
The gdb_get_cpu() function returns the CPU corresponding to the (pid,
tid) pair given as parameters.
The read_thread_id() function parses the thread-id sent by the peer.
This function supports the multiprocess extension thread-id syntax. The
return value specifies if the parsing failed, or if a special case was
encountered (all processes or all threads).
Use them in 'H' and 'T' packets handling to support the multiprocess
extension.
Signed-off-by: Luc Michel <luc.michel@greensocs.com>
---
gdbstub.c | 149 +++++++++++++++++++++++++++++++++++++++++++++++-------
1 file changed, 131 insertions(+), 18 deletions(-)
diff --git a/gdbstub.c b/gdbstub.c
index ac9d540fda..a21ce3ca18 100644
--- a/gdbstub.c
+++ b/gdbstub.c
@@ -667,10 +667,74 @@ static uint32_t gdb_get_cpu_pid(const GDBState *s, CPUState *cpu)
}
return pid + 1;
}
+static GDBProcess *gdb_get_process(const GDBState *s, uint32_t pid)
+{
+ uint32_t process_idx;
+
+ if (!pid) {
+ /* 0 means any process, we take the first one */
+ pid = 1;
+ }
+
+ /* GDB PIDs are in the range [1;n] */
+ process_idx = pid - 1;
+
+ if (process_idx >= s->process_num) {
+ return NULL;
+ }
+
+ return &s->processes[process_idx];
+}
+
+static GDBProcess *gdb_get_cpu_process(const GDBState *s, CPUState *cpu)
+{
+ return gdb_get_process(s, gdb_get_cpu_pid(s, cpu));
+}
+
+static CPUState *find_cpu(uint32_t thread_id)
+{
+ CPUState *cpu;
+
+ CPU_FOREACH(cpu) {
+ if (cpu_gdb_index(cpu) == thread_id) {
+ return cpu;
+ }
+ }
+
+ return NULL;
+}
+
+static CPUState *gdb_get_cpu(const GDBState *s, uint32_t pid, uint32_t tid)
+{
+ GDBProcess *process;
+ CPUState *cpu = find_cpu(tid);
+
+ if (!tid) {
+ /* 0 means any thread, we take the first one */
+ tid = 1;
+ }
+
+ if (cpu == NULL) {
+ return NULL;
+ }
+
+ process = gdb_get_cpu_process(s, cpu);
+
+ if (process->pid != pid) {
+ return NULL;
+ }
+
+ if (!process->attached) {
+ return NULL;
+ }
+
+ return cpu;
+}
+
static const char *get_feature_xml(const char *p, const char **newp,
CPUClass *cc)
{
size_t len;
int i;
@@ -923,23 +987,10 @@ static void gdb_set_cpu_pc(GDBState *s, target_ulong pc)
cpu_synchronize_state(cpu);
cpu_set_pc(cpu, pc);
}
-static CPUState *find_cpu(uint32_t thread_id)
-{
- CPUState *cpu;
-
- CPU_FOREACH(cpu) {
- if (cpu_gdb_index(cpu) == thread_id) {
- return cpu;
- }
- }
-
- return NULL;
-}
-
static char *gdb_fmt_thread_id(const GDBState *s, CPUState *cpu,
char *buf, size_t buf_size)
{
if (s->multiprocess) {
snprintf(buf, buf_size, "p%02x.%02x",
@@ -949,10 +1000,64 @@ static char *gdb_fmt_thread_id(const GDBState *s, CPUState *cpu,
}
return buf;
}
+typedef enum GDBThreadIdKind {
+ GDB_ONE_THREAD = 0,
+ GDB_ALL_THREADS, /* One process, all threads */
+ GDB_ALL_PROCESSES,
+ GDB_READ_THREAD_ERR
+} GDBThreadIdKind;
+
+static GDBThreadIdKind read_thread_id(const char *buf, const char **end_buf,
+ uint32_t *pid, uint32_t *tid)
+{
+ unsigned long p, t;
+ int ret;
+
+ if (*buf == 'p') {
+ buf++;
+ ret = qemu_strtoul(buf, &buf, 16, &p);
+
+ if (ret) {
+ return GDB_READ_THREAD_ERR;
+ }
+
+ /* Skip '.' */
+ buf++;
+ } else {
+ p = 1;
+ }
+
+ ret = qemu_strtoul(buf, &buf, 16, &t);
+
+ if (ret) {
+ return GDB_READ_THREAD_ERR;
+ }
+
+ *end_buf = buf;
+
+ if (p == -1) {
+ return GDB_ALL_PROCESSES;
+ }
+
+ if (pid) {
+ *pid = p;
+ }
+
+ if (t == -1) {
+ return GDB_ALL_THREADS;
+ }
+
+ if (tid) {
+ *tid = t;
+ }
+
+ return GDB_ONE_THREAD;
+}
+
static int is_query_packet(const char *p, const char *query, char separator)
{
unsigned int query_len = strlen(query);
return strncmp(p, query, query_len) == 0 &&
@@ -1057,16 +1162,18 @@ static int gdb_handle_packet(GDBState *s, const char *line_buf)
{
CPUState *cpu;
CPUClass *cc;
const char *p;
uint32_t thread;
+ uint32_t pid, tid;
int ch, reg_size, type, res;
uint8_t mem_buf[MAX_PACKET_LENGTH];
char buf[sizeof(mem_buf) + 1 /* trailing NUL */];
char thread_id[16];
uint8_t *registers;
target_ulong addr, len;
+ GDBThreadIdKind thread_kind;
trace_gdbstub_io_command(line_buf);
p = line_buf;
ch = *p++;
@@ -1270,16 +1377,22 @@ static int gdb_handle_packet(GDBState *s, const char *line_buf)
else
put_packet(s, "E22");
break;
case 'H':
type = *p++;
- thread = strtoull(p, (char **)&p, 16);
- if (thread == -1 || thread == 0) {
+
+ thread_kind = read_thread_id(p, &p, &pid, &tid);
+ if (thread_kind == GDB_READ_THREAD_ERR) {
+ put_packet(s, "E22");
+ break;
+ }
+
+ if (thread_kind != GDB_ONE_THREAD) {
put_packet(s, "OK");
break;
}
- cpu = find_cpu(thread);
+ cpu = gdb_get_cpu(s, pid, tid);
if (cpu == NULL) {
put_packet(s, "E22");
break;
}
switch (type) {
@@ -1295,12 +1408,12 @@ static int gdb_handle_packet(GDBState *s, const char *line_buf)
put_packet(s, "E22");
break;
}
break;
case 'T':
- thread = strtoull(p, (char **)&p, 16);
- cpu = find_cpu(thread);
+ read_thread_id(p, &p, &pid, &tid);
+ cpu = gdb_get_cpu(s, pid, tid);
if (cpu != NULL) {
put_packet(s, "OK");
} else {
put_packet(s, "E22");
--
2.19.0
next prev parent reply other threads:[~2018-10-01 11:57 UTC|newest]
Thread overview: 39+ messages / expand[flat|nested] mbox.gz Atom feed top
2018-10-01 11:56 [Qemu-devel] [PATCH v2 00/15] gdbstub: support for the multiprocess extension Luc Michel
2018-10-01 11:56 ` [Qemu-devel] [PATCH v2 01/15] gdbstub: introduce GDB processes Luc Michel
2018-10-01 16:15 ` Philippe Mathieu-Daudé
2018-10-01 11:56 ` [Qemu-devel] [PATCH v2 02/15] gdbstub: add multiprocess support to '?' packets Luc Michel
2018-10-01 15:20 ` Philippe Mathieu-Daudé
2018-10-01 11:56 ` Luc Michel [this message]
2018-10-01 17:07 ` [Qemu-devel] [PATCH v2 03/15] gdbstub: add multiprocess support to 'H' and 'T' packets Philippe Mathieu-Daudé
2018-10-01 11:56 ` [Qemu-devel] [PATCH v2 04/15] gdbstub: add multiprocess support to vCont packets Luc Michel
2018-10-01 17:00 ` Philippe Mathieu-Daudé
2018-10-01 11:56 ` [Qemu-devel] [PATCH v2 05/15] gdbstub: add multiprocess support to 'sC' packets Luc Michel
2018-10-04 17:33 ` Alistair Francis
2018-10-01 11:56 ` [Qemu-devel] [PATCH v2 06/15] gdbstub: add multiprocess support to (f|s)ThreadInfo and ThreadExtraInfo Luc Michel
2018-10-01 17:15 ` Philippe Mathieu-Daudé
2018-10-01 11:56 ` [Qemu-devel] [PATCH v2 07/15] gdbstub: add multiprocess support to Xfer:features:read: Luc Michel
2018-10-01 16:28 ` Philippe Mathieu-Daudé
2018-10-01 11:56 ` [Qemu-devel] [PATCH v2 08/15] gdbstub: add multiprocess support to gdb_vm_state_change() Luc Michel
2018-10-01 16:30 ` Philippe Mathieu-Daudé
2018-10-01 11:56 ` [Qemu-devel] [PATCH v2 09/15] gdbstub: add multiprocess support to 'D' packets Luc Michel
2018-10-01 11:56 ` [Qemu-devel] [PATCH v2 10/15] gdbstub: add support for extended mode packet Luc Michel
2018-10-01 16:39 ` Philippe Mathieu-Daudé
2018-10-02 9:26 ` Luc Michel
2018-10-01 11:57 ` [Qemu-devel] [PATCH v2 11/15] gdbstub: add support for vAttach packets Luc Michel
2018-10-01 16:45 ` Philippe Mathieu-Daudé
2018-10-01 11:57 ` [Qemu-devel] [PATCH v2 12/15] gdbstub: processes initialization on new peer connection Luc Michel
2018-10-04 17:42 ` Alistair Francis
2018-10-01 11:57 ` [Qemu-devel] [PATCH v2 13/15] gdbstub: gdb_set_stop_cpu: ignore request when process is not attached Luc Michel
2018-10-01 11:57 ` [Qemu-devel] [PATCH v2 14/15] gdbstub: add multiprocess extension support Luc Michel
2018-10-01 16:35 ` Philippe Mathieu-Daudé
2018-10-01 11:57 ` [Qemu-devel] [PATCH v2 15/15] arm/xlnx-zynqmp: put APUs and RPUs in separate GDB groups Luc Michel
2018-10-02 11:33 ` Philippe Mathieu-Daudé
2018-10-02 11:58 ` Peter Maydell
2018-10-03 11:44 ` Luc Michel
2018-10-04 16:07 ` Philippe Mathieu-Daudé
2018-10-04 19:52 ` Eduardo Habkost
2018-10-04 20:01 ` Peter Maydell
2018-10-04 21:53 ` Eduardo Habkost
2018-10-05 13:50 ` Philippe Mathieu-Daudé
2018-10-05 18:49 ` Eduardo Habkost
2018-10-17 17:02 ` Luc Michel
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=20181001115704.701-4-luc.michel@greensocs.com \
--to=luc.michel@greensocs.com \
--cc=alistair@alistair23.me \
--cc=edgari@xilinx.com \
--cc=f4bug@amsat.org \
--cc=mark.burton@greensocs.com \
--cc=peter.maydell@linaro.org \
--cc=qemu-arm@nongnu.org \
--cc=qemu-devel@nongnu.org \
--cc=saipava@xilinx.com \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).