gdb/mi/mi-cmd-disas.c

   1 /* MI Command Set - disassemble commands.
   2    Copyright (C) 2000-2020 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 contains 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 (with deprecated source-centric view).
  48          2 -- disassembly and opcodes.
  49          3 -- disassembly, source-centric and opcodes.
  50          4 -- disassembly, and source (with pc-centric view).
  51          5 -- disassembly, source (pc-centric) and opcodes.  */
  52
  53 void
  54 mi_cmd_disassemble (const char *command, char **argv, int argc)
  55 {
  56   struct gdbarch *gdbarch = get_current_arch ();
  57   struct ui_out *uiout = current_uiout;
  58   CORE_ADDR start;
  59
  60   int mode;
  61   gdb_disassembly_flags disasm_flags;
  62   struct symtab *s;
  63
  64   /* Which options have we processed ... */
  65   int file_seen = 0;
  66   int line_seen = 0;
  67   int num_seen = 0;
  68   int start_seen = 0;
  69   int end_seen = 0;
  70   int addr_seen = 0;
  71
  72   /* ... and their corresponding value. */
  73   char *file_string = NULL;
  74   int line_num = -1;
  75   int how_many = -1;
  76   CORE_ADDR low = 0;
  77   CORE_ADDR high = 0;
  78   CORE_ADDR addr = 0;
  79
  80   /* Options processing stuff.  */
  81   int oind = 0;
  82   char *oarg;
  83   enum opt
  84   {
  85     FILE_OPT, LINE_OPT, NUM_OPT, START_OPT, END_OPT, ADDR_OPT
  86   };
  87   static const struct mi_opt opts[] =
  88     {
  89       {"f", FILE_OPT, 1},
  90       {"l", LINE_OPT, 1},
  91       {"n", NUM_OPT, 1},
  92       {"s", START_OPT, 1},
  93       {"e", END_OPT, 1},
  94       {"a", ADDR_OPT, 1},
  95       { 0, 0, 0 }
  96     };
  97
  98   /* Get the options with their arguments. Keep track of what we
  99      encountered.  */
 100   while (1)
 101     {
 102       int opt = mi_getopt ("-data-disassemble", argc, argv, opts,
 103                            &oind, &oarg);
 104       if (opt < 0)
 105         break;
 106       switch ((enum opt) opt)
 107         {
 108         case FILE_OPT:
 109           file_string = oarg;
 110           file_seen = 1;
 111           break;
 112         case LINE_OPT:
 113           line_num = atoi (oarg);
 114           line_seen = 1;
 115           break;
 116         case NUM_OPT:
 117           how_many = atoi (oarg);
 118           num_seen = 1;
 119           break;
 120         case START_OPT:
 121           low = parse_and_eval_address (oarg);
 122           start_seen = 1;
 123           break;
 124         case END_OPT:
 125           high = parse_and_eval_address (oarg);
 126           end_seen = 1;
 127           break;
 128         case ADDR_OPT:
 129           addr = parse_and_eval_address (oarg);
 130           addr_seen = 1;
 131           break;
 132         }
 133     }
 134   argv += oind;
 135   argc -= oind;
 136
 137   /* Allow only filename + linenum (with how_many which is not
 138      required) OR start_addr + end_addr OR addr.  */
 139
 140   if (!(
 141           ( line_seen &&  file_seen &&              !start_seen && !end_seen
 142                                                                 && !addr_seen)
 143
 144        || (!line_seen && !file_seen && !num_seen &&  start_seen &&  end_seen
 145                                                                 && !addr_seen)
 146
 147        || (!line_seen && !file_seen && !num_seen && !start_seen && !end_seen
 148                                                                 &&  addr_seen))
 149       || argc != 1)
 150     error (_("-data-disassemble: Usage: ( [-f filename -l linenum "
 151              "[-n howmany]] | [-s startaddr -e endaddr] | [-a addr] ) [--] mode."));
 152
 153   mode = atoi (argv[0]);
 154   if (mode < 0 || mode > 5)
 155     error (_("-data-disassemble: Mode argument must be in the range 0-5."));
 156
 157   /* Convert the mode into a set of disassembly flags.  */
 158
 159   disasm_flags = 0;  /* Initialize here for -Wall.  */
 160   switch (mode)
 161     {
 162     case 0:
 163       break;
 164     case 1:
 165       disasm_flags |= DISASSEMBLY_SOURCE_DEPRECATED;
 166       break;
 167     case 2:
 168       disasm_flags |= DISASSEMBLY_RAW_INSN;
 169       break;
 170     case 3:
 171       disasm_flags |= DISASSEMBLY_SOURCE_DEPRECATED | DISASSEMBLY_RAW_INSN;
 172       break;
 173     case 4:
 174       disasm_flags |= DISASSEMBLY_SOURCE;
 175       break;
 176     case 5:
 177       disasm_flags |= DISASSEMBLY_SOURCE | DISASSEMBLY_RAW_INSN;
 178       break;
 179     default:
 180       gdb_assert_not_reached ("bad disassembly mode");
 181     }
 182
 183   /* We must get the function beginning and end where line_num is
 184      contained.  */
 185
 186   if (line_seen && file_seen)
 187     {
 188       s = lookup_symtab (file_string);
 189       if (s == NULL)
 190         error (_("-data-disassemble: Invalid filename."));
 191       if (!find_line_pc (s, line_num, &start))
 192         error (_("-data-disassemble: Invalid line number"));
 193       if (find_pc_partial_function (start, NULL, &low, &high) == 0)
 194         error (_("-data-disassemble: "
 195                  "No function contains specified address"));
 196     }
 197   else if (addr_seen)
 198     {
 199       if (find_pc_partial_function (addr, NULL, &low, &high) == 0)
 200         error (_("-data-disassemble: "
 201                  "No function contains specified address"));
 202     }
 203
 204   gdb_disassembly (gdbarch, uiout,
 205                    disasm_flags,
 206                    how_many, low, high);
 207 }