gdb: add target_ops::supports_displaced_step
[deliverable/binutils-gdb.git] / binutils / objdump.c
index 210b67e79b221441e98a9f0d107b0f6f1f60b048..99e6df6eb17fbc7b07f439e8455fa534dd4dea98 100644 (file)
@@ -93,6 +93,7 @@ static int dump_dynamic_reloc_info;   /* -R */
 static int dump_ar_hdrs;               /* -a */
 static int dump_private_headers;       /* -p */
 static char *dump_private_options;     /* -P */
+static int no_addresses;               /* --no-addresses */
 static int prefix_addresses;           /* --prefix-addresses */
 static int with_line_numbers;          /* -l */
 static bfd_boolean with_source_code;   /* -S */
@@ -124,6 +125,9 @@ static size_t prefix_length;
 static bfd_boolean unwind_inlines;     /* --inlines.  */
 static const char * disasm_sym;                /* Disassembly start symbol.  */
 static const char * source_comment;     /* --source_comment.  */
+static bfd_boolean visualize_jumps = FALSE;          /* --visualize-jumps.  */
+static bfd_boolean color_output = FALSE;             /* --visualize-jumps=color.  */
+static bfd_boolean extended_color_output = FALSE;    /* --visualize-jumps=extended-color.  */
 
 static int demangle_flags = DMGL_ANSI | DMGL_PARAMS;
 
@@ -198,6 +202,9 @@ static const struct objdump_private_desc * const objdump_private_vectors[] =
     OBJDUMP_PRIVATE_VECTORS
     NULL
   };
+
+/* The list of detected jumps inside a function.  */
+static struct jump_info *detected_jumps = NULL;
 \f
 static void usage (FILE *, int) ATTRIBUTE_NORETURN;
 static void
@@ -264,6 +271,7 @@ usage (FILE *stream, int status)
   -z, --disassemble-zeroes       Do not skip blocks of zeroes when disassembling\n\
       --start-address=ADDR       Only process data whose address is >= ADDR\n\
       --stop-address=ADDR        Only process data whose address is < ADDR\n\
+      --no-addresses             Do not print address alongside disassembly\n\
       --prefix-addresses         Print complete address alongside disassembly\n\
       --[no-]show-raw-insn       Display hex alongside symbolic disassembly\n\
       --insn-width=WIDTH         Display WIDTH bytes on a single line for -d\n\
@@ -278,7 +286,12 @@ usage (FILE *stream, int status)
                              or deeper\n\
       --dwarf-check          Make additional dwarf internal consistency checks.\
       \n\
-      --ctf-parent=SECTION     Use SECTION as the CTF parent\n\n"));
+      --ctf-parent=SECTION       Use SECTION as the CTF parent\n\
+      --visualize-jumps          Visualize jumps by drawing ASCII art lines\n\
+      --visualize-jumps=color    Use colors in the ASCII art\n\
+      --visualize-jumps=extended-color   Use extended 8-bit color codes\n\
+      --visualize-jumps=off      Disable jump visualization\n\n"));
+
       list_supported_targets (program_name, stream);
       list_supported_architectures (program_name, stream);
 
@@ -316,7 +329,8 @@ enum option_values
     OPTION_INLINES,
     OPTION_SOURCE_COMMENT,
     OPTION_CTF,
-    OPTION_CTF_PARENT
+    OPTION_CTF_PARENT,
+    OPTION_VISUALIZE_JUMPS
   };
 
 static struct option long_options[]=
@@ -346,6 +360,7 @@ static struct option long_options[]=
   {"info", no_argument, NULL, 'i'},
   {"line-numbers", no_argument, NULL, 'l'},
   {"no-show-raw-insn", no_argument, &show_raw_insn, -1},
+  {"no-addresses", no_argument, &no_addresses, 1},
   {"prefix-addresses", no_argument, &prefix_addresses, 1},
   {"recurse-limit", no_argument, NULL, OPTION_RECURSE_LIMIT},
   {"recursion-limit", no_argument, NULL, OPTION_RECURSE_LIMIT},
@@ -376,6 +391,7 @@ static struct option long_options[]=
   {"dwarf-start", required_argument, 0, OPTION_DWARF_START},
   {"dwarf-check", no_argument, 0, OPTION_DWARF_CHECK},
   {"inlines", no_argument, 0, OPTION_INLINES},
+  {"visualize-jumps", optional_argument, 0, OPTION_VISUALIZE_JUMPS},
   {0, no_argument, 0, 0}
 };
 \f
@@ -1018,7 +1034,8 @@ objdump_print_symname (bfd *abfd, struct disassemble_info *inf,
     }
 
   if ((sym->flags & (BSF_SECTION_SYM | BSF_SYNTHETIC)) == 0)
-    version_string = bfd_get_symbol_version_string (abfd, sym, &hidden);
+    version_string = bfd_get_symbol_version_string (abfd, sym, TRUE,
+                                                   &hidden);
 
   if (bfd_is_und_section (bfd_asymbol_section (sym)))
     hidden = TRUE;
@@ -1052,6 +1069,13 @@ sym_ok (bfd_boolean               want_section,
 {
   if (want_section)
     {
+      /* NB: An object file can have different sections with the same
+         section name.  Compare compare section pointers if they have
+        the same owner.  */
+      if (sorted_syms[place]->section->owner == sec->owner
+         && sorted_syms[place]->section != sec)
+       return FALSE;
+
       /* Note - we cannot just compare section pointers because they could
         be different, but the same...  Ie the symbol that we are trying to
         find could have come from a separate debug info file.  Under such
@@ -1282,13 +1306,17 @@ objdump_print_addr_with_sym (bfd *abfd, asection *sec, asymbol *sym,
                             bfd_vma vma, struct disassemble_info *inf,
                             bfd_boolean skip_zeroes)
 {
-  objdump_print_value (vma, inf, skip_zeroes);
+  if (!no_addresses)
+    {
+      objdump_print_value (vma, inf, skip_zeroes);
+      (*inf->fprintf_func) (inf->stream, " ");
+    }
 
   if (sym == NULL)
     {
       bfd_vma secaddr;
 
-      (*inf->fprintf_func) (inf->stream, " <%s",
+      (*inf->fprintf_func) (inf->stream, "<%s",
                            sanitize_string (bfd_section_name (sec)));
       secaddr = bfd_section_vma (sec);
       if (vma < secaddr)
@@ -1305,7 +1333,7 @@ objdump_print_addr_with_sym (bfd *abfd, asection *sec, asymbol *sym,
     }
   else
     {
-      (*inf->fprintf_func) (inf->stream, " <");
+      (*inf->fprintf_func) (inf->stream, "<");
 
       objdump_print_symname (abfd, inf, sym);
 
@@ -1355,8 +1383,11 @@ objdump_print_addr (bfd_vma vma,
 
   if (sorted_symcount < 1)
     {
-      (*inf->fprintf_func) (inf->stream, "0x");
-      objdump_print_value (vma, inf, skip_zeroes);
+      if (!no_addresses)
+       {
+         (*inf->fprintf_func) (inf->stream, "0x");
+         objdump_print_value (vma, inf, skip_zeroes);
+       }
 
       if (display_file_offsets)
        inf->fprintf_func (inf->stream, _(" (File Offset: 0x%lx)"),
@@ -1691,7 +1722,7 @@ show_line (bfd *abfd, asection *section, bfd_vma addr_offset)
 
          /* Skip selected directory levels.  */
          for (s = fname + 1; *s != '\0' && level < prefix_strip; s++)
-           if (IS_DIR_SEPARATOR(*s))
+           if (IS_DIR_SEPARATOR (*s))
              {
                fname = s;
                level++;
@@ -1714,8 +1745,22 @@ show_line (bfd *abfd, asection *section, bfd_vma addr_offset)
          && (prev_functionname == NULL
              || strcmp (functionname, prev_functionname) != 0))
        {
-         printf ("%s():\n", sanitize_string (functionname));
+         char *demangle_alloc = NULL;
+         if (do_demangle && functionname[0] != '\0')
+           {
+             /* Demangle the name.  */
+             demangle_alloc = bfd_demangle (abfd, functionname,
+                                                 demangle_flags);
+           }
+
+         /* Demangling adds trailing parens, so don't print those.  */
+         if (demangle_alloc != NULL)
+           printf ("%s:\n", sanitize_string (demangle_alloc));
+         else
+           printf ("%s():\n", sanitize_string (functionname));
+
          prev_line = -1;
+         free (demangle_alloc);
        }
       if (linenumber > 0
          && (linenumber != prev_line
@@ -1845,6 +1890,595 @@ objdump_sprintf (SFILE *f, const char *format, ...)
   return n;
 }
 
+/* Code for generating (colored) diagrams of control flow start and end
+   points.  */
+
+/* Structure used to store the properties of a jump.  */
+
+struct jump_info
+{
+  /* The next jump, or NULL if this is the last object.  */
+  struct jump_info *next;
+  /* The previous jump, or NULL if this is the first object.  */
+  struct jump_info *prev;
+  /* The start addresses of the jump.  */
+  struct
+    {
+      /* The list of start addresses.  */
+      bfd_vma *addresses;
+      /* The number of elements.  */
+      size_t count;
+      /* The maximum number of elements that fit into the array.  */
+      size_t max_count;
+    } start;
+  /* The end address of the jump.  */
+  bfd_vma end;
+  /* The drawing level of the jump.  */
+  int level;
+};
+
+/* Construct a jump object for a jump from start
+   to end with the corresponding level.  */
+
+static struct jump_info *
+jump_info_new (bfd_vma start, bfd_vma end, int level)
+{
+  struct jump_info *result = xmalloc (sizeof (struct jump_info));
+
+  result->next = NULL;
+  result->prev = NULL;
+  result->start.addresses = xmalloc (sizeof (bfd_vma *) * 2);
+  result->start.addresses[0] = start;
+  result->start.count = 1;
+  result->start.max_count = 2;
+  result->end = end;
+  result->level = level;
+
+  return result;
+}
+
+/* Free a jump object and return the next object
+   or NULL if this was the last one.  */
+
+static struct jump_info *
+jump_info_free (struct jump_info *ji)
+{
+  struct jump_info *result = NULL;
+
+  if (ji)
+    {
+      result = ji->next;
+      if (ji->start.addresses)
+       free (ji->start.addresses);
+      free (ji);
+    }
+
+  return result;
+}
+
+/* Get the smallest value of all start and end addresses.  */
+
+static bfd_vma
+jump_info_min_address (const struct jump_info *ji)
+{
+  bfd_vma min_address = ji->end;
+  size_t i;
+
+  for (i = ji->start.count; i-- > 0;)
+    if (ji->start.addresses[i] < min_address)
+      min_address = ji->start.addresses[i];
+  return min_address;
+}
+
+/* Get the largest value of all start and end addresses.  */
+
+static bfd_vma
+jump_info_max_address (const struct jump_info *ji)
+{
+  bfd_vma max_address = ji->end;
+  size_t i;
+
+  for (i = ji->start.count; i-- > 0;)
+    if (ji->start.addresses[i] > max_address)
+      max_address = ji->start.addresses[i];
+  return max_address;
+}
+
+/* Get the target address of a jump.  */
+
+static bfd_vma
+jump_info_end_address (const struct jump_info *ji)
+{
+  return ji->end;
+}
+
+/* Test if an address is one of the start addresses of a jump.  */
+
+static bfd_boolean
+jump_info_is_start_address (const struct jump_info *ji, bfd_vma address)
+{
+  bfd_boolean result = FALSE;
+  size_t i;
+
+  for (i = ji->start.count; i-- > 0;)
+    if (address == ji->start.addresses[i])
+      {
+       result = TRUE;
+       break;
+      }
+
+  return result;
+}
+
+/* Test if an address is the target address of a jump.  */
+
+static bfd_boolean
+jump_info_is_end_address (const struct jump_info *ji, bfd_vma address)
+{
+  return (address == ji->end);
+}
+
+/* Get the difference between the smallest and largest address of a jump.  */
+
+static bfd_vma
+jump_info_size (const struct jump_info *ji)
+{
+  return jump_info_max_address (ji) - jump_info_min_address (ji);
+}
+
+/* Unlink a jump object from a list.  */
+
+static void
+jump_info_unlink (struct jump_info *node,
+                 struct jump_info **base)
+{
+  if (node->next)
+    node->next->prev = node->prev;
+  if (node->prev)
+    node->prev->next = node->next;
+  else
+    *base = node->next;
+  node->next = NULL;
+  node->prev = NULL;
+}
+
+/* Insert unlinked jump info node into a list.  */
+
+static void
+jump_info_insert (struct jump_info *node,
+                 struct jump_info *target,
+                 struct jump_info **base)
+{
+  node->next = target;
+  node->prev = target->prev;
+  target->prev = node;
+  if (node->prev)
+    node->prev->next = node;
+  else
+    *base = node;
+}
+
+/* Add unlinked node to the front of a list.  */
+
+static void
+jump_info_add_front (struct jump_info *node,
+                    struct jump_info **base)
+{
+  node->next = *base;
+  if (node->next)
+    node->next->prev = node;
+  node->prev = NULL;
+  *base = node;
+}
+
+/* Move linked node to target position.  */
+
+static void
+jump_info_move_linked (struct jump_info *node,
+                      struct jump_info *target,
+                      struct jump_info **base)
+{
+  /* Unlink node.  */
+  jump_info_unlink (node, base);
+  /* Insert node at target position.  */
+  jump_info_insert (node, target, base);
+}
+
+/* Test if two jumps intersect.  */
+
+static bfd_boolean
+jump_info_intersect (const struct jump_info *a,
+                    const struct jump_info *b)
+{
+  return ((jump_info_max_address (a) >= jump_info_min_address (b))
+         && (jump_info_min_address (a) <= jump_info_max_address (b)));
+}
+
+/* Merge two compatible jump info objects.  */
+
+static void
+jump_info_merge (struct jump_info **base)
+{
+  struct jump_info *a;
+
+  for (a = *base; a; a = a->next)
+    {
+      struct jump_info *b;
+
+      for (b = a->next; b; b = b->next)
+       {
+         /* Merge both jumps into one.  */
+         if (a->end == b->end)
+           {
+             /* Reallocate addresses.  */
+             size_t needed_size = a->start.count + b->start.count;
+             size_t i;
+
+             if (needed_size > a->start.max_count)
+               {
+                 a->start.max_count += b->start.max_count;
+                 a->start.addresses =
+                   xrealloc (a->start.addresses,
+                             a->start.max_count * sizeof (bfd_vma *));
+               }
+
+             /* Append start addresses.  */
+             for (i = 0; i < b->start.count; ++i)
+               a->start.addresses[a->start.count++] =
+                 b->start.addresses[i];
+
+             /* Remove and delete jump.  */
+             struct jump_info *tmp = b->prev;
+             jump_info_unlink (b, base);
+             jump_info_free (b);
+             b = tmp;
+           }
+       }
+    }
+}
+
+/* Sort jumps by their size and starting point using a stable
+   minsort. This could be improved if sorting performance is
+   an issue, for example by using mergesort.  */
+
+static void
+jump_info_sort (struct jump_info **base)
+{
+  struct jump_info *current_element = *base;
+
+  while (current_element)
+    {
+      struct jump_info *best_match = current_element;
+      struct jump_info *runner = current_element->next;
+      bfd_vma best_size = jump_info_size (best_match);
+
+      while (runner)
+       {
+         bfd_vma runner_size = jump_info_size (runner);
+
+         if ((runner_size < best_size)
+             || ((runner_size == best_size)
+                 && (jump_info_min_address (runner)
+                     < jump_info_min_address (best_match))))
+           {
+             best_match = runner;
+             best_size = runner_size;
+           }
+
+         runner = runner->next;
+       }
+
+      if (best_match == current_element)
+       current_element = current_element->next;
+      else
+       jump_info_move_linked (best_match, current_element, base);
+    }
+}
+
+/* Visualize all jumps at a given address.  */
+
+static void
+jump_info_visualize_address (bfd_vma address,
+                            int max_level,
+                            char *line_buffer,
+                            uint8_t *color_buffer)
+{
+  struct jump_info *ji = detected_jumps;
+  size_t len = (max_level + 1) * 3;
+
+  /* Clear line buffer.  */
+  memset (line_buffer, ' ', len);
+  memset (color_buffer, 0, len);
+
+  /* Iterate over jumps and add their ASCII art.  */
+  while (ji)
+    {
+      /* Discard jumps that are never needed again.  */
+      if (jump_info_max_address (ji) < address)
+       {
+         struct jump_info *tmp = ji;
+
+         ji = ji->next;
+         jump_info_unlink (tmp, &detected_jumps);
+         jump_info_free (tmp);
+         continue;
+       }
+
+      /* This jump intersects with the current address.  */
+      if (jump_info_min_address (ji) <= address)
+       {
+         /* Hash target address to get an even
+            distribution between all values.  */
+         bfd_vma hash_address = jump_info_end_address (ji);
+         uint8_t color = iterative_hash_object (hash_address, 0);
+         /* Fetch line offset.  */
+         int offset = (max_level - ji->level) * 3;
+
+         /* Draw start line.  */
+         if (jump_info_is_start_address (ji, address))
+           {
+             size_t i = offset + 1;
+
+             for (; i < len - 1; ++i)
+               if (line_buffer[i] == ' ')
+                 {
+                   line_buffer[i] = '-';
+                   color_buffer[i] = color;
+                 }
+
+             if (line_buffer[i] == ' ')
+               {
+                 line_buffer[i] = '-';
+                 color_buffer[i] = color;
+               }
+             else if (line_buffer[i] == '>')
+               {
+                 line_buffer[i] = 'X';
+                 color_buffer[i] = color;
+               }
+
+             if (line_buffer[offset] == ' ')
+               {
+                 if (address <= ji->end)
+                   line_buffer[offset] =
+                     (jump_info_min_address (ji) == address) ? '/': '+';
+                 else
+                   line_buffer[offset] =
+                     (jump_info_max_address (ji) == address) ? '\\': '+';
+                 color_buffer[offset] = color;
+               }
+           }
+         /* Draw jump target.  */
+         else if (jump_info_is_end_address (ji, address))
+           {
+             size_t i = offset + 1;
+
+             for (; i < len - 1; ++i)
+               if (line_buffer[i] == ' ')
+                 {
+                   line_buffer[i] = '-';
+                   color_buffer[i] = color;
+                 }
+
+             if (line_buffer[i] == ' ')
+               {
+                 line_buffer[i] = '>';
+                 color_buffer[i] = color;
+               }
+             else if (line_buffer[i] == '-')
+               {
+                 line_buffer[i] = 'X';
+                 color_buffer[i] = color;
+               }
+
+             if (line_buffer[offset] == ' ')
+               {
+                 if (jump_info_min_address (ji) < address)
+                   line_buffer[offset] =
+                     (jump_info_max_address (ji) > address) ? '>' : '\\';
+                 else
+                   line_buffer[offset] = '/';
+                 color_buffer[offset] = color;
+               }
+           }
+         /* Draw intermediate line segment.  */
+         else if (line_buffer[offset] == ' ')
+           {
+             line_buffer[offset] = '|';
+             color_buffer[offset] = color;
+           }
+       }
+
+      ji = ji->next;
+    }
+}
+
+/* Clone of disassemble_bytes to detect jumps inside a function.  */
+/* FIXME: is this correct? Can we strip it down even further?  */
+
+static struct jump_info *
+disassemble_jumps (struct disassemble_info * inf,
+                  disassembler_ftype        disassemble_fn,
+                  bfd_vma                   start_offset,
+                  bfd_vma                   stop_offset,
+                  bfd_vma                   rel_offset,
+                  arelent ***               relppp,
+                  arelent **                relppend)
+{
+  struct objdump_disasm_info *aux;
+  struct jump_info *jumps = NULL;
+  asection *section;
+  bfd_vma addr_offset;
+  unsigned int opb = inf->octets_per_byte;
+  int octets = opb;
+  SFILE sfile;
+
+  aux = (struct objdump_disasm_info *) inf->application_data;
+  section = inf->section;
+
+  sfile.alloc = 120;
+  sfile.buffer = (char *) xmalloc (sfile.alloc);
+  sfile.pos = 0;
+
+  inf->insn_info_valid = 0;
+  inf->fprintf_func = (fprintf_ftype) objdump_sprintf;
+  inf->stream = &sfile;
+
+  addr_offset = start_offset;
+  while (addr_offset < stop_offset)
+    {
+      int previous_octets;
+
+      /* Remember the length of the previous instruction.  */
+      previous_octets = octets;
+      octets = 0;
+
+      sfile.pos = 0;
+      inf->bytes_per_line = 0;
+      inf->bytes_per_chunk = 0;
+      inf->flags = ((disassemble_all ? DISASSEMBLE_DATA : 0)
+        | (wide_output ? WIDE_OUTPUT : 0));
+      if (machine)
+       inf->flags |= USER_SPECIFIED_MACHINE_TYPE;
+
+      if (inf->disassembler_needs_relocs
+         && (bfd_get_file_flags (aux->abfd) & EXEC_P) == 0
+         && (bfd_get_file_flags (aux->abfd) & DYNAMIC) == 0
+         && *relppp < relppend)
+       {
+         bfd_signed_vma distance_to_rel;
+
+         distance_to_rel = (**relppp)->address - (rel_offset + addr_offset);
+
+         /* Check to see if the current reloc is associated with
+            the instruction that we are about to disassemble.  */
+         if (distance_to_rel == 0
+             /* FIXME: This is wrong.  We are trying to catch
+                relocs that are addressed part way through the
+                current instruction, as might happen with a packed
+                VLIW instruction.  Unfortunately we do not know the
+                length of the current instruction since we have not
+                disassembled it yet.  Instead we take a guess based
+                upon the length of the previous instruction.  The
+                proper solution is to have a new target-specific
+                disassembler function which just returns the length
+                of an instruction at a given address without trying
+                to display its disassembly. */
+             || (distance_to_rel > 0
+               && distance_to_rel < (bfd_signed_vma) (previous_octets/ opb)))
+           {
+             inf->flags |= INSN_HAS_RELOC;
+           }
+       }
+
+      if (! disassemble_all
+         && (section->flags & (SEC_CODE | SEC_HAS_CONTENTS))
+         == (SEC_CODE | SEC_HAS_CONTENTS))
+       /* Set a stop_vma so that the disassembler will not read
+          beyond the next symbol.  We assume that symbols appear on
+          the boundaries between instructions.  We only do this when
+          disassembling code of course, and when -D is in effect.  */
+       inf->stop_vma = section->vma + stop_offset;
+
+      inf->stop_offset = stop_offset;
+
+      /* Extract jump information.  */
+      inf->insn_info_valid = 0;
+      octets = (*disassemble_fn) (section->vma + addr_offset, inf);
+      /* Test if a jump was detected.  */
+      if (inf->insn_info_valid
+         && ((inf->insn_type == dis_branch)
+             || (inf->insn_type == dis_condbranch)
+             || (inf->insn_type == dis_jsr)
+             || (inf->insn_type == dis_condjsr))
+         && (inf->target >= section->vma + start_offset)
+         && (inf->target < section->vma + stop_offset))
+       {
+         struct jump_info *ji =
+           jump_info_new (section->vma + addr_offset, inf->target, -1);
+         jump_info_add_front (ji, &jumps);
+       }
+
+      inf->stop_vma = 0;
+
+      addr_offset += octets / opb;
+    }
+
+  inf->fprintf_func = (fprintf_ftype) fprintf;
+  inf->stream = stdout;
+
+  free (sfile.buffer);
+
+  /* Merge jumps.  */
+  jump_info_merge (&jumps);
+  /* Process jumps.  */
+  jump_info_sort (&jumps);
+
+  /* Group jumps by level.  */
+  struct jump_info *last_jump = jumps;
+  int max_level = -1;
+
+  while (last_jump)
+    {
+      /* The last jump is part of the next group.  */
+      struct jump_info *base = last_jump;
+      /* Increment level.  */
+      base->level = ++max_level;
+
+      /* Find jumps that can be combined on the same
+        level, with the largest jumps tested first.
+        This has the advantage that large jumps are on
+        lower levels and do not intersect with small
+        jumps that get grouped on higher levels.  */
+      struct jump_info *exchange_item = last_jump->next;
+      struct jump_info *it = exchange_item;
+
+      for (; it; it = it->next)
+       {
+         /* Test if the jump intersects with any
+            jump from current group.  */
+         bfd_boolean ok = TRUE;
+         struct jump_info *it_collision;
+
+         for (it_collision = base;
+              it_collision != exchange_item;
+              it_collision = it_collision->next)
+           {
+             /* This jump intersects so we leave it out.  */
+             if (jump_info_intersect (it_collision, it))
+               {
+                 ok = FALSE;
+                 break;
+               }
+           }
+
+         /* Add jump to group.  */
+         if (ok)
+           {
+             /* Move current element to the front.  */
+             if (it != exchange_item)
+               {
+                 struct jump_info *save = it->prev;
+                 jump_info_move_linked (it, exchange_item, &jumps);
+                 last_jump = it;
+                 it = save;
+               }
+             else
+               {
+                 last_jump = exchange_item;
+                 exchange_item = exchange_item->next;
+               }
+             last_jump->level = max_level;
+           }
+       }
+
+      /* Move to next group.  */
+      last_jump = exchange_item;
+    }
+
+  return jumps;
+}
+
 /* The number of zeroes we want to see before we start skipping them.
    The number is arbitrarily chosen.  */
 
@@ -1865,6 +2499,47 @@ null_print (const void * stream ATTRIBUTE_UNUSED, const char * format ATTRIBUTE_
   return 1;
 }
 
+/* Print out jump visualization.  */
+
+static void
+print_jump_visualisation (bfd_vma addr, int max_level, char *line_buffer,
+                         uint8_t *color_buffer)
+{
+  if (!line_buffer)
+    return;
+
+  jump_info_visualize_address (addr, max_level, line_buffer, color_buffer);
+
+  size_t line_buffer_size = strlen (line_buffer);
+  char last_color = 0;
+  size_t i;
+
+  for (i = 0; i <= line_buffer_size; ++i)
+    {
+      if (color_output)
+       {
+         uint8_t color = (i < line_buffer_size) ? color_buffer[i]: 0;
+
+         if (color != last_color)
+           {
+             if (color)
+               if (extended_color_output)
+                 /* Use extended 8bit color, but
+                    do not choose dark colors.  */
+                 printf ("\033[38;5;%dm", 124 + (color % 108));
+               else
+                 /* Use simple terminal colors.  */
+                 printf ("\033[%dm", 31 + (color % 7));
+             else
+               /* Clear color.  */
+               printf ("\033[0m");
+             last_color = color;
+           }
+       }
+      putchar ((i < line_buffer_size) ? line_buffer[i]: ' ');
+    }
+}
+
 /* Disassemble some data in memory between given values.  */
 
 static void
@@ -1880,13 +2555,13 @@ disassemble_bytes (struct disassemble_info * inf,
 {
   struct objdump_disasm_info *aux;
   asection *section;
-  int octets_per_line;
-  int skip_addr_chars;
+  unsigned int octets_per_line;
+  unsigned int skip_addr_chars;
   bfd_vma addr_offset;
   unsigned int opb = inf->octets_per_byte;
   unsigned int skip_zeroes = inf->skip_zeroes;
   unsigned int skip_zeroes_at_end = inf->skip_zeroes_at_end;
-  int octets = opb;
+  size_t octets;
   SFILE sfile;
 
   aux = (struct objdump_disasm_info *) inf->application_data;
@@ -1908,7 +2583,7 @@ disassemble_bytes (struct disassemble_info * inf,
      zeroes in chunks of 4, ensuring that there is always a leading
      zero remaining.  */
   skip_addr_chars = 0;
-  if (! prefix_addresses)
+  if (!no_addresses && !prefix_addresses)
     {
       char buf[30];
 
@@ -1927,10 +2602,34 @@ disassemble_bytes (struct disassemble_info * inf,
 
   inf->insn_info_valid = 0;
 
+  /* Determine maximum level. */
+  uint8_t *color_buffer = NULL;
+  char *line_buffer = NULL;
+  int max_level = -1;
+
+  /* Some jumps were detected.  */
+  if (detected_jumps)
+    {
+      struct jump_info *ji;
+
+      /* Find maximum jump level.  */
+      for (ji = detected_jumps; ji; ji = ji->next)
+       {
+         if (ji->level > max_level)
+           max_level = ji->level;
+       }
+
+      /* Allocate buffers.  */
+      size_t len = (max_level + 1) * 3 + 1;
+      line_buffer = xmalloc (len);
+      line_buffer[len - 1] = 0;
+      color_buffer = xmalloc (len);
+      color_buffer[len - 1] = 0;
+    }
+
   addr_offset = start_offset;
   while (addr_offset < stop_offset)
     {
-      bfd_vma z;
       bfd_boolean need_nl = FALSE;
 
       octets = 0;
@@ -1940,46 +2639,49 @@ disassemble_bytes (struct disassemble_info * inf,
 
       /* If we see more than SKIP_ZEROES octets of zeroes, we just
         print `...'.  */
-      for (z = addr_offset * opb; z < stop_offset * opb; z++)
-       if (data[z] != 0)
-         break;
+      if (! disassemble_zeroes)
+       for (; addr_offset * opb + octets < stop_offset * opb; octets++)
+         if (data[addr_offset * opb + octets] != 0)
+           break;
       if (! disassemble_zeroes
          && (inf->insn_info_valid == 0
              || inf->branch_delay_insns == 0)
-         && (z - addr_offset * opb >= skip_zeroes
-             || (z == stop_offset * opb &&
-                 z - addr_offset * opb < skip_zeroes_at_end)))
+         && (octets >= skip_zeroes
+             || (addr_offset * opb + octets == stop_offset * opb
+                 && octets < skip_zeroes_at_end)))
        {
          /* If there are more nonzero octets to follow, we only skip
             zeroes in multiples of 4, to try to avoid running over
             the start of an instruction which happens to start with
             zero.  */
-         if (z != stop_offset * opb)
-           z = addr_offset * opb + ((z - addr_offset * opb) &~ 3);
-
-         octets = z - addr_offset * opb;
+         if (addr_offset * opb + octets != stop_offset * opb)
+           octets &= ~3;
 
          /* If we are going to display more data, and we are displaying
             file offsets, then tell the user how many zeroes we skip
             and the file offset from where we resume dumping.  */
-         if (display_file_offsets && ((addr_offset + (octets / opb)) < stop_offset))
-           printf ("\t... (skipping %d zeroes, resuming at file offset: 0x%lx)\n",
-                   octets / opb,
+         if (display_file_offsets
+             && addr_offset + octets / opb < stop_offset)
+           printf (_("\t... (skipping %lu zeroes, "
+                     "resuming at file offset: 0x%lx)\n"),
+                   (unsigned long) (octets / opb),
                    (unsigned long) (section->filepos
-                                    + (addr_offset + (octets / opb))));
+                                    + addr_offset + octets / opb));
          else
            printf ("\t...\n");
        }
       else
        {
          char buf[50];
-         int bpc = 0;
-         int pb = 0;
+         unsigned int bpc = 0;
+         unsigned int pb = 0;
 
          if (with_line_numbers || with_source_code)
            show_line (aux->abfd, section, addr_offset);
 
-         if (! prefix_addresses)
+         if (no_addresses)
+           printf ("\t");
+         else if (!prefix_addresses)
            {
              char *s;
 
@@ -1998,8 +2700,14 @@ disassemble_bytes (struct disassemble_info * inf,
              putchar (' ');
            }
 
+         print_jump_visualisation (section->vma + addr_offset,
+                                   max_level, line_buffer,
+                                   color_buffer);
+
          if (insns)
            {
+             int insn_size;
+
              sfile.pos = 0;
              inf->fprintf_func = (fprintf_ftype) objdump_sprintf;
              inf->stream = &sfile;
@@ -2016,13 +2724,13 @@ disassemble_bytes (struct disassemble_info * inf,
                  && *relppp < relppend)
                {
                  bfd_signed_vma distance_to_rel;
-                 int insn_size = 0;
                  int max_reloc_offset
                    = aux->abfd->arch_info->max_reloc_offset_into_insn;
 
                  distance_to_rel = ((**relppp)->address - rel_offset
                                     - addr_offset);
 
+                 insn_size = 0;
                  if (distance_to_rel > 0
                      && (max_reloc_offset < 0
                          || distance_to_rel <= max_reloc_offset))
@@ -2063,8 +2771,8 @@ disassemble_bytes (struct disassemble_info * inf,
                }
 
              if (! disassemble_all
-                 && (section->flags & (SEC_CODE | SEC_HAS_CONTENTS))
-                 == (SEC_CODE | SEC_HAS_CONTENTS))
+                 && ((section->flags & (SEC_CODE | SEC_HAS_CONTENTS))
+                     == (SEC_CODE | SEC_HAS_CONTENTS)))
                /* Set a stop_vma so that the disassembler will not read
                   beyond the next symbol.  We assume that symbols appear on
                   the boundaries between instructions.  We only do this when
@@ -2072,21 +2780,22 @@ disassemble_bytes (struct disassemble_info * inf,
                inf->stop_vma = section->vma + stop_offset;
 
              inf->stop_offset = stop_offset;
-             octets = (*disassemble_fn) (section->vma + addr_offset, inf);
+             insn_size = (*disassemble_fn) (section->vma + addr_offset, inf);
+             octets = insn_size;
 
              inf->stop_vma = 0;
              inf->fprintf_func = (fprintf_ftype) fprintf;
              inf->stream = stdout;
              if (insn_width == 0 && inf->bytes_per_line != 0)
                octets_per_line = inf->bytes_per_line;
-             if (octets < (int) opb)
+             if (insn_size < (int) opb)
                {
                  if (sfile.pos)
                    printf ("%s\n", sfile.buffer);
-                 if (octets >= 0)
+                 if (insn_size >= 0)
                    {
                      non_fatal (_("disassemble_fn returned length %d"),
-                                octets);
+                                insn_size);
                      exit_status = 1;
                    }
                  break;
@@ -2132,11 +2841,11 @@ disassemble_bytes (struct disassemble_info * inf,
                  /* PR 21580: Check for a buffer ending early.  */
                  if (j + bpc <= stop_offset * opb)
                    {
-                     int k;
+                     unsigned int k;
 
                      if (inf->display_endian == BFD_ENDIAN_LITTLE)
                        {
-                         for (k = bpc - 1; k >= 0; k--)
+                         for (k = bpc; k-- != 0; )
                            printf ("%02x", (unsigned) data[j + k]);
                        }
                      else
@@ -2150,7 +2859,7 @@ disassemble_bytes (struct disassemble_info * inf,
 
              for (; pb < octets_per_line; pb += bpc)
                {
-                 int k;
+                 unsigned int k;
 
                  for (k = 0; k < bpc; k++)
                    printf ("  ");
@@ -2181,12 +2890,21 @@ disassemble_bytes (struct disassemble_info * inf,
                  putchar ('\n');
                  j = addr_offset * opb + pb;
 
-                 bfd_sprintf_vma (aux->abfd, buf, section->vma + j / opb);
-                 for (s = buf + skip_addr_chars; *s == '0'; s++)
-                   *s = ' ';
-                 if (*s == '\0')
-                   *--s = '0';
-                 printf ("%s:\t", buf + skip_addr_chars);
+                 if (no_addresses)
+                   printf ("\t");
+                 else
+                   {
+                     bfd_sprintf_vma (aux->abfd, buf, section->vma + j / opb);
+                     for (s = buf + skip_addr_chars; *s == '0'; s++)
+                       *s = ' ';
+                     if (*s == '\0')
+                       *--s = '0';
+                     printf ("%s:\t", buf + skip_addr_chars);
+                   }
+
+                 print_jump_visualisation (section->vma + j / opb,
+                                           max_level, line_buffer,
+                                           color_buffer);
 
                  pb += octets_per_line;
                  if (pb > octets)
@@ -2196,11 +2914,11 @@ disassemble_bytes (struct disassemble_info * inf,
                      /* PR 21619: Check for a buffer ending early.  */
                      if (j + bpc <= stop_offset * opb)
                        {
-                         int k;
+                         unsigned int k;
 
                          if (inf->display_endian == BFD_ENDIAN_LITTLE)
                            {
-                             for (k = bpc - 1; k >= 0; k--)
+                             for (k = bpc; k-- != 0; )
                                printf ("%02x", (unsigned) data[j + k]);
                            }
                          else
@@ -2234,15 +2952,19 @@ disassemble_bytes (struct disassemble_info * inf,
              else
                printf ("\t\t\t");
 
-             objdump_print_value (section->vma - rel_offset + q->address,
-                                  inf, TRUE);
+             if (!no_addresses)
+               {
+                 objdump_print_value (section->vma - rel_offset + q->address,
+                                      inf, TRUE);
+                 printf (": ");
+               }
 
              if (q->howto == NULL)
-               printf ("*unknown*\t");
+               printf ("*unknown*\t");
              else if (q->howto->name)
-               printf ("%s\t", q->howto->name);
+               printf ("%s\t", q->howto->name);
              else
-               printf ("%d\t", q->howto->type);
+               printf ("%d\t", q->howto->type);
 
              if (q->sym_ptr_ptr == NULL || *q->sym_ptr_ptr == NULL)
                printf ("*unknown*");
@@ -2291,6 +3013,8 @@ disassemble_bytes (struct disassemble_info * inf,
     }
 
   free (sfile.buffer);
+  free (line_buffer);
+  free (color_buffer);
 }
 
 static void
@@ -2410,7 +3134,8 @@ disassemble_section (bfd *abfd, asection *section, void *inf)
 
   /* Sort the symbols into value and section order.  */
   compare_section = section;
-  qsort (sorted_syms, sorted_symcount, sizeof (asymbol *), compare_symbols);
+  if (sorted_symcount > 1)
+    qsort (sorted_syms, sorted_symcount, sizeof (asymbol *), compare_symbols);
 
   /* Skip over the relocs belonging to addresses below the
      start address.  */
@@ -2611,9 +3336,42 @@ disassemble_section (bfd *abfd, asection *section, void *inf)
        insns = FALSE;
 
       if (do_print)
-       disassemble_bytes (pinfo, paux->disassemble_fn, insns, data,
-                          addr_offset, nextstop_offset,
-                          rel_offset, &rel_pp, rel_ppend);
+       {
+         /* Resolve symbol name.  */
+         if (visualize_jumps && abfd && sym && sym->name)
+           {
+             struct disassemble_info di;
+             SFILE sf;
+
+             sf.alloc = strlen (sym->name) + 40;
+             sf.buffer = (char*) xmalloc (sf.alloc);
+             sf.pos = 0;
+             di.fprintf_func = (fprintf_ftype) objdump_sprintf;
+             di.stream = &sf;
+
+             objdump_print_symname (abfd, &di, sym);
+
+             /* Fetch jump information.  */
+             detected_jumps = disassemble_jumps
+               (pinfo, paux->disassemble_fn,
+                addr_offset, nextstop_offset,
+                rel_offset, &rel_pp, rel_ppend);
+
+             /* Free symbol name.  */
+             free (sf.buffer);
+           }
+
+         /* Add jumps to output.  */
+         disassemble_bytes (pinfo, paux->disassemble_fn, insns, data,
+                            addr_offset, nextstop_offset,
+                            rel_offset, &rel_pp, rel_ppend);
+
+         /* Free jumps.  */
+         while (detected_jumps)
+           {
+             detected_jumps = jump_info_free (detected_jumps);
+           }
+       }
 
       addr_offset = nextstop_offset;
       sym = nextsym;
@@ -2644,10 +3402,13 @@ disassemble_data (bfd *abfd)
   sorted_symcount = symcount ? symcount : dynsymcount;
   sorted_syms = (asymbol **) xmalloc ((sorted_symcount + synthcount)
                                       * sizeof (asymbol *));
-  memcpy (sorted_syms, symcount ? syms : dynsyms,
-         sorted_symcount * sizeof (asymbol *));
+  if (sorted_symcount != 0)
+    {
+      memcpy (sorted_syms, symcount ? syms : dynsyms,
+             sorted_symcount * sizeof (asymbol *));
 
-  sorted_symcount = remove_useless_symbols (sorted_syms, sorted_symcount);
+      sorted_symcount = remove_useless_symbols (sorted_syms, sorted_symcount);
+    }
 
   for (i = 0; i < synthcount; ++i)
     {
@@ -2945,6 +3706,33 @@ open_debug_file (const char * pathname)
   return data;
 }
 
+#if HAVE_LIBDEBUGINFOD
+/* Return a hex string represention of the build-id.  */
+
+unsigned char *
+get_build_id (void * data)
+{
+  unsigned i;
+  char * build_id_str;
+  bfd * abfd = (bfd *) data;
+  const struct bfd_build_id * build_id;
+
+  build_id = abfd->build_id;
+  if (build_id == NULL)
+    return NULL;
+
+  build_id_str = malloc (build_id->size * 2 + 1);
+  if (build_id_str == NULL)
+    return NULL;
+
+  for (i = 0; i < build_id->size; i++)
+    sprintf (build_id_str + (i * 2), "%02x", build_id->data[i]);
+  build_id_str[build_id->size * 2] = '\0';
+
+  return (unsigned char *)build_id_str;
+}
+#endif /* HAVE_LIBDEBUGINFOD */
+
 static void
 dump_dwarf_section (bfd *abfd, asection *section,
                    void *arg ATTRIBUTE_UNUSED)
@@ -3219,7 +4007,7 @@ dump_bfd_header (bfd *abfd)
                                   bfd_get_mach (abfd)));
   printf (_("flags 0x%08x:\n"), abfd->flags & ~BFD_FLAGS_FOR_BFD_USE_MASK);
 
-#define PF(x, y)    if (abfd->flags & x) {printf("%s%s", comma, y); comma=", ";}
+#define PF(x, y)    if (abfd->flags & x) {printf ("%s%s", comma, y); comma=", ";}
   PF (HAS_RELOC, "HAS_RELOC");
   PF (EXEC_P, "EXEC_P");
   PF (HAS_LINENO, "HAS_LINENO");
@@ -3763,7 +4551,7 @@ dump_reloc_set (bfd *abfd, asection *sec, arelent **relpp, long relcount)
             Undo this transformation, otherwise the output
             will be confusing.  */
          if (abfd->xvec->flavour == bfd_target_elf_flavour
-             && elf_tdata(abfd)->elf_header->e_machine == EM_SPARCV9
+             && elf_tdata (abfd)->elf_header->e_machine == EM_SPARCV9
              && relcount > 1
              && !strcmp (q->howto->name, "R_SPARC_LO10"))
            {
@@ -4410,6 +5198,25 @@ main (int argc, char **argv)
        case OPTION_INLINES:
          unwind_inlines = TRUE;
          break;
+       case OPTION_VISUALIZE_JUMPS:
+         visualize_jumps = TRUE;
+         color_output = FALSE;
+         extended_color_output = FALSE;
+         if (optarg != NULL)
+           {
+             if (streq (optarg, "color"))
+               color_output = TRUE;
+             else if (streq (optarg, "extended-color"))
+               {
+                 color_output = TRUE;
+                 extended_color_output = TRUE;
+               }
+             else if (streq (optarg, "off"))
+               visualize_jumps = FALSE;
+             else
+               nonfatal (_("unrecognized argument to --visualize-option"));
+           }
+         break;
        case 'E':
          if (strcmp (optarg, "B") == 0)
            endian = BFD_ENDIAN_BIG;
This page took 0.037691 seconds and 4 git commands to generate.