From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from us-smtp-delivery-124.mimecast.com (us-smtp-delivery-124.mimecast.com [170.10.133.124]) by sourceware.org (Postfix) with ESMTPS id 65FB43858291 for ; Wed, 21 Jun 2023 10:46:05 +0000 (GMT) DMARC-Filter: OpenDMARC Filter v1.4.2 sourceware.org 65FB43858291 Authentication-Results: sourceware.org; dmarc=pass (p=none dis=none) header.from=redhat.com Authentication-Results: sourceware.org; spf=pass smtp.mailfrom=redhat.com DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=redhat.com; s=mimecast20190719; t=1687344365; h=from:from:reply-to:subject:subject:date:date:message-id:message-id: to:to:cc:cc:mime-version:mime-version:content-type:content-type: content-transfer-encoding:content-transfer-encoding: in-reply-to:in-reply-to:references:references; bh=wUcrVpqfMkxow53+uI+S8XPqZ02XkikXvp8NZOWjdhE=; b=G0dgel7gG3ttvNm4HfwJ/0kjMUPSTyfMyCVyx5r7lh0tCF/hakv7vjcid8O4ZgBUoEqxpU HvsCFVKs3nJbArfyMaH83i6ktMErap0wiTCUU/l37qwO1HY5kO8H+sCisSDuTBAZzRnUKf IxQdb9QgNbkb0Z9Fe/N+qdtNHy7DRiE= Received: from mimecast-mx02.redhat.com (mx3-rdu2.redhat.com [66.187.233.73]) by relay.mimecast.com with ESMTP with STARTTLS (version=TLSv1.2, cipher=TLS_ECDHE_RSA_WITH_AES_256_GCM_SHA384) id us-mta-630-QwSbno8INSiKcZUqYCwA7g-1; Wed, 21 Jun 2023 06:46:02 -0400 X-MC-Unique: QwSbno8INSiKcZUqYCwA7g-1 Received: from smtp.corp.redhat.com (int-mx10.intmail.prod.int.rdu2.redhat.com [10.11.54.10]) (using TLSv1.2 with cipher AECDH-AES256-SHA (256/256 bits)) (No client certificate requested) by mimecast-mx02.redhat.com (Postfix) with ESMTPS id 9C0AE38008BB; Wed, 21 Jun 2023 10:46:01 +0000 (UTC) Received: from fedora.redhat.com (unknown [10.45.224.71]) by smtp.corp.redhat.com (Postfix) with ESMTPS id 0365C492C13; Wed, 21 Jun 2023 10:46:00 +0000 (UTC) From: Bruno Larsen To: gdb-patches@sourceware.org Cc: Bruno Larsen , Eli Zaretskii Subject: [PATCH v3 2/4] gdb/cli: Improve UX when using list with no args Date: Wed, 21 Jun 2023 12:45:43 +0200 Message-Id: <20230621104545.2530552-3-blarsen@redhat.com> In-Reply-To: <20230621104545.2530552-1-blarsen@redhat.com> References: <20230621104545.2530552-1-blarsen@redhat.com> MIME-Version: 1.0 X-Scanned-By: MIMEDefang 3.1 on 10.11.54.10 X-Mimecast-Spam-Score: 0 X-Mimecast-Originator: redhat.com Content-Transfer-Encoding: 8bit Content-Type: text/plain; charset="US-ASCII"; x-default=true X-Spam-Status: No, score=-16.1 required=5.0 tests=BAYES_00,DKIM_INVALID,DKIM_SIGNED,GIT_PATCH_0,KAM_DMARC_NONE,KAM_DMARC_STATUS,RCVD_IN_DNSWL_NONE,RCVD_IN_MSPIKE_H5,RCVD_IN_MSPIKE_WL,SPF_HELO_NONE,SPF_NONE,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: When using "list" with no arguments, GDB will first print the lines around where the inferior is stopped, then print the next N lines until reaching the end of file, at which point it wanrs the user "Line X out of range, file Y only has X-1 lines.". This is usually desireable, but if the user can no longer see the original line, they may have forgotten the current line or that a list command was used at all, making GDB's error message look cryptic. It was reported in bugzilla as PR cli/30497. This commit improves the user experince by changing the behavior of "list" slightly when a user passes no arguments. If the line that would be printed is past the end of the file, GDB will now warn that the previous list command has reached the end of file, and the current line wil be listed again. Bug: https://sourceware.org/bugzilla/show_bug.cgi?id=30497 Reviewed-By: Eli Zaretskii --- gdb/NEWS | 7 +++++++ gdb/cli/cli-cmds.c | 36 +++++++++++++++++++++++++++++++-- gdb/doc/gdb.texinfo | 7 +++++-- gdb/source.c | 18 +++++++++++++++++ gdb/source.h | 4 ++++ gdb/testsuite/gdb.base/list.exp | 8 ++++---- 6 files changed, 72 insertions(+), 8 deletions(-) diff --git a/gdb/NEWS b/gdb/NEWS index fd42864c692..348e73dd15f 100644 --- a/gdb/NEWS +++ b/gdb/NEWS @@ -77,6 +77,13 @@ as the array would be printed by the 'print' command. This functionality is also available for dprintf when dprintf-style is 'gdb'. + +* Using the 'list' command with no arguments in a situation where the + command would attempt to list past the end of the file now warns the + user that the end of file has been reached, and prints the default + location. Previously, it would error out. The default location for + this purpose is the last solitary line printed, if there was one, + else the lines around the main function. * New commands diff --git a/gdb/cli/cli-cmds.c b/gdb/cli/cli-cmds.c index b0b9c08c2ec..5973aebfad3 100644 --- a/gdb/cli/cli-cmds.c +++ b/gdb/cli/cli-cmds.c @@ -1244,8 +1244,40 @@ list_command (const char *arg, int from_tty) list_around_line (arg, cursal); } - /* "l" or "l +" lists next ten lines. */ - else if (arg == NULL || arg[0] == '+') + /* "l" lists the next few lines, unless we're listing past the end of + the file. If it would be past the end, re-print the current line. */ + else if (arg == nullptr) + { + if (can_print_line (cursal.symtab, cursal.line)) + print_source_lines (cursal.symtab, + source_lines_range (cursal.line), 0); + else + { + warning (_("previous list command has already reached the end " + "of the file. Listing default location again")); + try + { + /* Find the current line by getting the PC of the currently + selected frame, and finding the line associated to it. */ + frame_info_ptr frame = get_selected_frame (nullptr); + CORE_ADDR curr_pc = get_frame_pc (frame); + cursal = find_pc_line (curr_pc, 0); + } + catch (const gdb_exception &e) + { + /* If there was an exception above, it means the inferior + is not running, so reset the current source location to + the default. */ + clear_current_source_symtab_and_line (); + set_default_source_symtab_and_line (); + cursal = get_current_source_symtab_and_line (); + } + list_around_line (arg, cursal); + } + } + + /* "l +" always lists next few lines. */ + else if (arg[0] == '+') print_source_lines (cursal.symtab, source_lines_range (cursal.line), 0); diff --git a/gdb/doc/gdb.texinfo b/gdb/doc/gdb.texinfo index b10c06ae91f..55010f69a1c 100644 --- a/gdb/doc/gdb.texinfo +++ b/gdb/doc/gdb.texinfo @@ -9142,9 +9142,12 @@ Print lines centered around the beginning of function @item list Print more lines. If the last lines printed were printed with a @code{list} command, this prints lines following the last lines -printed; however, if the last line printed was a solitary line printed +printed; however, if those lines are past the end of the source +file, or if the last line printed was a solitary line printed as part of displaying a stack frame (@pxref{Stack, ,Examining the -Stack}), this prints lines centered around that line. +Stack}), this prints lines centered around that line. If no +@code{list} command has been used and no solitary line was printed, +it prints the lines around the function @code{main}. @item list - Print lines just before the lines last printed. diff --git a/gdb/source.c b/gdb/source.c index 9997cccb31b..1aa08c6e080 100644 --- a/gdb/source.c +++ b/gdb/source.c @@ -1484,6 +1484,24 @@ print_source_lines (struct symtab *s, source_lines_range line_range, line_range.stopline (), flags); } +/* See source.h. */ + +bool +can_print_line (struct symtab *s, int line) +{ + const std::vector *offset_p; + + /* If we can't get the offsets, we definitely can't print the line. */ + if (!g_source_cache.get_line_charpos (s, &offset_p)) + return false; + if (offset_p == nullptr) + return false; + + /* Otherwise we are able to print LINE if there are at least that many + lines in the symtab. */ + return line <= offset_p->size (); +} + /* Print info on range of pc's in a specified line. */ diff --git a/gdb/source.h b/gdb/source.h index 8fbc365680d..ae6764322d0 100644 --- a/gdb/source.h +++ b/gdb/source.h @@ -192,6 +192,10 @@ class source_lines_range int m_stopline; }; +/* Check if the line LINE can be found in the symtab S, so that it can be + printed. */ +extern bool can_print_line (struct symtab *s, int line); + /* Variation of previous print_source_lines that takes a range instead of a start and end line number. */ extern void print_source_lines (struct symtab *s, source_lines_range r, diff --git a/gdb/testsuite/gdb.base/list.exp b/gdb/testsuite/gdb.base/list.exp index 18ecd13ac0f..35e099ebaff 100644 --- a/gdb/testsuite/gdb.base/list.exp +++ b/gdb/testsuite/gdb.base/list.exp @@ -175,8 +175,8 @@ proc_with_prefix test_list_forward {} { "list 25-34" gdb_test "list" "35\[ \t\]+foo \\(.*\\);.*${last_line_re}" \ "list 35-42" - gdb_test "list" "Line number 44 out of range; \[^\r\n\]+ has 43 lines\." \ - "end of file error after \"list\" command" + gdb_test "list" "warning: previous list command has already reached the end of the file. Listing default location again.*1\[ \t\]+#include \"list0.h\".*" \ + "list past end of file" } # Test that repeating the list linenum command doesn't print the same @@ -194,8 +194,8 @@ proc_with_prefix test_repeat_list_command {} { "list 25-34" gdb_test " " "35\[ \t\]+foo \\(.*\\);.*${last_line_re}" \ "list 35-42" - gdb_test "list" "Line number 44 out of range; \[^\r\n\]+ has 43 lines\." \ - "end of file error after using 'return' to repeat the list command" + gdb_test "list" "warning: previous list command has already reached the end of the file. Listing default location again.*1\[ \t\]+#include \"list0.h\".*" \ + "list past end of file" } proc_with_prefix test_list_backwards {} { -- 2.40.1