Fix "list" when control characters are seen
authorTom Tromey <tromey@adacore.com>
Tue, 9 Apr 2019 18:52:46 +0000 (12:52 -0600)
committerTom Tromey <tromey@adacore.com>
Fri, 19 Apr 2019 19:09:58 +0000 (13:09 -0600)
PR symtab/24423 points out that control characters in a source file
cause a hang in the "list" command, a regression introduced by the
styling changes.

This patch, from the PR, fixes the bug.  I've included a minimal
change to the "list" test that exercises this code.

I recall that this bug was discussed on gdb-patches, and I thought
there was a patch there as well, but I was unable to find it.

2019-04-19  Ilya Yu. Malakhov  <malakhov@mcst.ru>

PR symtab/24423:
* source.c (print_source_lines_base): Advance "iter" when a
control character is seen.

gdb/testsuite/ChangeLog
2019-04-19  Tom Tromey  <tromey@adacore.com>

PR symtab/24423:
* gdb.base/list0.h (foo): Add a control-l character.

gdb/ChangeLog
gdb/source.c
gdb/testsuite/ChangeLog
gdb/testsuite/gdb.base/list0.h

index 8a4da98..328cf29 100644 (file)
@@ -1,3 +1,9 @@
+2019-04-19  Ilya Yu. Malakhov  <malakhov@mcst.ru>
+
+       PR symtab/24423:
+       * source.c (print_source_lines_base): Advance "iter" when a
+       control character is seen.
+
 2019-04-19  Philippe Waroquiers  <philippe.waroquiers@skynet.be>
 
        * inferior.h (struct infcall_suspend_state_deleter):
index f99215f..b61880a 100644 (file)
@@ -1368,7 +1368,7 @@ print_source_lines_base (struct symtab *s, int line, int stopline,
              char c = *iter;
              if (c == '\033' && skip_ansi_escape (iter, &skip_bytes))
                iter += skip_bytes;
-             else if (c < 040 && c != '\t')
+             else if (c >= 0 && c < 040 && c != '\t')
                break;
              else if (c == 0177)
                break;
@@ -1397,9 +1397,13 @@ print_source_lines_base (struct symtab *s, int line, int stopline,
            {
              xsnprintf (buf, sizeof (buf), "^%c", *iter + 0100);
              uiout->text (buf);
+             ++iter;
            }
          else if (*iter == 0177)
-           uiout->text ("^?");
+           {
+             uiout->text ("^?");
+             ++iter;
+           }
        }
       uiout->text ("\n");
     }
index 7308417..1ff0526 100644 (file)
@@ -1,3 +1,8 @@
+2019-04-19  Tom Tromey  <tromey@adacore.com>
+
+       PR symtab/24423:
+       * gdb.base/list0.h (foo): Add a control-l character.
+
 2019-03-28  Pedro Alves  <palves@redhat.com>
 
        * lib/gdb.exp (gdb_test_multiple): Split appends to $code and
index 42a4fe0..6f28093 100644 (file)
@@ -3,7 +3,7 @@
 extern void bar(int);
 static void foo (int x)
 /* !
-   !
+\f
    ! */
 {
     bar (x++);