From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from smtp.polymtl.ca (smtp.polymtl.ca [132.207.4.11]) by sourceware.org (Postfix) with ESMTPS id 7510E3858D38 for ; Wed, 8 Nov 2023 05:16:43 +0000 (GMT) DMARC-Filter: OpenDMARC Filter v1.4.2 sourceware.org 7510E3858D38 Authentication-Results: sourceware.org; dmarc=pass (p=none dis=none) header.from=polymtl.ca Authentication-Results: sourceware.org; spf=pass smtp.mailfrom=polymtl.ca ARC-Filter: OpenARC Filter v1.0.0 sourceware.org 7510E3858D38 Authentication-Results: server2.sourceware.org; arc=none smtp.remote-ip=132.207.4.11 ARC-Seal: i=1; a=rsa-sha256; d=sourceware.org; s=key; t=1699420605; cv=none; b=U3wqT2Q45ictZaCvI8USnlXRT3mbp27BmmkRMRd3YbcYynzymq4QEU07NPzraxp6+Csk7ffwWjoYxF7MPFj+QDEYZrIFsr8Wk/Q6fjiIgB+bQ+klsBG9uzakExzg+tRRcmBSbtu++dyqVsxs/Ubpb+RQ9SB7F9u4TO94XndhbpY= ARC-Message-Signature: i=1; a=rsa-sha256; d=sourceware.org; s=key; t=1699420605; c=relaxed/simple; bh=zv+OMBpXYpnjABwPhc+L2sJftNUtH7YmW8rXsBsor2Q=; h=DKIM-Signature:From:To:Subject:Date:Message-ID:MIME-Version; b=nzPVJ+h7na3IeMRPOEcP29CjAIRviE2M0Q7MXcVovHcpxs9cTk+7mVSiP87RLd99ZBFjyDV7roCeU+83NoAzvq5xsNc8aOfNmo08qp0CFgcfWdQup1kgTBqlSwiv6E8MFR6jd9BY2XpaL9I4cKriPanyphB//M4KFBS3QFhumb4= ARC-Authentication-Results: i=1; server2.sourceware.org Received: from simark.ca (simark.ca [158.69.221.121]) (authenticated bits=0) by smtp.polymtl.ca (8.14.7/8.14.7) with ESMTP id 3A85Gbxo016031 (version=TLSv1/SSLv3 cipher=ECDHE-RSA-AES256-GCM-SHA384 bits=256 verify=NOT); Wed, 8 Nov 2023 00:16:41 -0500 DKIM-Filter: OpenDKIM Filter v2.11.0 smtp.polymtl.ca 3A85Gbxo016031 DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=polymtl.ca; s=default; t=1699420601; bh=QSuZcm5VrwPux1cNP0hKqfN2+nA4l5p3RCRn21xgf1I=; h=From:To:Cc:Subject:Date:In-Reply-To:References:From; b=m+RTymLBQCWmAF6RFK+Bw8XTMvlMkOB48Pw9ma+45sHAo00nqI+yFEJWcWiPXinLe ePR+EFtBPjwCU6IeS0R38Mw/DhRdYXJL3iGZ36dXeiijuc5ShF7UNK9xNMWogK0dzY m60OMqANld44zH7k42rccMloG8+GJcei0PZaJvbg= Received: from simark.localdomain (modemcable238.237-201-24.mc.videotron.ca [24.201.237.238]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits) key-exchange X25519 server-signature ECDSA (prime256v1) server-digest SHA256) (No client certificate requested) by simark.ca (Postfix) with ESMTPSA id 13ECE1E0BB; Wed, 8 Nov 2023 00:16:37 -0500 (EST) From: Simon Marchi To: gdb-patches@sourceware.org Cc: Simon Marchi Subject: [PATCH 17/24] gdb: add gdbarch_pseudo_register_write that takes a frame Date: Wed, 8 Nov 2023 00:01:01 -0500 Message-ID: <20231108051222.1275306-18-simon.marchi@polymtl.ca> X-Mailer: git-send-email 2.42.1 In-Reply-To: <20231108051222.1275306-1-simon.marchi@polymtl.ca> References: <20231108051222.1275306-1-simon.marchi@polymtl.ca> MIME-Version: 1.0 Content-Transfer-Encoding: 8bit X-Poly-FromMTA: (simark.ca [158.69.221.121]) at Wed, 8 Nov 2023 05:16:37 +0000 X-Spam-Status: No, score=-3188.6 required=5.0 tests=BAYES_00,DKIM_SIGNED,DKIM_VALID,DKIM_VALID_AU,DKIM_VALID_EF,GIT_PATCH_0,RCVD_IN_MSPIKE_H3,RCVD_IN_MSPIKE_WL,SPF_HELO_PASS,SPF_PASS,TXREP,T_SCC_BODY_TEXT_LINE autolearn=ham autolearn_force=no version=3.4.6 X-Spam-Checker-Version: SpamAssassin 3.4.6 (2021-04-09) on server2.sourceware.org List-Id: From: Simon Marchi Add a new variant of gdbarch_pseudo_register_write that takes a frame_info in order to write raw registers. Use this new method when available: - in put_frame_register, when trying to write a pseudo register to a given frame - in regcache::cooked_write No implementation is migrated to use this new method (that will come in subsequent patches), so no behavior change is expected here. The objective is to fix writing pseudo registers to non-current frames. See previous commit "gdb: read pseudo register through frame" for a more detailed explanation. Change-Id: Ie7fe364a15a4d86c2ecb09de2b4baa08c45555ac --- gdb/frame.c | 9 +++++- gdb/gdbarch-gen.h | 15 +++++++++- gdb/gdbarch.c | 32 ++++++++++++++++++++ gdb/gdbarch_components.py | 19 ++++++++++++ gdb/regcache.c | 4 +++ gdb/value.c | 63 +++++++++++++++++++++++++++++++++++++++ gdb/value.h | 22 ++++++++++++++ 7 files changed, 162 insertions(+), 2 deletions(-) diff --git a/gdb/frame.c b/gdb/frame.c index 3035f87369ca..81836d6d5357 100644 --- a/gdb/frame.c +++ b/gdb/frame.c @@ -1452,7 +1452,14 @@ put_frame_register (frame_info_ptr next_frame, int regnum, break; } case lval_register: - get_current_regcache ()->cooked_write (realnum, buf, 1.0f); + /* Not sure if that's always true... but we have a problem if not. */ + gdb_assert (size == register_size (gdbarch, realnum)); + + if (realnum < gdbarch_num_regs (gdbarch) + || !gdbarch_pseudo_register_write_p (gdbarch)) + get_current_regcache ()->cooked_write (realnum, buf, 1.0f); + else + gdbarch_pseudo_register_write (gdbarch, next_frame, realnum, buf); break; default: error (_("Attempt to assign to an unmodifiable value.")); diff --git a/gdb/gdbarch-gen.h b/gdb/gdbarch-gen.h index 3160aa8a9613..9cf58490d0b6 100644 --- a/gdb/gdbarch-gen.h +++ b/gdb/gdbarch-gen.h @@ -200,12 +200,25 @@ typedef struct value * (gdbarch_pseudo_register_read_value_ftype) (struct gdbarc extern struct value * gdbarch_pseudo_register_read_value (struct gdbarch *gdbarch, frame_info_ptr next_frame, int cookednum); extern void set_gdbarch_pseudo_register_read_value (struct gdbarch *gdbarch, gdbarch_pseudo_register_read_value_ftype *pseudo_register_read_value); +/* Write bytes in BUF to pseudo register with number PSEUDO_REG_NUM. + + Raw registers backing the pseudo register should be written to using + NEXT_FRAME. */ + +extern bool gdbarch_pseudo_register_write_p (struct gdbarch *gdbarch); + +typedef void (gdbarch_pseudo_register_write_ftype) (struct gdbarch *gdbarch, frame_info_ptr next_frame, int pseudo_reg_num, gdb::array_view buf); +extern void gdbarch_pseudo_register_write (struct gdbarch *gdbarch, frame_info_ptr next_frame, int pseudo_reg_num, gdb::array_view buf); +extern void set_gdbarch_pseudo_register_write (struct gdbarch *gdbarch, gdbarch_pseudo_register_write_ftype *pseudo_register_write); + /* Write bytes to a pseudo register. This is marked as deprecated because it gets passed a regcache for implementations to write raw registers in. This doesn't work for unwound frames, where the raw registers backing the pseudo registers may have been - saved elsewhere. */ + saved elsewhere. + + Implementations should be migrated to implement pseudo_register_write instead. */ extern bool gdbarch_deprecated_pseudo_register_write_p (struct gdbarch *gdbarch); diff --git a/gdb/gdbarch.c b/gdb/gdbarch.c index e198d339f6ba..d584305fefb2 100644 --- a/gdb/gdbarch.c +++ b/gdb/gdbarch.c @@ -74,6 +74,7 @@ struct gdbarch gdbarch_virtual_frame_pointer_ftype *virtual_frame_pointer = legacy_virtual_frame_pointer; gdbarch_pseudo_register_read_ftype *pseudo_register_read = nullptr; gdbarch_pseudo_register_read_value_ftype *pseudo_register_read_value = nullptr; + gdbarch_pseudo_register_write_ftype *pseudo_register_write = nullptr; gdbarch_deprecated_pseudo_register_write_ftype *deprecated_pseudo_register_write = nullptr; int num_regs = -1; int num_pseudo_regs = 0; @@ -330,6 +331,7 @@ verify_gdbarch (struct gdbarch *gdbarch) /* Skip verify of virtual_frame_pointer, invalid_p == 0 */ /* Skip verify of pseudo_register_read, has predicate. */ /* Skip verify of pseudo_register_read_value, has predicate. */ + /* Skip verify of pseudo_register_write, has predicate. */ /* Skip verify of deprecated_pseudo_register_write, has predicate. */ if (gdbarch->num_regs == -1) log.puts ("\n\tnum_regs"); @@ -649,6 +651,12 @@ gdbarch_dump (struct gdbarch *gdbarch, struct ui_file *file) gdb_printf (file, "gdbarch_dump: pseudo_register_read_value = <%s>\n", host_address_to_string (gdbarch->pseudo_register_read_value)); + gdb_printf (file, + "gdbarch_dump: gdbarch_pseudo_register_write_p() = %d\n", + gdbarch_pseudo_register_write_p (gdbarch)); + gdb_printf (file, + "gdbarch_dump: pseudo_register_write = <%s>\n", + host_address_to_string (gdbarch->pseudo_register_write)); gdb_printf (file, "gdbarch_dump: gdbarch_deprecated_pseudo_register_write_p() = %d\n", gdbarch_deprecated_pseudo_register_write_p (gdbarch)); @@ -1902,6 +1910,30 @@ set_gdbarch_pseudo_register_read_value (struct gdbarch *gdbarch, gdbarch->pseudo_register_read_value = pseudo_register_read_value; } +bool +gdbarch_pseudo_register_write_p (struct gdbarch *gdbarch) +{ + gdb_assert (gdbarch != NULL); + return gdbarch->pseudo_register_write != NULL; +} + +void +gdbarch_pseudo_register_write (struct gdbarch *gdbarch, frame_info_ptr next_frame, int pseudo_reg_num, gdb::array_view buf) +{ + gdb_assert (gdbarch != NULL); + gdb_assert (gdbarch->pseudo_register_write != NULL); + if (gdbarch_debug >= 2) + gdb_printf (gdb_stdlog, "gdbarch_pseudo_register_write called\n"); + gdbarch->pseudo_register_write (gdbarch, next_frame, pseudo_reg_num, buf); +} + +void +set_gdbarch_pseudo_register_write (struct gdbarch *gdbarch, + gdbarch_pseudo_register_write_ftype pseudo_register_write) +{ + gdbarch->pseudo_register_write = pseudo_register_write; +} + bool gdbarch_deprecated_pseudo_register_write_p (struct gdbarch *gdbarch) { diff --git a/gdb/gdbarch_components.py b/gdb/gdbarch_components.py index 1100da160550..ce8169b19a57 100644 --- a/gdb/gdbarch_components.py +++ b/gdb/gdbarch_components.py @@ -418,6 +418,23 @@ never be called. predicate=True, ) +Method( + comment=""" +Write bytes in BUF to pseudo register with number PSEUDO_REG_NUM. + +Raw registers backing the pseudo register should be written to using +NEXT_FRAME. +""", + type="void", + name="pseudo_register_write", + params=[ + ("frame_info_ptr", "next_frame"), + ("int", "pseudo_reg_num"), + ("gdb::array_view", "buf"), + ], + predicate=True, +) + Method( comment=""" Write bytes to a pseudo register. @@ -426,6 +443,8 @@ This is marked as deprecated because it gets passed a regcache for implementations to write raw registers in. This doesn't work for unwound frames, where the raw registers backing the pseudo registers may have been saved elsewhere. + +Implementations should be migrated to implement pseudo_register_write instead. """, type="void", name="deprecated_pseudo_register_write", diff --git a/gdb/regcache.c b/gdb/regcache.c index dadc949434ee..16b117e767be 100644 --- a/gdb/regcache.c +++ b/gdb/regcache.c @@ -929,6 +929,10 @@ regcache::cooked_write (int regnum, gdb::array_view src, float) if (regnum < num_raw_registers ()) raw_write (regnum, src, 1.0f); + else if (gdbarch_pseudo_register_write_p (m_descr->gdbarch)) + gdbarch_pseudo_register_write + (m_descr->gdbarch, get_next_frame_sentinel_okay (get_current_frame ()), + regnum, src); else gdbarch_deprecated_pseudo_register_write (m_descr->gdbarch, this, regnum, src.data ()); diff --git a/gdb/value.c b/gdb/value.c index 27a79dc62fc1..51dca972a587 100644 --- a/gdb/value.c +++ b/gdb/value.c @@ -4057,6 +4057,22 @@ pseudo_from_raw_part (frame_info_ptr next_frame, int pseudo_reg_num, /* See value.h. */ +void +pseudo_to_raw_part (frame_info_ptr next_frame, + gdb::array_view pseudo_buf, + int raw_reg_num, int raw_offset) +{ + int raw_reg_size = register_size (get_frame_arch (next_frame), raw_reg_num); + + /* When overflowing a register, put_frame_register_bytes writes to the + subsequent registers. We don't want that behavior here, so make sure + the write is wholly within register RAW_REG_NUM. */ + gdb_assert (raw_offset + pseudo_buf.size () <= raw_reg_size); + put_frame_register_bytes (next_frame, raw_reg_num, raw_offset, pseudo_buf); +} + +/* See value.h. */ + value * pseudo_from_concat_raw (frame_info_ptr next_frame, int pseudo_reg_num, int raw_reg_1_num, int raw_reg_2_num) @@ -4080,6 +4096,27 @@ pseudo_from_concat_raw (frame_info_ptr next_frame, int pseudo_reg_num, return pseudo_reg_val; } +void +pseudo_to_concat_raw (frame_info_ptr next_frame, + gdb::array_view pseudo_buf, + int raw_reg_1_num, int raw_reg_2_num) +{ + int src_offset = 0; + gdbarch *arch = frame_unwind_arch (next_frame); + + int raw_reg_1_size = register_size (arch, raw_reg_1_num); + put_frame_register_bytes (next_frame, raw_reg_1_num, 0, + pseudo_buf.slice (src_offset, raw_reg_1_size)); + src_offset += raw_reg_1_size; + + int raw_reg_2_size = register_size (arch, raw_reg_2_num); + put_frame_register_bytes (next_frame, raw_reg_2_num, 0, + pseudo_buf.slice (src_offset, raw_reg_2_size)); + src_offset += raw_reg_2_size; + + gdb_assert (src_offset == pseudo_buf.size ()); +} + /* See value.h. */ value * @@ -4111,6 +4148,32 @@ pseudo_from_concat_raw (frame_info_ptr next_frame, int pseudo_reg_num, return pseudo_reg_val; } +void +pseudo_to_concat_raw (frame_info_ptr next_frame, + gdb::array_view pseudo_buf, + int raw_reg_1_num, int raw_reg_2_num, int raw_reg_3_num) +{ + int src_offset = 0; + gdbarch *arch = frame_unwind_arch (next_frame); + + int raw_reg_1_size = register_size (arch, raw_reg_1_num); + put_frame_register_bytes (next_frame, raw_reg_1_num, 0, + pseudo_buf.slice (src_offset, raw_reg_1_size)); + src_offset += raw_reg_1_size; + + int raw_reg_2_size = register_size (arch, raw_reg_2_num); + put_frame_register_bytes (next_frame, raw_reg_2_num, 0, + pseudo_buf.slice (src_offset, raw_reg_2_size)); + src_offset += raw_reg_2_size; + + int raw_reg_3_size = register_size (arch, raw_reg_3_num); + put_frame_register_bytes (next_frame, raw_reg_3_num, 0, + pseudo_buf.slice (src_offset, raw_reg_3_size)); + src_offset += raw_reg_3_size; + + gdb_assert (src_offset == pseudo_buf.size ()); +} + /* Implementation of the convenience function $_isvoid. */ static struct value * diff --git a/gdb/value.h b/gdb/value.h index b5c097ad58bf..6a74d4e2c2ee 100644 --- a/gdb/value.h +++ b/gdb/value.h @@ -1661,6 +1661,13 @@ struct scoped_array_length_limiting value *pseudo_from_raw_part (frame_info_ptr next_frame, int pseudo_reg_num, int raw_reg_num, int raw_offset); +/* Write PSEUDO_BUF, the contents of a pseudo register, to part of raw register + RAW_REG_NUM starting at RAW_OFFSET. */ + +void pseudo_to_raw_part (frame_info_ptr this_frame, + gdb::array_view pseudo_buf, + int raw_reg_num, int raw_offset); + /* Create a value for pseudo register PSEUDO_REG_NUM by concatenating raw registers RAW_REG_1_NUM and RAW_REG_2_NUM. @@ -1670,10 +1677,25 @@ value *pseudo_from_raw_part (frame_info_ptr next_frame, int pseudo_reg_num, value *pseudo_from_concat_raw (frame_info_ptr next_frame, int pseudo_reg_num, int raw_reg_1_num, int raw_reg_2_num); +/* Write PSEUDO_BUF, the contents of a pseudo register, to the two raw registers + RAW_REG_1_NUM and RAW_REG_2_NUM. */ + +void pseudo_to_concat_raw (frame_info_ptr this_frame, + gdb::array_view pseudo_buf, + int raw_reg_1_num, int raw_reg_2_num); + /* Same as the above, but with three raw registers. */ value *pseudo_from_concat_raw (frame_info_ptr next_frame, int pseudo_reg_num, int raw_reg_1_num, int raw_reg_2_num, int raw_reg_3_num); +/* Write PSEUDO_BUF, the contents of a pseudo register, to the tthreewo raw + registers RAW_REG_1_NUM, RAW_REG_2_NUM and RAW_REG_3_NUM. */ + +void pseudo_to_concat_raw (frame_info_ptr this_frame, + gdb::array_view pseudo_buf, + int raw_reg_1_num, int raw_reg_2_num, + int raw_reg_3_num); + #endif /* !defined (VALUE_H) */ -- 2.42.1