contrib/gdb-7/gdb/mi/mi-cmd-disas.c

   1 /* MI Command Set - disassemble commands.
   2    Copyright (C) 2000-2015 Free Software Foundation, Inc.
   3    Contributed by Cygnus Solutions (a Red Hat company).
   4
   5    This file is part of GDB.
   6
   7    This program is free software; you can redistribute it and/or modify
   8    it under the terms of the GNU General Public License as published by
   9    the Free Software Foundation; either version 3 of the License, or
  10    (at your option) any later version.
  11
  12    This program is distributed in the hope that it will be useful,
  13    but WITHOUT ANY WARRANTY; without even the implied warranty of
  14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15    GNU General Public License for more details.
  16
  17    You should have received a copy of the GNU General Public License
  18    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
  19
  20 #include "defs.h"
  21 #include "arch-utils.h"
  22 #include "target.h"
  23 #include "value.h"
  24 #include "mi-cmds.h"
  25 #include "mi-getopt.h"
  26 #include "ui-out.h"
  27 #include "disasm.h"
  28
  29 /* The arguments to be passed on the command line and parsed here are
  30    either:
  31
  32    START-ADDRESS: address to start the disassembly at.
  33    END-ADDRESS: address to end the disassembly at.
  34
  35    or:
  36
  37    FILENAME: The name of the file where we want disassemble from.
  38    LINE: The line around which we want to disassemble. It will
  39    disassemble the function that contins that line.
  40    HOW_MANY: Number of disassembly lines to display. With source, it
  41    is the number of disassembly lines only, not counting the source
  42    lines.
  43
  44    always required:
  45
  46    MODE: 0 -- disassembly.
  47          1 -- disassembly and source.
  48          2 -- disassembly and opcodes.
  49          3 -- disassembly, source and opcodes.
  50 */
  51
  52 void
  53 mi_cmd_disassemble (char *command, char **argv, int argc)
  54 {
  55   struct gdbarch *gdbarch = get_current_arch ();
  56   struct ui_out *uiout = current_uiout;
  57   CORE_ADDR start;
  58
  59   int mode, disasm_flags;
  60   struct symtab *s;
  61
  62   /* Which options have we processed ... */
  63   int file_seen = 0;
  64   int line_seen = 0;
  65   int num_seen = 0;
  66   int start_seen = 0;
  67   int end_seen = 0;
  68
  69   /* ... and their corresponding value. */
  70   char *file_string = NULL;
  71   int line_num = -1;
  72   int how_many = -1;
  73   CORE_ADDR low = 0;
  74   CORE_ADDR high = 0;
  75   struct cleanup *cleanups = make_cleanup (null_cleanup, NULL);
  76
  77   /* Options processing stuff.  */
  78   int oind = 0;
  79   char *oarg;
  80   enum opt
  81   {
  82     FILE_OPT, LINE_OPT, NUM_OPT, START_OPT, END_OPT
  83   };
  84   static const struct mi_opt opts[] =
  85     {
  86       {"f", FILE_OPT, 1},
  87       {"l", LINE_OPT, 1},
  88       {"n", NUM_OPT, 1},
  89       {"s", START_OPT, 1},
  90       {"e", END_OPT, 1},
  91       { 0, 0, 0 }
  92     };
  93
  94   /* Get the options with their arguments. Keep track of what we
  95      encountered.  */
  96   while (1)
  97     {
  98       int opt = mi_getopt ("-data-disassemble", argc, argv, opts,
  99                            &oind, &oarg);
 100       if (opt < 0)
 101         break;
 102       switch ((enum opt) opt)
 103         {
 104         case FILE_OPT:
 105           file_string = xstrdup (oarg);
 106           file_seen = 1;
 107           make_cleanup (xfree, file_string);
 108           break;
 109         case LINE_OPT:
 110           line_num = atoi (oarg);
 111           line_seen = 1;
 112           break;
 113         case NUM_OPT:
 114           how_many = atoi (oarg);
 115           num_seen = 1;
 116           break;
 117         case START_OPT:
 118           low = parse_and_eval_address (oarg);
 119           start_seen = 1;
 120           break;
 121         case END_OPT:
 122           high = parse_and_eval_address (oarg);
 123           end_seen = 1;
 124           break;
 125         }
 126     }
 127   argv += oind;
 128   argc -= oind;
 129
 130   /* Allow only filename + linenum (with how_many which is not
 131      required) OR start_addr + end_addr.  */
 132
 133   if (!((line_seen && file_seen && num_seen && !start_seen && !end_seen)
 134         || (line_seen && file_seen && !num_seen && !start_seen && !end_seen)
 135         || (!line_seen && !file_seen && !num_seen && start_seen && end_seen)))
 136     error (_("-data-disassemble: Usage: ( [-f filename -l linenum [-n "
 137              "howmany]] | [-s startaddr -e endaddr]) [--] mode."));
 138
 139   if (argc != 1)
 140     error (_("-data-disassemble: Usage: [-f filename -l linenum "
 141              "[-n howmany]] [-s startaddr -e endaddr] [--] mode."));
 142
 143   mode = atoi (argv[0]);
 144   if (mode < 0 || mode > 3)
 145     error (_("-data-disassemble: Mode argument must be 0, 1, 2, or 3."));
 146
 147   /* Convert the mode into a set of disassembly flags.  */
 148
 149   disasm_flags = 0;
 150   if (mode & 0x1)
 151     disasm_flags |= DISASSEMBLY_SOURCE;
 152   if (mode & 0x2)
 153     disasm_flags |= DISASSEMBLY_RAW_INSN;
 154
 155   /* We must get the function beginning and end where line_num is
 156      contained.  */
 157
 158   if (line_seen && file_seen)
 159     {
 160       s = lookup_symtab (file_string);
 161       if (s == NULL)
 162         error (_("-data-disassemble: Invalid filename."));
 163       if (!find_line_pc (s, line_num, &start))
 164         error (_("-data-disassemble: Invalid line number"));
 165       if (find_pc_partial_function (start, NULL, &low, &high) == 0)
 166         error (_("-data-disassemble: "
 167                  "No function contains specified address"));
 168     }
 169
 170   gdb_disassembly (gdbarch, uiout,
 171                    file_string,
 172                    disasm_flags,
 173                    how_many, low, high);
 174
 175   do_cleanups (cleanups);
 176 }