libctf, binutils: dump the CTF header
[deliverable/binutils-gdb.git] / binutils / readelf.c
index 5ae58574fb4cfa41479699006585b0140cd9a6b8..7e2b3adcf7b9cfb3b21ccab31dc3b36e31dbdd89 100644 (file)
@@ -232,6 +232,7 @@ static unsigned int dynamic_syminfo_nent;
 static char program_interpreter[PATH_MAX];
 static bfd_vma dynamic_info[DT_ENCODING];
 static bfd_vma dynamic_info_DT_GNU_HASH;
+static bfd_vma dynamic_info_DT_MIPS_XHASH;
 static bfd_vma version_info[16];
 static Elf_Internal_Dyn *  dynamic_section;
 static elf_section_list * symtab_shndx_list;
@@ -335,6 +336,10 @@ static const char * get_symbol_version_string
        (ADDR) &= ~1;                           \
     }                                          \
   while (0)
+
+/* Get the correct GNU hash section name.  */
+#define GNU_HASH_SECTION_NAME                  \
+  dynamic_info_DT_MIPS_XHASH ? ".MIPS.xhash" : ".gnu.hash"
 \f
 /* Print a BFD_VMA to an internal buffer, for use in error messages.
    BFD_FMA_FMT can't be used in translated strings.  */
@@ -385,9 +390,9 @@ get_data (void *         var,
   /* If the size_t type is smaller than the bfd_size_type, eg because
      you are building a 32-bit tool on a 64-bit host, then make sure
      that when the sizes are cast to (size_t) no information is lost.  */
-  if (sizeof (size_t) < sizeof (bfd_size_type)
-      && (   (bfd_size_type) ((size_t) size) != size
-         || (bfd_size_type) ((size_t) nmemb) != nmemb))
+  if ((size_t) size != size
+      || (size_t) nmemb != nmemb
+      || (size_t) amt != amt)
     {
       if (reason)
        error (_("Size truncation prevents reading %s"
@@ -397,7 +402,7 @@ get_data (void *         var,
     }
 
   /* Check for size overflow.  */
-  if (amt < nmemb)
+  if (amt / size != nmemb || (size_t) amt + 1 == 0)
     {
       if (reason)
        error (_("Size overflow prevents reading %s"
@@ -429,10 +434,8 @@ get_data (void *         var,
   mvar = var;
   if (mvar == NULL)
     {
-      /* Check for overflow.  */
-      if (nmemb < (~(bfd_size_type) 0 - 1) / size)
-       /* + 1 so that we can '\0' terminate invalid string table sections.  */
-       mvar = malloc ((size_t) amt + 1);
+      /* + 1 so that we can '\0' terminate invalid string table sections.  */
+      mvar = malloc ((size_t) amt + 1);
 
       if (mvar == NULL)
        {
@@ -1874,6 +1877,7 @@ get_mips_dynamic_type (unsigned long type)
     case DT_MIPS_AUX_DYNAMIC: return "MIPS_AUX_DYNAMIC";
     case DT_MIPS_PLTGOT: return "MIPS_PLTGOT";
     case DT_MIPS_RWPLT: return "MIPS_RWPLT";
+    case DT_MIPS_XHASH: return "MIPS_XHASH";
     default:
       return NULL;
     }
@@ -2412,7 +2416,7 @@ get_machine_name (unsigned e_machine)
     case EM_TPC:               return "Tenor Network TPC processor";
     case EM_SNP1K:             return "Trebia SNP 1000 processor";
       /* 100 */
-    case EM_ST200:             return "STMicroelectronics ST200 microcontroller";  
+    case EM_ST200:             return "STMicroelectronics ST200 microcontroller";
     case EM_IP2K_OLD:
     case EM_IP2K:              return "Ubicom IP2xxx 8-bit microcontrollers";
     case EM_MAX:               return "MAX Processor";
@@ -2528,7 +2532,7 @@ get_machine_name (unsigned e_machine)
     case EM_MT:                 return "Morpho Techologies MT processor";
     case EM_ALPHA:             return "Alpha";
     case EM_WEBASSEMBLY:       return "Web Assembly";
-    case EM_DLX:               return "OpenDLX";  
+    case EM_DLX:               return "OpenDLX";
     case EM_XSTORMY16:         return "Sanyo XStormy16 CPU core";
     case EM_IQ2000:            return "Vitesse IQ2000";
     case EM_M32C_OLD:
@@ -3879,22 +3883,6 @@ get_parisc_segment_type (unsigned long type)
 {
   switch (type)
     {
-    case PT_HP_TLS:            return "HP_TLS";
-    case PT_HP_CORE_NONE:      return "HP_CORE_NONE";
-    case PT_HP_CORE_VERSION:   return "HP_CORE_VERSION";
-    case PT_HP_CORE_KERNEL:    return "HP_CORE_KERNEL";
-    case PT_HP_CORE_COMM:      return "HP_CORE_COMM";
-    case PT_HP_CORE_PROC:      return "HP_CORE_PROC";
-    case PT_HP_CORE_LOADABLE:  return "HP_CORE_LOADABLE";
-    case PT_HP_CORE_STACK:     return "HP_CORE_STACK";
-    case PT_HP_CORE_SHM:       return "HP_CORE_SHM";
-    case PT_HP_CORE_MMF:       return "HP_CORE_MMF";
-    case PT_HP_PARALLEL:       return "HP_PARALLEL";
-    case PT_HP_FASTBIND:       return "HP_FASTBIND";
-    case PT_HP_OPT_ANNOT:      return "HP_OPT_ANNOT";
-    case PT_HP_HSL_ANNOT:      return "HP_HSL_ANNOT";
-    case PT_HP_STACK:          return "HP_STACK";
-    case PT_HP_CORE_UTSNAME:   return "HP_CORE_UTSNAME";
     case PT_PARISC_ARCHEXT:    return "PARISC_ARCHEXT";
     case PT_PARISC_UNWIND:     return "PARISC_UNWIND";
     case PT_PARISC_WEAKORDER:  return "PARISC_WEAKORDER";
@@ -3909,10 +3897,6 @@ get_ia64_segment_type (unsigned long type)
     {
     case PT_IA_64_ARCHEXT:     return "IA_64_ARCHEXT";
     case PT_IA_64_UNWIND:      return "IA_64_UNWIND";
-    case PT_HP_TLS:            return "HP_TLS";
-    case PT_IA_64_HP_OPT_ANOT: return "HP_OPT_ANNOT";
-    case PT_IA_64_HP_HSL_ANOT: return "HP_HSL_ANNOT";
-    case PT_IA_64_HP_STACK:    return "HP_STACK";
     default:                    return NULL;
     }
 }
@@ -3927,6 +3911,44 @@ get_tic6x_segment_type (unsigned long type)
     }
 }
 
+static const char *
+get_hpux_segment_type (unsigned long type, unsigned e_machine)
+{
+  if (e_machine == EM_PARISC)
+    switch (type)
+      {
+      case PT_HP_TLS:          return "HP_TLS";
+      case PT_HP_CORE_NONE:    return "HP_CORE_NONE";
+      case PT_HP_CORE_VERSION: return "HP_CORE_VERSION";
+      case PT_HP_CORE_KERNEL:  return "HP_CORE_KERNEL";
+      case PT_HP_CORE_COMM:    return "HP_CORE_COMM";
+      case PT_HP_CORE_PROC:    return "HP_CORE_PROC";
+      case PT_HP_CORE_LOADABLE:        return "HP_CORE_LOADABLE";
+      case PT_HP_CORE_STACK:   return "HP_CORE_STACK";
+      case PT_HP_CORE_SHM:     return "HP_CORE_SHM";
+      case PT_HP_CORE_MMF:     return "HP_CORE_MMF";
+      case PT_HP_PARALLEL:     return "HP_PARALLEL";
+      case PT_HP_FASTBIND:     return "HP_FASTBIND";
+      case PT_HP_OPT_ANNOT:    return "HP_OPT_ANNOT";
+      case PT_HP_HSL_ANNOT:    return "HP_HSL_ANNOT";
+      case PT_HP_STACK:                return "HP_STACK";
+      case PT_HP_CORE_UTSNAME: return "HP_CORE_UTSNAME";
+      default:                 return NULL;
+      }
+
+  if (e_machine == EM_IA_64)
+    switch (type)
+      {
+      case PT_HP_TLS:           return "HP_TLS";
+      case PT_IA_64_HP_OPT_ANOT: return "HP_OPT_ANNOT";
+      case PT_IA_64_HP_HSL_ANOT: return "HP_HSL_ANNOT";
+      case PT_IA_64_HP_STACK:   return "HP_STACK";
+      default:                  return NULL;
+      }
+
+  return NULL;
+}
+
 static const char *
 get_solaris_segment_type (unsigned long type)
 {
@@ -3965,12 +3987,7 @@ get_segment_type (Filedata * filedata, unsigned long p_type)
     case PT_GNU_PROPERTY: return "GNU_PROPERTY";
 
     default:
-      if (p_type >= PT_GNU_MBIND_LO && p_type <= PT_GNU_MBIND_HI)
-       {
-         sprintf (buff, "GNU_MBIND+%#lx",
-                  p_type - PT_GNU_MBIND_LO);
-       }
-      else if ((p_type >= PT_LOPROC) && (p_type <= PT_HIPROC))
+      if ((p_type >= PT_LOPROC) && (p_type <= PT_HIPROC))
        {
          const char * result;
 
@@ -4011,24 +4028,28 @@ get_segment_type (Filedata * filedata, unsigned long p_type)
        }
       else if ((p_type >= PT_LOOS) && (p_type <= PT_HIOS))
        {
-         const char * result;
+         const char * result = NULL;
 
-         switch (filedata->file_header.e_machine)
+         switch (filedata->file_header.e_ident[EI_OSABI])
            {
-           case EM_PARISC:
-             result = get_parisc_segment_type (p_type);
+           case ELFOSABI_GNU:
+           case ELFOSABI_FREEBSD:
+             if (p_type >= PT_GNU_MBIND_LO && p_type <= PT_GNU_MBIND_HI)
+               {
+                 sprintf (buff, "GNU_MBIND+%#lx", p_type - PT_GNU_MBIND_LO);
+                 result = buff;
+               }
              break;
-           case EM_IA_64:
-             result = get_ia64_segment_type (p_type);
+           case ELFOSABI_HPUX:
+             result = get_hpux_segment_type (p_type,
+                                             filedata->file_header.e_machine);
+             break;
+           case ELFOSABI_SOLARIS:
+             result = get_solaris_segment_type (p_type);
              break;
            default:
-             if (filedata->file_header.e_ident[EI_OSABI] == ELFOSABI_SOLARIS)
-               result = get_solaris_segment_type (p_type);
-             else
-               result = NULL;
              break;
            }
-
          if (result != NULL)
            return result;
 
@@ -4098,6 +4119,7 @@ get_mips_section_type_name (unsigned int sh_type)
     case SHT_MIPS_XLATE_OLD:    return "MIPS_XLATE_OLD";
     case SHT_MIPS_PDR_EXCEPTION: return "MIPS_PDR_EXCEPTION";
     case SHT_MIPS_ABIFLAGS:     return "MIPS_ABIFLAGS";
+    case SHT_MIPS_XHASH:        return "MIPS_XHASH";
     default:
       break;
     }
@@ -5079,6 +5101,9 @@ process_program_headers (Filedata * filedata)
   unsigned int i;
   Elf_Internal_Phdr * previous_load = NULL;
 
+  dynamic_addr = 0;
+  dynamic_size = 0;
+
   if (filedata->file_header.e_phnum == 0)
     {
       /* PR binutils/12467.  */
@@ -5129,9 +5154,6 @@ process_program_headers (Filedata * filedata)
        }
     }
 
-  dynamic_addr = 0;
-  dynamic_size = 0;
-
   for (i = 0, segment = filedata->program_headers;
        i < filedata->file_header.e_phnum;
        i++, segment++)
@@ -7398,11 +7420,6 @@ struct absaddr
   bfd_vma offset;
 };
 
-#define ABSADDR(a) \
-  ((a).section \
-   ? filedata->section_headers [(a).section].sh_addr + (a).offset \
-   : (a).offset)
-
 /* Find the nearest symbol at or below ADDR.  Returns the symbol
    name, if found, and the offset from the symbol to ADDR.  */
 
@@ -7548,8 +7565,22 @@ dump_ia64_unwind (Filedata * filedata, struct ia64_unw_aux_info * aux)
       if (aux->info == NULL)
        continue;
 
+      offset = tp->info.offset;
+      if (tp->info.section)
+       {
+         if (tp->info.section >= filedata->file_header.e_shnum)
+           {
+             warn (_("Invalid section %u in table entry %ld\n"),
+                   tp->info.section, (long) (tp - aux->table));
+             res = FALSE;
+             continue;
+           }
+         offset += filedata->section_headers[tp->info.section].sh_addr;
+       }
+      offset -= aux->info_addr;
       /* PR 17531: file: 0997b4d1.  */
-      if ((ABSADDR (tp->info) - aux->info_addr) >= aux->info_size)
+      if (offset >= aux->info_size
+         || aux->info_size - offset < 8)
        {
          warn (_("Invalid offset %lx in table entry %ld\n"),
                (long) tp->info.offset, (long) (tp - aux->table));
@@ -7557,7 +7588,7 @@ dump_ia64_unwind (Filedata * filedata, struct ia64_unw_aux_info * aux)
          continue;
        }
 
-      head = aux->info + (ABSADDR (tp->info) - aux->info_addr);
+      head = aux->info + offset;
       stamp = byte_get ((unsigned char *) head, sizeof (stamp));
 
       printf ("  v%u, flags=0x%lx (%s%s), len=%lu bytes\n",
@@ -9029,6 +9060,11 @@ decode_arm_unwind (Filedata *                 filedata,
 
       remaining = 4;
     }
+  else
+    {
+      addr.section = SHN_UNDEF;
+      addr.offset = 0;
+    }
 
   if ((word & 0x80000000) == 0)
     {
@@ -9496,6 +9532,11 @@ dynamic_section_mips_val (Elf_Internal_Dyn * entry)
       print_vma (entry->d_un.d_val, DEC);
       break;
 
+    case DT_MIPS_XHASH:
+      dynamic_info_DT_MIPS_XHASH = entry->d_un.d_val;
+      dynamic_info_DT_GNU_HASH = entry->d_un.d_val;
+      /* Falls through.  */
+
     default:
       print_vma (entry->d_un.d_ptr, PREFIX_HEX);
     }
@@ -10534,7 +10575,7 @@ process_version_sections (Filedata * filedata)
                    printable_section_name (filedata, section),
                    section->sh_info);
 
-           printf (_("  Addr: 0x"));
+           printf (_(" Addr: 0x"));
            printf_vma (section->sh_addr);
            printf (_("  Offset: %#08lx  Link: %u (%s)\n"),
                    (unsigned long) section->sh_offset, section->sh_link,
@@ -10826,7 +10867,7 @@ process_version_sections (Filedata * filedata)
                              total),
                    printable_section_name (filedata, section), (unsigned long) total);
 
-           printf (_(" Addr: "));
+           printf (_(" Addr: 0x"));
            printf_vma (section->sh_addr);
            printf (_("  Offset: %#08lx  Link: %u (%s)\n"),
                    (unsigned long) section->sh_offset, section->sh_link,
@@ -11047,9 +11088,7 @@ get_symbol_binding (Filedata * filedata, unsigned int binding)
       else if (binding >= STB_LOOS && binding <= STB_HIOS)
        {
          if (binding == STB_GNU_UNIQUE
-             && (filedata->file_header.e_ident[EI_OSABI] == ELFOSABI_GNU
-                 /* GNU is still using the default value 0.  */
-                 || filedata->file_header.e_ident[EI_OSABI] == ELFOSABI_NONE))
+             && filedata->file_header.e_ident[EI_OSABI] == ELFOSABI_GNU)
            return "UNIQUE";
          snprintf (buff, sizeof (buff), _("<OS specific>: %d"), binding);
        }
@@ -11101,9 +11140,7 @@ get_symbol_type (Filedata * filedata, unsigned int type)
 
          if (type == STT_GNU_IFUNC
              && (filedata->file_header.e_ident[EI_OSABI] == ELFOSABI_GNU
-                 || filedata->file_header.e_ident[EI_OSABI] == ELFOSABI_FREEBSD
-                 /* GNU is still using the default value 0.  */
-                 || filedata->file_header.e_ident[EI_OSABI] == ELFOSABI_NONE))
+                 || filedata->file_header.e_ident[EI_OSABI] == ELFOSABI_FREEBSD))
            return "IFUNC";
 
          snprintf (buff, sizeof (buff), _("<OS specific>: %d"), type);
@@ -11129,6 +11166,19 @@ get_symbol_visibility (unsigned int visibility)
     }
 }
 
+static const char *
+get_alpha_symbol_other (unsigned int other)
+{
+  switch (other)
+    {
+    case STO_ALPHA_NOPV:       return "NOPV";
+    case STO_ALPHA_STD_GPLOAD: return "STD GPLOAD";
+    default:
+      error (_("Unrecognized alpah specific other value: %u"), other);
+      return _("<unknown>");
+    }
+}
+
 static const char *
 get_solaris_symbol_visibility (unsigned int visibility)
 {
@@ -11268,6 +11318,9 @@ get_symbol_other (Filedata * filedata, unsigned int other)
 
   switch (filedata->file_header.e_machine)
     {
+    case EM_ALPHA:
+      result = get_alpha_symbol_other (other);
+      break;
     case EM_AARCH64:
       result = get_aarch64_symbol_other (other);
       break;
@@ -11475,6 +11528,7 @@ get_symbol_version_string (Filedata *                   filedata,
   if ((vers_data & VERSYM_HIDDEN) == 0 && vers_data == 0)
     return NULL;
 
+  *sym_info = (vers_data & VERSYM_HIDDEN) != 0 ? symbol_hidden : symbol_public;
   max_vd_ndx = 0;
 
   /* Usually we'd only see verdef for defined symbols, and verneed for
@@ -11528,7 +11582,7 @@ get_symbol_version_string (Filedata *                   filedata,
 
       if (ivd.vd_ndx == (vers_data & VERSYM_VERSION))
        {
-         if (ivd.vd_ndx == 1 && ivd.vd_flags == VER_FLG_BASE) 
+         if (ivd.vd_ndx == 1 && ivd.vd_flags == VER_FLG_BASE)
            return NULL;
 
          off -= ivd.vd_next;
@@ -11540,12 +11594,8 @@ get_symbol_version_string (Filedata *                   filedata,
              ivda.vda_name = BYTE_GET (evda.vda_name);
 
              if (psym->st_name != ivda.vda_name)
-               {
-                 *sym_info = ((vers_data & VERSYM_HIDDEN) != 0
-                              ? symbol_hidden : symbol_public);
-                 return (ivda.vda_name < strtab_size
-                         ? strtab + ivda.vda_name : _("<corrupt>"));
-               }
+               return (ivda.vda_name < strtab_size
+                       ? strtab + ivda.vda_name : _("<corrupt>"));
            }
        }
     }
@@ -11632,6 +11682,7 @@ process_symbol_table (Filedata * filedata)
   bfd_vma ngnubuckets = 0;
   bfd_vma * gnubuckets = NULL;
   bfd_vma * gnuchains = NULL;
+  bfd_vma * mipsxlat = NULL;
   bfd_vma gnusymidx = 0;
   bfd_size_type ngnuchains = 0;
 
@@ -11797,7 +11848,31 @@ process_symbol_table (Filedata * filedata)
       gnuchains = get_dynamic_data (filedata, maxchain, 4);
       ngnuchains = maxchain;
 
+      if (gnuchains == NULL)
+       goto no_gnu_hash;
+
+      if (dynamic_info_DT_MIPS_XHASH)
+       {
+         if (fseek (filedata->handle,
+                    (archive_file_offset
+                     + offset_from_vma (filedata, (buckets_vma
+                                                   + 4 * (ngnubuckets
+                                                          + maxchain)), 4)),
+                    SEEK_SET))
+           {
+             error (_("Unable to seek to start of dynamic information\n"));
+             goto no_gnu_hash;
+           }
+
+         mipsxlat = get_dynamic_data (filedata, maxchain, 4);
+       }
+
     no_gnu_hash:
+      if (dynamic_info_DT_MIPS_XHASH && mipsxlat == NULL)
+       {
+         free (gnuchains);
+         gnuchains = NULL;
+       }
       if (gnuchains == NULL)
        {
          free (gnubuckets);
@@ -11847,7 +11922,8 @@ process_symbol_table (Filedata * filedata)
 
       if (dynamic_info_DT_GNU_HASH)
        {
-         printf (_("\nSymbol table of `.gnu.hash' for image:\n"));
+         printf (_("\nSymbol table of `%s' for image:\n"),
+                 GNU_HASH_SECTION_NAME);
          if (is_32bit_elf)
            printf (_("  Num Buc:    Value  Size   Type   Bind Vis      Ndx Name\n"));
          else
@@ -11861,7 +11937,10 @@ process_symbol_table (Filedata * filedata)
 
                do
                  {
-                   print_dynamic_symbol (filedata, si, hn);
+                   if (dynamic_info_DT_MIPS_XHASH)
+                     print_dynamic_symbol (filedata, mipsxlat[off], hn);
+                   else
+                     print_dynamic_symbol (filedata, si, hn);
                    si++;
                  }
                while (off < ngnuchains && (gnuchains[off++] & 1) == 0);
@@ -12084,11 +12163,12 @@ process_symbol_table (Filedata * filedata)
       unsigned long nzero_counts = 0;
       unsigned long nsyms = 0;
 
-      printf (ngettext ("\nHistogram for `.gnu.hash' bucket list length "
+      printf (ngettext ("\nHistogram for `%s' bucket list length "
                        "(total of %lu bucket):\n",
-                       "\nHistogram for `.gnu.hash' bucket list length "
+                       "\nHistogram for `%s' bucket list length "
                        "(total of %lu buckets):\n",
                        (unsigned long) ngnubuckets),
+             GNU_HASH_SECTION_NAME,
              (unsigned long) ngnubuckets);
 
       lengths = (unsigned long *) calloc (ngnubuckets, sizeof (*lengths));
@@ -12145,6 +12225,7 @@ process_symbol_table (Filedata * filedata)
       free (lengths);
       free (gnubuckets);
       free (gnuchains);
+      free (mipsxlat);
     }
 
   return TRUE;
@@ -12577,7 +12658,7 @@ is_32bit_abs_reloc (Filedata * filedata, unsigned int reloc_type)
     case EM_OR1K:
       return reloc_type == 1; /* R_OR1K_32.  */
     case EM_PARISC:
-      return (reloc_type == 1 /* R_PARISC_DIR32.  */         
+      return (reloc_type == 1 /* R_PARISC_DIR32.  */
              || reloc_type == 2 /* R_PARISC_DIR21L.  */
              || reloc_type == 41); /* R_PARISC_SECREL32.  */
     case EM_PJ:
@@ -12717,6 +12798,8 @@ is_32bit_pcrel_reloc (Filedata * filedata, unsigned int reloc_type)
     case EM_L1OM:
     case EM_K1OM:
       return reloc_type == 2;  /* R_X86_64_PC32.  */
+    case EM_VAX:
+      return reloc_type == 4;  /* R_VAX_PCREL32.  */
     case EM_XTENSA_OLD:
     case EM_XTENSA:
       return reloc_type == 14; /* R_XTENSA_32_PCREL.  */
@@ -13322,7 +13405,7 @@ apply_relocations (Filedata *                 filedata,
            }
 
          rloc = start + rp->r_offset;
-         if ((rloc + reloc_size) > end || (rloc < start))
+         if (rloc >= end || (rloc + reloc_size) > end || (rloc < start))
            {
              warn (_("skipping invalid relocation offset 0x%lx in section %s\n"),
                    (unsigned long) rp->r_offset,
@@ -13811,12 +13894,9 @@ dump_section_as_bytes (Elf_Internal_Shdr *  section,
 static ctf_sect_t *
 shdr_to_ctf_sect (ctf_sect_t *buf, Elf_Internal_Shdr *shdr, Filedata *filedata)
 {
-  buf->cts_name = SECTION_NAME(shdr);
-  buf->cts_type = shdr->sh_type;
-  buf->cts_flags = shdr->sh_flags;
+  buf->cts_name = SECTION_NAME (shdr);
   buf->cts_size = shdr->sh_size;
   buf->cts_entsize = shdr->sh_entsize;
-  buf->cts_offset = (off64_t) shdr->sh_offset;
 
   return buf;
 }
@@ -13828,10 +13908,10 @@ shdr_to_ctf_sect (ctf_sect_t *buf, Elf_Internal_Shdr *shdr, Filedata *filedata)
 static char *dump_ctf_indent_lines (ctf_sect_names_t sect ATTRIBUTE_UNUSED,
                                    char *s, void *arg)
 {
-  char *spaces = arg;
+  const char *blanks = arg;
   char *new_s;
 
-  if (asprintf (&new_s, "%s%s", spaces, s) < 0)
+  if (asprintf (&new_s, "%s%s", blanks, s) < 0)
     return s;
   return new_s;
 }
@@ -13852,8 +13932,9 @@ dump_section_as_ctf (Elf_Internal_Shdr * section, Filedata * filedata)
   ctf_file_t *         ctf = NULL;
   ctf_file_t *         parent = NULL;
 
-  const char *things[] = {"Labels", "Data objects", "Function objects",
-                         "Variables", "Types", "Strings", ""};
+  const char *things[] = {"Header", "Labels", "Data objects",
+                         "Function objects", "Variables", "Types", "Strings",
+                         ""};
   const char **thing;
   int err;
   bfd_boolean ret = FALSE;
@@ -13934,7 +14015,7 @@ dump_section_as_ctf (Elf_Internal_Shdr * section, Filedata * filedata)
   printf (_("\nDump of CTF section '%s':\n"),
          printable_section_name (filedata, section));
 
-  for (i = 1, thing = things; *thing[0]; thing++, i++)
+  for (i = 0, thing = things; *thing[0]; thing++, i++)
     {
       ctf_dump_state_t *s = NULL;
       char *item;
@@ -13973,7 +14054,7 @@ load_specific_debug_section (enum dwarf_section_display_enum  debug,
   struct dwarf_section * section = &debug_displays [debug].section;
   char buf [64];
   Filedata * filedata = (Filedata *) data;
-  
+
   if (section->start != NULL)
     {
       /* If it is already loaded, do nothing.  */
@@ -16440,8 +16521,6 @@ process_mips_specific (Filedata * filedata)
   if (options_offset != 0)
     {
       Elf_External_Options * eopt;
-      Elf_Internal_Options * iopt;
-      Elf_Internal_Options * option;
       size_t offset;
       int cnt;
       sect = filedata->section_headers;
@@ -16465,6 +16544,10 @@ process_mips_specific (Filedata * filedata)
                                                 sect->sh_size, _("options"));
       if (eopt)
        {
+         Elf_Internal_Options * iopt;
+         Elf_Internal_Options * option;
+         Elf_Internal_Options * iopt_end;
+
          iopt = (Elf_Internal_Options *)
               cmalloc ((sect->sh_size / sizeof (eopt)), sizeof (* iopt));
          if (iopt == NULL)
@@ -16475,7 +16558,8 @@ process_mips_specific (Filedata * filedata)
 
          offset = cnt = 0;
          option = iopt;
-
+         iopt_end = iopt + (sect->sh_size / sizeof (eopt));
+         
          while (offset <= sect->sh_size - sizeof (* eopt))
            {
              Elf_External_Options * eoption;
@@ -16518,15 +16602,25 @@ process_mips_specific (Filedata * filedata)
                  /* This shouldn't happen.  */
                  printf (" NULL       %d %lx", option->section, option->info);
                  break;
+
                case ODK_REGINFO:
                  printf (" REGINFO    ");
                  if (filedata->file_header.e_machine == EM_MIPS)
                    {
-                     /* 32bit form.  */
                      Elf32_External_RegInfo * ereg;
                      Elf32_RegInfo reginfo;
 
+                     /* 32bit form.  */
+                     if (option + 2 > iopt_end)
+                       {
+                         printf (_("<corrupt>\n"));
+                         error (_("Truncated MIPS REGINFO option\n"));
+                         cnt = 0;
+                         break;
+                       }
+
                      ereg = (Elf32_External_RegInfo *) (option + 1);
+
                      reginfo.ri_gprmask = BYTE_GET (ereg->ri_gprmask);
                      reginfo.ri_cprmask[0] = BYTE_GET (ereg->ri_cprmask[0]);
                      reginfo.ri_cprmask[1] = BYTE_GET (ereg->ri_cprmask[1]);
@@ -16547,6 +16641,14 @@ process_mips_specific (Filedata * filedata)
                      Elf64_External_RegInfo * ereg;
                      Elf64_Internal_RegInfo reginfo;
 
+                     if (option + 2 > iopt_end)
+                       {
+                         printf (_("<corrupt>\n"));
+                         error (_("Truncated MIPS REGINFO option\n"));
+                         cnt = 0;
+                         break;
+                       }
+
                      ereg = (Elf64_External_RegInfo *) (option + 1);
                      reginfo.ri_gprmask    = BYTE_GET (ereg->ri_gprmask);
                      reginfo.ri_cprmask[0] = BYTE_GET (ereg->ri_cprmask[0]);
@@ -16566,6 +16668,7 @@ process_mips_specific (Filedata * filedata)
                    }
                  ++option;
                  continue;
+
                case ODK_EXCEPTIONS:
                  fputs (" EXCEPTIONS fpe_min(", stdout);
                  process_mips_fpe_exception (option->info & OEX_FPU_MIN);
@@ -16582,6 +16685,7 @@ process_mips_specific (Filedata * filedata)
                  if (option->info & OEX_DISMISS)
                    fputs (" DISMISS", stdout);
                  break;
+
                case ODK_PAD:
                  fputs (" PAD       ", stdout);
                  if (option->info & OPAD_PREFIX)
@@ -16591,6 +16695,7 @@ process_mips_specific (Filedata * filedata)
                  if (option->info & OPAD_SYMBOL)
                    fputs (" SYMBOL", stdout);
                  break;
+
                case ODK_HWPATCH:
                  fputs (" HWPATCH   ", stdout);
                  if (option->info & OHW_R4KEOP)
@@ -16602,14 +16707,17 @@ process_mips_specific (Filedata * filedata)
                  if (option->info & OHW_R5KCVTL)
                    fputs (" R5KCVTL", stdout);
                  break;
+
                case ODK_FILL:
                  fputs (" FILL       ", stdout);
                  /* XXX Print content of info word?  */
                  break;
+
                case ODK_TAGS:
                  fputs (" TAGS       ", stdout);
                  /* XXX Print content of info word?  */
                  break;
+
                case ODK_HWAND:
                  fputs (" HWAND     ", stdout);
                  if (option->info & OHWA0_R4KEOP_CHECKED)
@@ -16617,6 +16725,7 @@ process_mips_specific (Filedata * filedata)
                  if (option->info & OHWA0_R4KEOP_CLEAN)
                    fputs (" R4KEOP_CLEAN", stdout);
                  break;
+
                case ODK_HWOR:
                  fputs (" HWOR      ", stdout);
                  if (option->info & OHWA0_R4KEOP_CHECKED)
@@ -16624,16 +16733,19 @@ process_mips_specific (Filedata * filedata)
                  if (option->info & OHWA0_R4KEOP_CLEAN)
                    fputs (" R4KEOP_CLEAN", stdout);
                  break;
+
                case ODK_GP_GROUP:
                  printf (" GP_GROUP  %#06lx  self-contained %#06lx",
                          option->info & OGP_GROUP,
                          (option->info & OGP_SELF) >> 16);
                  break;
+
                case ODK_IDENT:
                  printf (" IDENT     %#06lx  self-contained %#06lx",
                          option->info & OGP_GROUP,
                          (option->info & OGP_SELF) >> 16);
                  break;
+
                default:
                  /* This shouldn't happen.  */
                  printf (" %3d ???     %d %lx",
@@ -17935,7 +18047,7 @@ print_gnu_note (Filedata * filedata, Elf_Internal_Note *pnote)
     case NT_GNU_PROPERTY_TYPE_0:
       print_gnu_property_note (filedata, pnote);
       break;
-      
+
     default:
       /* Handle unrecognised types.  An error message should have already been
         created by get_gnu_elf_note_type(), so all that we need to do is to
@@ -18055,10 +18167,23 @@ process_netbsd_elf_note (Elf_Internal_Note * pnote)
       return TRUE;
 
     case NT_NETBSD_MARCH:
-      printf ("  NetBSD\t0x%08lx\tMARCH <%s>\n", pnote->descsz,
+      printf ("  NetBSD\t\t0x%08lx\tMARCH <%s>\n", pnote->descsz,
              pnote->descdata);
       return TRUE;
 
+#ifdef   NT_NETBSD_PAX
+    case NT_NETBSD_PAX:
+      version = byte_get ((unsigned char *) pnote->descdata, sizeof (version));
+      printf ("  NetBSD\t\t0x%08lx\tPaX <%s%s%s%s%s%s>\n", pnote->descsz,
+             ((version & NT_NETBSD_PAX_MPROTECT) ? "+mprotect" : ""),
+             ((version & NT_NETBSD_PAX_NOMPROTECT) ? "-mprotect" : ""),
+             ((version & NT_NETBSD_PAX_GUARD) ? "+guard" : ""),
+             ((version & NT_NETBSD_PAX_NOGUARD) ? "-guard" : ""),
+             ((version & NT_NETBSD_PAX_ASLR) ? "+ASLR" : ""),
+             ((version & NT_NETBSD_PAX_NOASLR) ? "-ASLR" : ""));
+      return TRUE;
+#endif
+
     default:
       printf ("  NetBSD\t0x%08lx\tUnknown note type: (0x%08lx)\n", pnote->descsz,
              pnote->type);
@@ -18102,18 +18227,29 @@ get_netbsd_elfcore_note_type (Filedata * filedata, unsigned e_type)
 {
   static char buff[64];
 
-  if (e_type == NT_NETBSDCORE_PROCINFO)
-    return _("NetBSD procinfo structure");
+  switch (e_type)
+    {
+    case NT_NETBSDCORE_PROCINFO:
+      /* NetBSD core "procinfo" structure.  */
+      return _("NetBSD procinfo structure");
 
-  /* As of Jan 2002 there are no other machine-independent notes
-     defined for NetBSD core files.  If the note type is less
-     than the start of the machine-dependent note types, we don't
-     understand it.  */
+#ifdef NT_NETBSDCORE_AUXV
+    case NT_NETBSDCORE_AUXV:
+      return _("NetBSD ELF auxiliary vector data");
+#endif
 
-  if (e_type < NT_NETBSDCORE_FIRSTMACH)
-    {
-      snprintf (buff, sizeof (buff), _("Unknown note type: (0x%08x)"), e_type);
-      return buff;
+    default:
+      /* As of Jan 2002 there are no other machine-independent notes
+        defined for NetBSD core files.  If the note type is less
+        than the start of the machine-dependent note types, we don't
+        understand it.  */
+
+      if (e_type < NT_NETBSDCORE_FIRSTMACH)
+       {
+         snprintf (buff, sizeof (buff), _("Unknown note type: (0x%08x)"), e_type);
+         return buff;
+       }
+      break;
     }
 
   switch (filedata->file_header.e_machine)
@@ -18137,6 +18273,23 @@ get_netbsd_elfcore_note_type (Filedata * filedata, unsigned e_type)
        }
       break;
 
+    /* On SuperH, PT_GETREGS == mach+3 and PT_GETFPREGS == mach+5.
+       There's also old PT___GETREGS40 == mach + 1 for old reg
+       structure which lacks GBR.  */
+    case EM_SH:
+      switch (e_type)
+       {
+       case NT_NETBSDCORE_FIRSTMACH + 1:
+         return _("PT___GETREGS40 (old reg structure)");
+       case NT_NETBSDCORE_FIRSTMACH + 3:
+         return _("PT_GETREGS (reg structure)");
+       case NT_NETBSDCORE_FIRSTMACH + 5:
+         return _("PT_GETFPREGS (fpreg structure)");
+       default:
+         break;
+       }
+      break;
+
     /* On all other arch's, PT_GETREGS == mach+1 and
        PT_GETFPREGS == mach+3.  */
     default:
@@ -18219,7 +18372,7 @@ print_stapsdt_note (Elf_Internal_Note *pnote)
     }
   else
     goto stapdt_note_too_small;
-  
+
   if (data >= data_end)
     goto stapdt_note_too_small;
   maxlen = data_end - data;
@@ -18546,7 +18699,7 @@ same_section (Filedata * filedata, unsigned long addr1, unsigned long addr2)
 
   a1 = find_section_by_address (filedata, addr1);
   a2 = find_section_by_address (filedata, addr2);
-  
+
   return a1 == a2 && a1 != NULL;
 }
 
@@ -18610,7 +18763,7 @@ print_gnu_build_attribute_description (Elf_Internal_Note *  pnote,
       start = byte_get ((unsigned char *) pnote->descdata, 8);
       end = byte_get ((unsigned char *) pnote->descdata + 8, 8);
       break;
-      
+
     default:
       error (_("    <invalid description size: %lx>\n"), pnote->descsz);
       printf (_("    <invalid descsz>"));
@@ -18905,7 +19058,7 @@ print_gnu_build_attribute_name (Elf_Internal_Note * pnote)
 
   if (do_wide && left > 0)
     printf ("%-*s", left, " ");
-    
+
   return TRUE;
 }
 
@@ -18943,6 +19096,10 @@ process_note (Elf_Internal_Note *  pnote,
     /* NetBSD-specific core file notes.  */
     return process_netbsd_elf_note (pnote);
 
+  else if (const_strneq (pnote->namedata, "PaX"))
+    /* NetBSD-specific core file notes.  */
+    return process_netbsd_elf_note (pnote);
+
   else if (strneq (pnote->namedata, "SPU/", 4))
     {
       /* SPU-specific core file notes.  */
@@ -18999,7 +19156,7 @@ process_note (Elf_Internal_Note *  pnote,
 
       printf (_("   description data: "));
       for (i = 0; i < pnote->descsz; i++)
-       printf ("%02x ", pnote->descdata[i]);
+       printf ("%02x ", pnote->descdata[i] & 0xff);
       if (!do_wide)
        printf ("\n");
     }
@@ -19063,7 +19220,7 @@ process_notes_at (Filedata *           filedata,
       return FALSE;
     }
 
-  printf (_("  %-20s %10s\tDescription\n"), _("Owner"), _("Data size"));
+  printf (_("  %-20s %-10s\tDescription\n"), _("Owner"), _("Data size"));
 
   end = (char *) pnotes + length;
   while ((char *) external < end)
@@ -19628,6 +19785,7 @@ process_object (Filedata * filedata)
   for (i = ARRAY_SIZE (dynamic_info); i--;)
     dynamic_info[i] = 0;
   dynamic_info_DT_GNU_HASH = 0;
+  dynamic_info_DT_MIPS_XHASH = 0;
 
   /* Process the file.  */
   if (show_name)
@@ -19926,7 +20084,7 @@ process_archive (Filedata * filedata, bfd_boolean is_thin_archive)
          /* PR 24049 - we cannot use filedata->file_name as this will
             have already been freed.  */
          error (_("%s: failed to read archive header\n"), arch.file_name);
-           
+
           ret = FALSE;
           break;
         }
@@ -20020,7 +20178,7 @@ process_archive (Filedata * filedata, bfd_boolean is_thin_archive)
 
          thin_filedata.handle = nested_arch.file;
          thin_filedata.file_name = qualified_name;
-         
+
           if (! process_object (& thin_filedata))
            ret = FALSE;
         }
This page took 0.03846 seconds and 4 git commands to generate.