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