This commit was manufactured by cvs2svn to create branch 'gdb_7_0-branch'.
[external/binutils.git] / gdb / tui / tui-disasm.c
index 676f492..85c0e8b 100644 (file)
@@ -1,7 +1,7 @@
 /* Disassembly display.
 
-   Copyright (C) 1998, 1999, 2000, 2001, 2002, 2003, 2004 Free Software
-   Foundation, Inc.
+   Copyright (C) 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2007, 2008, 2009
+   Free Software Foundation, Inc.
 
    Contributed by Hewlett-Packard Company.
 
@@ -9,7 +9,7 @@
 
    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 2 of the License, or
+   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,
@@ -18,9 +18,7 @@
    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, write to the Free Software
-   Foundation, Inc., 51 Franklin Street, Fifth Floor,
-   Boston, MA 02110-1301, USA.  */
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
 
 #include "defs.h"
 #include "symtab.h"
 #include "tui/tui-winsource.h"
 #include "tui/tui-stack.h"
 #include "tui/tui-file.h"
+#include "tui/tui-disasm.h"
 
 #include "gdb_curses.h"
 
 struct tui_asm_line 
 {
   CORE_ADDR addr;
-  charaddr_string;
-  charinsn;
+  char *addr_string;
+  char *insn;
 };
 
 /* Function to set the disassembly window's content.
    Disassemble count lines starting at pc.
    Return address of the count'th instruction after pc.  */
 static CORE_ADDR
-tui_disassemble (struct tui_asm_line* asm_lines, CORE_ADDR pc, int count)
+tui_disassemble (struct gdbarch *gdbarch, struct tui_asm_line *asm_lines,
+                CORE_ADDR pc, int count)
 {
   struct ui_file *gdb_dis_out;
 
-  /* now init the ui_file structure */
+  /* Now init the ui_file structure.  */
   gdb_dis_out = tui_sfileopen (256);
 
-  /* Now construct each line */
+  /* Now construct each line */
   for (; count > 0; count--, asm_lines++)
     {
       if (asm_lines->addr_string)
@@ -66,33 +66,33 @@ tui_disassemble (struct tui_asm_line* asm_lines, CORE_ADDR pc, int count)
       if (asm_lines->insn)
         xfree (asm_lines->insn);
       
-      print_address (pc, gdb_dis_out);
+      print_address (gdbarch, pc, gdb_dis_out);
       asm_lines->addr = pc;
       asm_lines->addr_string = xstrdup (tui_file_get_strbuf (gdb_dis_out));
 
       ui_file_rewind (gdb_dis_out);
 
-      pc = pc + gdb_print_insn (pc, gdb_dis_out);
+      pc = pc + gdb_print_insn (gdbarch, pc, gdb_dis_out, NULL);
 
       asm_lines->insn = xstrdup (tui_file_get_strbuf (gdb_dis_out));
 
-      /* reset the buffer to empty */
+      /* Reset the buffer to empty.  */
       ui_file_rewind (gdb_dis_out);
     }
   ui_file_delete (gdb_dis_out);
   return pc;
 }
 
-/* Find the disassembly address that corresponds to FROM lines
-   above or below the PC.  Variable sized instructions are taken
-   into account by the algorithm.  */
+/* Find the disassembly address that corresponds to FROM lines above
+   or below the PC.  Variable sized instructions are taken into
+   account by the algorithm.  */
 static CORE_ADDR
-tui_find_disassembly_address (CORE_ADDR pc, int from)
+tui_find_disassembly_address (struct gdbarch *gdbarch, CORE_ADDR pc, int from)
 {
   CORE_ADDR new_low;
   int max_lines;
   int i;
-  struct tui_asm_lineasm_lines;
+  struct tui_asm_line *asm_lines;
 
   max_lines = (from > 0) ? from : - from;
   if (max_lines <= 1)
@@ -105,18 +105,18 @@ tui_find_disassembly_address (CORE_ADDR pc, int from)
   new_low = pc;
   if (from > 0)
     {
-      tui_disassemble (asm_lines, pc, max_lines);
+      tui_disassemble (gdbarch, asm_lines, pc, max_lines);
       new_low = asm_lines[max_lines - 1].addr;
     }
   else
     {
       CORE_ADDR last_addr;
       int pos;
-      struct minimal_symbolmsymbol;
+      struct minimal_symbol *msymbol;
               
-      /* Find backward an address which is a symbol
-         and for which disassembling from that address will fill
-         completely the window.  */
+      /* Find backward an address which is a symbol and for which
+         disassembling from that address will fill completely the
+         window.  */
       pos = max_lines - 1;
       do {
          new_low -= 1 * max_lines;
@@ -127,15 +127,14 @@ tui_find_disassembly_address (CORE_ADDR pc, int from)
          else
             new_low += 1 * max_lines;
 
-         tui_disassemble (asm_lines, new_low, max_lines);
+         tui_disassemble (gdbarch, asm_lines, new_low, max_lines);
          last_addr = asm_lines[pos].addr;
       } while (last_addr > pc && msymbol);
 
-      /* Scan forward disassembling one instruction at a time
-         until the last visible instruction of the window
-         matches the pc.  We keep the disassembled instructions
-         in the 'lines' window and shift it downward (increasing
-         its addresses).  */
+      /* Scan forward disassembling one instruction at a time until
+         the last visible instruction of the window matches the pc.
+         We keep the disassembled instructions in the 'lines' window
+         and shift it downward (increasing its addresses).  */
       if (last_addr < pc)
         do
           {
@@ -145,7 +144,8 @@ tui_find_disassembly_address (CORE_ADDR pc, int from)
             if (pos >= max_lines)
               pos = 0;
 
-            next_addr = tui_disassemble (&asm_lines[pos], last_addr, 1);
+            next_addr = tui_disassemble (gdbarch, &asm_lines[pos],
+                                        last_addr, 1);
 
             /* If there are some problems while disassembling exit.  */
             if (next_addr <= last_addr)
@@ -167,19 +167,19 @@ tui_find_disassembly_address (CORE_ADDR pc, int from)
 
 /* Function to set the disassembly window's content.  */
 enum tui_status
-tui_set_disassem_content (CORE_ADDR pc)
+tui_set_disassem_content (struct gdbarch *gdbarch, CORE_ADDR pc)
 {
   enum tui_status ret = TUI_FAILURE;
   int i;
   int offset = TUI_DISASM_WIN->detail.source_info.horizontal_offset;
   int line_width, max_lines;
   CORE_ADDR cur_pc;
-  struct tui_gen_win_info * locator = tui_locator_win_info_ptr ();
+  struct tui_gen_win_info *locator = tui_locator_win_info_ptr ();
   int tab_len = tui_default_tab_len ();
-  struct tui_asm_lineasm_lines;
+  struct tui_asm_line *asm_lines;
   int insn_pos;
   int addr_size, max_size;
-  charline;
+  char *line;
   
   if (pc == 0)
     return TUI_FAILURE;
@@ -188,12 +188,14 @@ tui_set_disassem_content (CORE_ADDR pc)
   if (ret != TUI_SUCCESS)
     return ret;
 
+  TUI_DISASM_WIN->detail.source_info.gdbarch = gdbarch;
   TUI_DISASM_WIN->detail.source_info.start_line_or_addr.loa = LOA_ADDRESS;
   TUI_DISASM_WIN->detail.source_info.start_line_or_addr.u.addr = pc;
   cur_pc = (CORE_ADDR)
     (((struct tui_win_element *) locator->content[0])->which_element.locator.addr);
 
-  max_lines = TUI_DISASM_WIN->generic.height - 2;      /* account for hilite */
+  max_lines = TUI_DISASM_WIN->generic.height - 2;      /* Account for
+                                                          hilite.  */
 
   /* Get temporary table that will hold all strings (addr & insn).  */
   asm_lines = (struct tui_asm_line*) alloca (sizeof (struct tui_asm_line)
@@ -202,7 +204,7 @@ tui_set_disassem_content (CORE_ADDR pc)
 
   line_width = TUI_DISASM_WIN->generic.width - 1;
 
-  tui_disassemble (asm_lines, pc, max_lines);
+  tui_disassemble (gdbarch, asm_lines, pc, max_lines);
 
   /* See what is the maximum length of an address and of a line.  */
   addr_size = 0;
@@ -223,11 +225,11 @@ tui_set_disassem_content (CORE_ADDR pc)
   line = (char*) alloca (max_size);
   insn_pos = (1 + (addr_size / tab_len)) * tab_len;
 
-  /* Now construct each line */
+  /* Now construct each line */
   for (i = 0; i < max_lines; i++)
     {
-      struct tui_win_element * element;
-      struct tui_source_elementsrc;
+      struct tui_win_element *element;
+      struct tui_source_element *src;
       int cur_len;
 
       element = (struct tui_win_element *) TUI_DISASM_WIN->generic.content[i];
@@ -235,7 +237,8 @@ tui_set_disassem_content (CORE_ADDR pc)
       strcpy (line, asm_lines[i].addr_string);
       cur_len = strlen (line);
 
-      /* Add spaces to make the instructions start on the same column */
+      /* Add spaces to make the instructions start on the same
+        column.  */
       while (cur_len < insn_pos)
         {
           strcat (line, " ");
@@ -244,7 +247,7 @@ tui_set_disassem_content (CORE_ADDR pc)
 
       strcat (line, asm_lines[i].insn);
 
-      /* Now copy the line taking the offset into account */
+      /* Now copy the line taking the offset into account */
       if (strlen (line) > offset)
         strcpy (src->line, &line[offset]);
       else
@@ -266,48 +269,48 @@ tui_set_disassem_content (CORE_ADDR pc)
 }
 
 
-/* Function to display the disassembly window with disassembled code.   */
+/* Function to display the disassembly window with disassembled code.  */
 void
-tui_show_disassem (CORE_ADDR start_addr)
+tui_show_disassem (struct gdbarch *gdbarch, CORE_ADDR start_addr)
 {
   struct symtab *s = find_pc_symtab (start_addr);
-  struct tui_win_info * win_with_focus = tui_win_with_focus ();
+  struct tui_win_info *win_with_focus = tui_win_with_focus ();
   struct tui_line_or_address val;
 
   val.loa = LOA_ADDRESS;
   val.u.addr = start_addr;
   tui_add_win_to_layout (DISASSEM_WIN);
-  tui_update_source_window (TUI_DISASM_WIN, s, val, FALSE);
-  /*
-     ** if the focus was in the src win, put it in the asm win, if the
-     ** source view isn't split
-   */
-  if (tui_current_layout () != SRC_DISASSEM_COMMAND && win_with_focus == TUI_SRC_WIN)
+  tui_update_source_window (TUI_DISASM_WIN, gdbarch, s, val, FALSE);
+
+  /* If the focus was in the src win, put it in the asm win, if the
+     source view isn't split.  */
+  if (tui_current_layout () != SRC_DISASSEM_COMMAND 
+      && win_with_focus == TUI_SRC_WIN)
     tui_set_win_focus_to (TUI_DISASM_WIN);
 
   return;
 }
 
 
-/* Function to display the disassembly window.   */
+/* Function to display the disassembly window.  */
 void
-tui_show_disassem_and_update_source (CORE_ADDR start_addr)
+tui_show_disassem_and_update_source (struct gdbarch *gdbarch,
+                                    CORE_ADDR start_addr)
 {
   struct symtab_and_line sal;
 
-  tui_show_disassem (start_addr);
+  tui_show_disassem (gdbarch, start_addr);
   if (tui_current_layout () == SRC_DISASSEM_COMMAND)
     {
       struct tui_line_or_address val;
 
-      /*
-         ** Update what is in the source window if it is displayed too,
-         ** note that it follows what is in the disassembly window and visa-versa
-       */
+      /* Update what is in the source window if it is displayed too,
+         note that it follows what is in the disassembly window and
+         visa-versa.  */
       sal = find_pc_line (start_addr, 0);
       val.loa = LOA_LINE;
       val.u.line_no = sal.line;
-      tui_update_source_window (TUI_SRC_WIN, sal.symtab, val, TRUE);
+      tui_update_source_window (TUI_SRC_WIN, gdbarch, sal.symtab, val, TRUE);
       if (sal.symtab)
        {
          set_current_source_symtab_and_line (&sal);
@@ -320,11 +323,12 @@ tui_show_disassem_and_update_source (CORE_ADDR start_addr)
   return;
 }
 
-CORE_ADDR
-tui_get_begin_asm_address (void)
+void
+tui_get_begin_asm_address (struct gdbarch **gdbarch_p, CORE_ADDR *addr_p)
 {
-  struct tui_gen_win_info * locator;
-  struct tui_locator_element * element;
+  struct tui_gen_win_info *locator;
+  struct tui_locator_element *element;
+  struct gdbarch *gdbarch = NULL;
   CORE_ADDR addr;
 
   locator = tui_locator_win_info_ptr ();
@@ -346,24 +350,29 @@ tui_get_begin_asm_address (void)
       else
         addr = 0;
     }
-  else                         /* the target is executing */
-    addr = element->addr;
+  else                         /* The target is executing.  */
+    {
+      gdbarch = element->gdbarch;
+      addr = element->addr;
+    }
 
-  return addr;
+  *gdbarch_p = gdbarch;
+  *addr_p = addr;
 }
 
 /* Determine what the low address will be to display in the TUI's
-   disassembly window.  This may or may not be the same as the
-   low address input.  */
+   disassembly window.  This may or may not be the same as the low
+   address input.  */
 CORE_ADDR
-tui_get_low_disassembly_address (CORE_ADDR low, CORE_ADDR pc)
+tui_get_low_disassembly_address (struct gdbarch *gdbarch,
+                                CORE_ADDR low, CORE_ADDR pc)
 {
   int pos;
 
-  /* Determine where to start the disassembly so that the pc is about in the
-     middle of the viewport.  */
+  /* Determine where to start the disassembly so that the pc is about
+     in the middle of the viewport.  */
   pos = tui_default_win_viewport_height (DISASSEM_WIN, DISASSEM_COMMAND) / 2;
-  pc = tui_find_disassembly_address (pc, -pos);
+  pc = tui_find_disassembly_address (gdbarch, pc, -pos);
 
   if (pc < low)
     pc = low;
@@ -377,26 +386,20 @@ tui_vertical_disassem_scroll (enum tui_scroll_direction scroll_direction,
 {
   if (TUI_DISASM_WIN->generic.content != NULL)
     {
+      struct gdbarch *gdbarch = TUI_DISASM_WIN->detail.source_info.gdbarch;
       CORE_ADDR pc;
       tui_win_content content;
-      struct symtab *s;
       struct tui_line_or_address val;
-      int max_lines, dir;
-      struct symtab_and_line cursal = get_current_source_symtab_and_line ();
+      int dir;
 
       content = (tui_win_content) TUI_DISASM_WIN->generic.content;
-      if (cursal.symtab == (struct symtab *) NULL)
-       s = find_pc_symtab (get_frame_pc (deprecated_selected_frame));
-      else
-       s = cursal.symtab;
 
-      /* account for hilite */
-      max_lines = TUI_DISASM_WIN->generic.height - 2;
       pc = content[0]->which_element.source.line_or_addr.u.addr;
-      dir = (scroll_direction == FORWARD_SCROLL) ? max_lines : - max_lines;
+      num_to_scroll++;
+      dir = (scroll_direction == FORWARD_SCROLL) ? num_to_scroll : -num_to_scroll;
 
       val.loa = LOA_ADDRESS;
-      val.u.addr = tui_find_disassembly_address (pc, dir);
-      tui_update_source_window_as_is (TUI_DISASM_WIN, s, val, FALSE);
+      val.u.addr = tui_find_disassembly_address (gdbarch, pc, dir);
+      tui_update_source_window_as_is (TUI_DISASM_WIN, gdbarch, NULL, val, FALSE);
     }
 }