+2021-03-06  Tom Tromey  <tom@tromey.com>
+
+       * dwarf2/read.h (dwarf2_get_dwz_file): Add 'require' parameter.
+       * dwarf2/read.c (dwarf2_get_dwz_file): Add 'require' parameter.
+       (get_abbrev_section_for_cu, read_attribute_value)
+       (get_debug_line_section): Update.
+       * dwarf2/macro.c (dwarf_decode_macro_bytes): Update.
+
 2021-03-06  Tom Tromey  <tom@tromey.com>
 
        * dwarf2/sect-names.h (struct dwarf2_section_names) <matches>: New
 
                    || macinfo_type == DW_MACRO_undef_sup
                    || section_is_dwz)
                  {
-                   dwz_file *dwz = dwarf2_get_dwz_file (per_objfile->per_bfd);
+                   dwz_file *dwz = dwarf2_get_dwz_file (per_objfile->per_bfd,
+                                                        true);
 
                    body = dwz->read_string (objfile, str_offset);
                  }
 
            if (macinfo_type == DW_MACRO_import_sup)
              {
-               dwz_file *dwz = dwarf2_get_dwz_file (per_objfile->per_bfd);
+               dwz_file *dwz = dwarf2_get_dwz_file (per_objfile->per_bfd,
+                                                    true);
 
                dwz->macro.read (objfile);
 
 
 /* See dwarf2read.h.  */
 
 struct dwz_file *
-dwarf2_get_dwz_file (dwarf2_per_bfd *per_bfd)
+dwarf2_get_dwz_file (dwarf2_per_bfd *per_bfd, bool require)
 {
   bfd_size_type buildid_len_arg;
   size_t buildid_len;
   if (data == NULL)
     {
       if (bfd_get_error () == bfd_error_no_error)
-       return NULL;
+       {
+         if (!require)
+           return nullptr;
+         error (_("could not read '.gnu_debugaltlink' section"));
+       }
       error (_("could not read '.gnu_debugaltlink' section: %s"),
             bfd_errmsg (bfd_get_error ()));
     }
   dwarf2_per_bfd *per_bfd = this_cu->per_bfd;
 
   if (this_cu->is_dwz)
-    abbrev = &dwarf2_get_dwz_file (per_bfd)->abbrev;
+    abbrev = &dwarf2_get_dwz_file (per_bfd, true)->abbrev;
   else
     abbrev = &per_bfd->abbrev;
 
       /* FALLTHROUGH */
     case DW_FORM_GNU_strp_alt:
       {
-       dwz_file *dwz = dwarf2_get_dwz_file (per_objfile->per_bfd);
+       dwz_file *dwz = dwarf2_get_dwz_file (per_objfile->per_bfd, true);
        LONGEST str_offset = cu_header->read_offset (abfd, info_ptr,
                                                     &bytes_read);
 
     section = &cu->dwo_unit->dwo_file->sections.line;
   else if (cu->per_cu->is_dwz)
     {
-      dwz_file *dwz = dwarf2_get_dwz_file (per_objfile->per_bfd);
+      dwz_file *dwz = dwarf2_get_dwz_file (per_objfile->per_bfd, true);
 
       section = &dwz->line;
     }
 
   struct dwo_unit *dwo_unit;
 };
 
-/* Open the separate '.dwz' debug file, if needed.  Return NULL if
-   there is no .gnu_debugaltlink section in the file.  Error if there
-   is such a section but the file cannot be found.  */
-
-extern dwz_file *dwarf2_get_dwz_file (dwarf2_per_bfd *per_bfd);
+/* Open the separate '.dwz' debug file, if needed.  If there is no
+   .gnu_debugaltlink section in the file, then the result depends on
+   REQUIRE: if REQUIRE is true, then error; if REQUIRE is false,
+   return NULL.  Always error if there is such a section but the file
+   cannot be found.  */
+
+extern dwz_file *dwarf2_get_dwz_file (dwarf2_per_bfd *per_bfd,
+                                     bool require = false);
 
 /* Return the type of the DIE at DIE_OFFSET in the CU named by
    PER_CU.  */
 
+2021-03-06  Tom Tromey  <tom@tromey.com>
+
+       * lib/dwarf.exp (_handle_DW_FORM): Treat DW_FORM_GNU_ref_alt and
+       DW_FORM_GNU_strp_alt like DW_FORM_sec_offset.
+       * gdb.dwarf2/dwznolink.exp: New file.
+
 2021-03-05  Mark Wielaard  <mark@klomp.org>
 
        * lib/valgrind.exp (vgdb_start): Add --wait=1 to vgdbcmd.
 
--- /dev/null
+# Copyright 2021 Free Software Foundation, Inc.
+
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 3 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+load_lib dwarf.exp
+
+# This test can only be run on targets which support DWARF-2 and use gas.
+if {![dwarf2_support]} {
+    return 0
+}
+
+# No remote host testing either.
+if {[is_remote host]} {
+    return 0
+}
+
+standard_testfile main.c dwznolink.S
+
+set asm_file [standard_output_file $srcfile2]
+
+# The DWARF should contain a reference to a supplementary ("dwz")
+# file, but the section that links to the file should be missing.  At
+# one point, this caused gdb crashes.
+Dwarf::assemble $asm_file {
+    cu {} {
+       compile_unit {{language @DW_LANG_C}} {
+           constant {
+               {name 0 DW_FORM_GNU_strp_alt}
+               {type 97 DW_FORM_GNU_ref_alt}
+               {const_value 99 data1}
+           }
+       }
+    }
+}
+
+# We can't use prepare_for_testing here because we need to check the
+# 'file' command's output.
+if {[build_executable $testfile.exp $testfile \
+        [list $srcfile $asm_file] {nodebug quiet}]} {
+    return -1
+}
+
+gdb_exit
+gdb_start
+gdb_reinitialize_dir $srcdir/$subdir
+
+gdb_test "file -readnow $binfile" \
+    "could not read '.gnu_debugaltlink' section" \
+    "file $testfile"
 
                _op .${size}byte $value
            }
 
+           DW_FORM_GNU_ref_alt -
+           DW_FORM_GNU_strp_alt -
            DW_FORM_sec_offset {
                variable _cu_offset_size
                _op .${_cu_offset_size}byte $value
 
            DW_FORM_GNU_addr_index -
            DW_FORM_GNU_str_index -
-           DW_FORM_GNU_ref_alt -
-           DW_FORM_GNU_strp_alt -
 
            default {
                error "unhandled form $form"