]>
git.ipfire.org Git - thirdparty/binutils-gdb.git/blob - gdb/linespec.c
1 /* Parser for linespec for the GNU debugger, GDB.
2 Copyright 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, 1994, 1995,
3 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003
4 Free Software Foundation, Inc.
6 This file is part of GDB.
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 2 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program; if not, write to the Free Software
20 Foundation, Inc., 59 Temple Place - Suite 330,
21 Boston, MA 02111-1307, USA. */
32 #include "completer.h"
34 #include "parser-defs.h"
37 /* We share this one with symtab.c, but it is not exported widely. */
39 extern char *operator_chars (char *, char **);
41 /* Prototypes for local functions */
43 static void initialize_defaults (struct symtab
**default_symtab
,
46 static void set_flags (char *arg
, int *is_quoted
, char **paren_pointer
);
48 static struct symtabs_and_lines
decode_indirect (char **argptr
);
50 static char *locate_first_half (char **argptr
, int *is_quote_enclosed
);
52 static struct symtabs_and_lines
decode_compound (char **argptr
,
58 static struct symbol
*lookup_prefix_sym (char **argptr
, char *p
);
60 static NORETURN
void cplusplus_error (const char *name
,
62 ATTR_NORETURN
ATTR_FORMAT (printf
, 2, 3);
64 static int total_number_of_methods (struct type
*type
);
66 static int find_methods (struct type
*, char *, struct symbol
**);
68 static void build_canonical_line_spec (struct symtab_and_line
*,
71 static char *find_toplevel_char (char *s
, char c
);
73 static struct symtabs_and_lines
decode_line_2 (struct symbol
*[],
76 static struct symtab
*symtab_from_filename (char **argptr
,
77 char *p
, int is_quote_enclosed
);
80 symtabs_and_lines
decode_all_digits (char **argptr
,
81 struct symtab
*default_symtab
,
84 struct symtab
*file_symtab
,
87 static struct symtabs_and_lines
decode_dollar (char *copy
,
89 struct symtab
*default_symtab
,
91 struct symtab
*file_symtab
);
93 static struct symtabs_and_lines
decode_variable (char *copy
,
96 struct symtab
*file_symtab
);
99 symtabs_and_lines
symbol_found (int funfirstline
,
103 struct symtab
*file_symtab
,
104 struct symtab
*sym_symtab
);
107 symtabs_and_lines
minsym_found (int funfirstline
,
108 struct minimal_symbol
*msymbol
);
110 /* Helper functions. */
112 /* Issue a helpful hint on using the command completion feature on
113 single quoted demangled C++ symbols as part of the completion
117 cplusplus_error (const char *name
, const char *fmt
, ...)
119 struct ui_file
*tmp_stream
;
120 tmp_stream
= mem_fileopen ();
121 make_cleanup_ui_file_delete (tmp_stream
);
125 va_start (args
, fmt
);
126 vfprintf_unfiltered (tmp_stream
, fmt
, args
);
130 while (*name
== '\'')
132 fprintf_unfiltered (tmp_stream
,
133 ("Hint: try '%s<TAB> or '%s<ESC-?>\n"
134 "(Note leading single quote.)"),
136 error_stream (tmp_stream
);
139 /* Return the number of methods described for TYPE, including the
140 methods from types it derives from. This can't be done in the symbol
141 reader because the type of the baseclass might still be stubbed
142 when the definition of the derived class is parsed. */
145 total_number_of_methods (struct type
*type
)
150 CHECK_TYPEDEF (type
);
151 if (TYPE_CPLUS_SPECIFIC (type
) == NULL
)
153 count
= TYPE_NFN_FIELDS_TOTAL (type
);
155 for (n
= 0; n
< TYPE_N_BASECLASSES (type
); n
++)
156 count
+= total_number_of_methods (TYPE_BASECLASS (type
, n
));
161 /* Recursive helper function for decode_line_1.
162 Look for methods named NAME in type T.
163 Return number of matches.
164 Put matches in SYM_ARR, which should have been allocated with
165 a size of total_number_of_methods (T) * sizeof (struct symbol *).
166 Note that this function is g++ specific. */
169 find_methods (struct type
*t
, char *name
, struct symbol
**sym_arr
)
173 char *class_name
= type_name_no_tag (t
);
175 /* Ignore this class if it doesn't have a name. This is ugly, but
176 unless we figure out how to get the physname without the name of
177 the class, then the loop can't do any good. */
179 && (lookup_symbol (class_name
, (struct block
*) NULL
,
180 STRUCT_NAMESPACE
, (int *) NULL
,
181 (struct symtab
**) NULL
)))
184 int name_len
= strlen (name
);
188 /* Loop over each method name. At this level, all overloads of a name
189 are counted as a single name. There is an inner loop which loops over
192 for (method_counter
= TYPE_NFN_FIELDS (t
) - 1;
197 char *method_name
= TYPE_FN_FIELDLIST_NAME (t
, method_counter
);
200 if (strncmp (method_name
, "__", 2) == 0 ||
201 strncmp (method_name
, "op", 2) == 0 ||
202 strncmp (method_name
, "type", 4) == 0)
204 if (cplus_demangle_opname (method_name
, dem_opname
, DMGL_ANSI
))
205 method_name
= dem_opname
;
206 else if (cplus_demangle_opname (method_name
, dem_opname
, 0))
207 method_name
= dem_opname
;
210 if (strcmp_iw (name
, method_name
) == 0)
211 /* Find all the overloaded methods with that name. */
212 for (field_counter
= TYPE_FN_FIELDLIST_LENGTH (t
, method_counter
) - 1;
219 f
= TYPE_FN_FIELDLIST1 (t
, method_counter
);
221 if (TYPE_FN_FIELD_STUB (f
, field_counter
))
225 tmp_name
= gdb_mangle_name (t
,
228 phys_name
= alloca (strlen (tmp_name
) + 1);
229 strcpy (phys_name
, tmp_name
);
233 phys_name
= TYPE_FN_FIELD_PHYSNAME (f
, field_counter
);
235 /* Destructor is handled by caller, don't add it to
237 if (is_destructor_name (phys_name
) != 0)
240 sym_arr
[i1
] = lookup_symbol (phys_name
,
243 (struct symtab
**) NULL
);
248 /* This error message gets printed, but the method
249 still seems to be found
250 fputs_filtered("(Cannot find method ", gdb_stdout);
251 fprintf_symbol_filtered (gdb_stdout, phys_name,
253 DMGL_PARAMS | DMGL_ANSI);
254 fputs_filtered(" - possibly inlined.)\n", gdb_stdout);
258 else if (strncmp (class_name
, name
, name_len
) == 0
259 && (class_name
[name_len
] == '\0'
260 || class_name
[name_len
] == '<'))
262 /* For GCC 3.x and stabs, constructors and destructors
263 have names like __base_ctor and __complete_dtor.
264 Check the physname for now if we're looking for a
267 = TYPE_FN_FIELDLIST_LENGTH (t
, method_counter
) - 1;
274 f
= TYPE_FN_FIELDLIST1 (t
, method_counter
);
276 /* GCC 3.x will never produce stabs stub methods, so
277 we don't need to handle this case. */
278 if (TYPE_FN_FIELD_STUB (f
, field_counter
))
280 phys_name
= TYPE_FN_FIELD_PHYSNAME (f
, field_counter
);
281 if (! is_constructor_name (phys_name
))
284 /* If this method is actually defined, include it in the
286 sym_arr
[i1
] = lookup_symbol (phys_name
,
289 (struct symtab
**) NULL
);
297 /* Only search baseclasses if there is no match yet, since names in
298 derived classes override those in baseclasses.
300 FIXME: The above is not true; it is only true of member functions
301 if they have the same number of arguments (??? - section 13.1 of the
302 ARM says the function members are not in the same scope but doesn't
303 really spell out the rules in a way I understand. In any case, if
304 the number of arguments differ this is a case in which we can overload
305 rather than hiding without any problem, and gcc 2.4.5 does overload
306 rather than hiding in this case). */
309 for (ibase
= 0; ibase
< TYPE_N_BASECLASSES (t
); ibase
++)
310 i1
+= find_methods (TYPE_BASECLASS (t
, ibase
), name
, sym_arr
+ i1
);
315 /* Helper function for decode_line_1.
316 Build a canonical line spec in CANONICAL if it is non-NULL and if
317 the SAL has a symtab.
318 If SYMNAME is non-NULL the canonical line spec is `filename:symname'.
319 If SYMNAME is NULL the line number from SAL is used and the canonical
320 line spec is `filename:linenum'. */
323 build_canonical_line_spec (struct symtab_and_line
*sal
, char *symname
,
326 char **canonical_arr
;
327 char *canonical_name
;
329 struct symtab
*s
= sal
->symtab
;
331 if (s
== (struct symtab
*) NULL
332 || s
->filename
== (char *) NULL
333 || canonical
== (char ***) NULL
)
336 canonical_arr
= (char **) xmalloc (sizeof (char *));
337 *canonical
= canonical_arr
;
339 filename
= s
->filename
;
342 canonical_name
= xmalloc (strlen (filename
) + strlen (symname
) + 2);
343 sprintf (canonical_name
, "%s:%s", filename
, symname
);
347 canonical_name
= xmalloc (strlen (filename
) + 30);
348 sprintf (canonical_name
, "%s:%d", filename
, sal
->line
);
350 canonical_arr
[0] = canonical_name
;
355 /* Find an instance of the character C in the string S that is outside
356 of all parenthesis pairs, single-quoted strings, and double-quoted
357 strings. Also, ignore the char within a template name, like a ','
358 within foo<int, int>. */
361 find_toplevel_char (char *s
, char c
)
363 int quoted
= 0; /* zero if we're not in quotes;
364 '"' if we're in a double-quoted string;
365 '\'' if we're in a single-quoted string. */
366 int depth
= 0; /* Number of unclosed parens we've seen. */
369 for (scan
= s
; *scan
; scan
++)
375 else if (*scan
== '\\' && *(scan
+ 1))
378 else if (*scan
== c
&& ! quoted
&& depth
== 0)
380 else if (*scan
== '"' || *scan
== '\'')
382 else if (*scan
== '(' || *scan
== '<')
384 else if ((*scan
== ')' || *scan
== '>') && depth
> 0)
391 /* Given a list of NELTS symbols in SYM_ARR, return a list of lines to
392 operate on (ask user if necessary).
393 If CANONICAL is non-NULL return a corresponding array of mangled names
394 as canonical line specs there. */
396 static struct symtabs_and_lines
397 decode_line_2 (struct symbol
*sym_arr
[], int nelts
, int funfirstline
,
400 struct symtabs_and_lines values
, return_values
;
405 struct cleanup
*old_chain
;
406 char **canonical_arr
= (char **) NULL
;
408 values
.sals
= (struct symtab_and_line
*)
409 alloca (nelts
* sizeof (struct symtab_and_line
));
410 return_values
.sals
= (struct symtab_and_line
*)
411 xmalloc (nelts
* sizeof (struct symtab_and_line
));
412 old_chain
= make_cleanup (xfree
, return_values
.sals
);
416 canonical_arr
= (char **) xmalloc (nelts
* sizeof (char *));
417 make_cleanup (xfree
, canonical_arr
);
418 memset (canonical_arr
, 0, nelts
* sizeof (char *));
419 *canonical
= canonical_arr
;
423 printf_unfiltered ("[0] cancel\n[1] all\n");
426 init_sal (&return_values
.sals
[i
]); /* Initialize to zeroes. */
427 init_sal (&values
.sals
[i
]);
428 if (sym_arr
[i
] && SYMBOL_CLASS (sym_arr
[i
]) == LOC_BLOCK
)
430 values
.sals
[i
] = find_function_start_sal (sym_arr
[i
], funfirstline
);
431 printf_unfiltered ("[%d] %s at %s:%d\n",
433 SYMBOL_PRINT_NAME (sym_arr
[i
]),
434 values
.sals
[i
].symtab
->filename
,
435 values
.sals
[i
].line
);
438 printf_unfiltered ("?HERE\n");
442 prompt
= getenv ("PS2");
447 args
= command_line_input (prompt
, 0, "overload-choice");
449 if (args
== 0 || *args
== 0)
450 error_no_arg ("one or more choice numbers");
458 while (*arg1
>= '0' && *arg1
<= '9')
460 if (*arg1
&& *arg1
!= ' ' && *arg1
!= '\t')
461 error ("Arguments must be choice numbers.");
471 for (i
= 0; i
< nelts
; i
++)
473 if (canonical_arr
[i
] == NULL
)
475 symname
= DEPRECATED_SYMBOL_NAME (sym_arr
[i
]);
476 canonical_arr
[i
] = savestring (symname
, strlen (symname
));
480 memcpy (return_values
.sals
, values
.sals
,
481 (nelts
* sizeof (struct symtab_and_line
)));
482 return_values
.nelts
= nelts
;
483 discard_cleanups (old_chain
);
484 return return_values
;
487 if (num
>= nelts
+ 2)
489 printf_unfiltered ("No choice number %d.\n", num
);
494 if (values
.sals
[num
].pc
)
498 symname
= DEPRECATED_SYMBOL_NAME (sym_arr
[num
]);
499 make_cleanup (xfree
, symname
);
500 canonical_arr
[i
] = savestring (symname
, strlen (symname
));
502 return_values
.sals
[i
++] = values
.sals
[num
];
503 values
.sals
[num
].pc
= 0;
507 printf_unfiltered ("duplicate request for %d ignored.\n", num
);
512 while (*args
== ' ' || *args
== '\t')
515 return_values
.nelts
= i
;
516 discard_cleanups (old_chain
);
517 return return_values
;
520 /* The parser of linespec itself. */
522 /* Parse a string that specifies a line number.
523 Pass the address of a char * variable; that variable will be
524 advanced over the characters actually parsed.
528 LINENUM -- that line number in current file. PC returned is 0.
529 FILE:LINENUM -- that line in that file. PC returned is 0.
530 FUNCTION -- line number of openbrace of that function.
531 PC returned is the start of the function.
532 VARIABLE -- line number of definition of that variable.
534 FILE:FUNCTION -- likewise, but prefer functions in that file.
535 *EXPR -- line in which address EXPR appears.
537 This may all be followed by an "if EXPR", which we ignore.
539 FUNCTION may be an undebuggable function found in minimal symbol table.
541 If the argument FUNFIRSTLINE is nonzero, we want the first line
542 of real code inside a function when a function is specified, and it is
543 not OK to specify a variable or type to get its line number.
545 DEFAULT_SYMTAB specifies the file to use if none is specified.
546 It defaults to current_source_symtab.
547 DEFAULT_LINE specifies the line number to use for relative
548 line numbers (that start with signs). Defaults to current_source_line.
549 If CANONICAL is non-NULL, store an array of strings containing the canonical
550 line specs there if necessary. Currently overloaded member functions and
551 line numbers or static functions without a filename yield a canonical
552 line spec. The array and the line spec strings are allocated on the heap,
553 it is the callers responsibility to free them.
555 Note that it is possible to return zero for the symtab
556 if no file is validly specified. Callers must check that.
557 Also, the line number returned may be invalid. */
559 /* We allow single quotes in various places. This is a hideous
560 kludge, which exists because the completer can't yet deal with the
561 lack of single quotes. FIXME: write a linespec_completer which we
562 can use as appropriate instead of make_symbol_completion_list. */
564 struct symtabs_and_lines
565 decode_line_1 (char **argptr
, int funfirstline
, struct symtab
*default_symtab
,
566 int default_line
, char ***canonical
)
570 /* If a file name is specified, this is its symtab. */
571 struct symtab
*file_symtab
= NULL
;
574 /* This is NULL if there are no parens in *ARGPTR, or a pointer to
575 the closing parenthesis if there are parens. */
577 /* This says whether or not something in *ARGPTR is quoted with
578 completer_quotes (i.e. with single quotes). */
580 /* Is part of *ARGPTR is enclosed in double quotes? */
581 int is_quote_enclosed
;
582 char *saved_arg
= *argptr
;
584 /* Defaults have defaults. */
586 initialize_defaults (&default_symtab
, &default_line
);
588 /* See if arg is *PC. */
591 return decode_indirect (argptr
);
593 /* Set various flags. 'paren_pointer' is important for overload
594 checking, where we allow things like:
595 (gdb) break c::f(int)
598 set_flags (*argptr
, &is_quoted
, &paren_pointer
);
600 /* Check to see if it's a multipart linespec (with colons or
603 /* Locate the end of the first half of the linespec. */
605 p
= locate_first_half (argptr
, &is_quote_enclosed
);
607 /* Does it look like there actually were two parts? */
609 if ((p
[0] == ':' || p
[0] == '.') && paren_pointer
== NULL
)
612 *argptr
= *argptr
+ 1;
614 /* Is it a C++ or Java compound data structure? */
616 if (p
[0] == '.' || p
[1] == ':')
617 return decode_compound (argptr
, funfirstline
, canonical
,
620 /* No, the first part is a filename; set s to be that file's
621 symtab. Also, move argptr past the filename. */
623 file_symtab
= symtab_from_filename (argptr
, p
, is_quote_enclosed
);
626 /* No one really seems to know why this was added. It certainly
627 breaks the command line, though, whenever the passed
628 name is of the form ClassName::Method. This bit of code
629 singles out the class name, and if funfirstline is set (for
630 example, you are setting a breakpoint at this function),
631 you get an error. This did not occur with earlier
632 verions, so I am ifdef'ing this out. 3/29/99 */
635 /* Check if what we have till now is a symbol name */
637 /* We may be looking at a template instantiation such
638 as "foo<int>". Check here whether we know about it,
639 instead of falling through to the code below which
640 handles ordinary function names, because that code
641 doesn't like seeing '<' and '>' in a name -- the
642 skip_quoted call doesn't go past them. So see if we
643 can figure it out right now. */
645 copy
= (char *) alloca (p
- *argptr
+ 1);
646 memcpy (copy
, *argptr
, p
- *argptr
);
647 copy
[p
- *argptr
] = '\000';
648 sym
= lookup_symbol (copy
, 0, VAR_NAMESPACE
, 0, &sym_symtab
);
651 *argptr
= (*p
== '\'') ? p
+ 1 : p
;
652 return symbol_found (funfirstline
, canonical
, copy
, sym
,
655 /* Otherwise fall out from here and go to file/line spec
660 /* S is specified file's symtab, or 0 if no file specified.
661 arg no longer contains the file name. */
663 /* Check whether arg is all digits (and sign). */
666 if (*q
== '-' || *q
== '+')
668 while (*q
>= '0' && *q
<= '9')
671 if (q
!= *argptr
&& (*q
== 0 || *q
== ' ' || *q
== '\t' || *q
== ','))
672 /* We found a token consisting of all digits -- at least one digit. */
673 return decode_all_digits (argptr
, default_symtab
, default_line
,
674 canonical
, file_symtab
, q
);
676 /* Arg token is not digits => try it as a variable name
677 Find the next token (everything up to end or next whitespace). */
679 if (**argptr
== '$') /* May be a convenience variable. */
680 /* One or two $ chars possible. */
681 p
= skip_quoted (*argptr
+ (((*argptr
)[1] == '$') ? 2 : 1));
684 p
= skip_quoted (*argptr
);
686 error ("Unmatched single quote.");
688 else if (paren_pointer
!= NULL
)
690 p
= paren_pointer
+ 1;
694 p
= skip_quoted (*argptr
);
697 copy
= (char *) alloca (p
- *argptr
+ 1);
698 memcpy (copy
, *argptr
, p
- *argptr
);
699 copy
[p
- *argptr
] = '\0';
702 && copy
[0] == copy
[p
- *argptr
- 1]
703 && strchr (get_gdb_completer_quote_characters (), copy
[0]) != NULL
)
705 copy
[p
- *argptr
- 1] = '\0';
708 while (*p
== ' ' || *p
== '\t')
712 /* If it starts with $: may be a legitimate variable or routine name
713 (e.g. HP-UX millicode routines such as $$dyncall), or it may
714 be history value, or it may be a convenience variable. */
717 return decode_dollar (copy
, funfirstline
, default_symtab
,
718 canonical
, file_symtab
);
720 /* Look up that token as a variable.
721 If file specified, use that file's per-file block to start with. */
723 return decode_variable (copy
, funfirstline
, canonical
, file_symtab
);
728 /* Now, more helper functions for decode_line_1. Some conventions
729 that these functions follow:
731 Decode_line_1 typically passes along some of its arguments or local
732 variables to the subfunctions. It passes the variables by
733 reference if they are modified by the subfunction, and by value
736 Some of the functions have side effects that don't arise from
737 variables that are passed by reference. In particular, if a
738 function is passed ARGPTR as an argument, it modifies what ARGPTR
739 points to; typically, it advances *ARGPTR past whatever substring
740 it has just looked at. (If it doesn't modify *ARGPTR, then the
741 function gets passed *ARGPTR instead, which is then called ARG: see
742 set_flags, for example.) Also, functions that return a struct
743 symtabs_and_lines may modify CANONICAL, as in the description of
746 If a function returns a struct symtabs_and_lines, then that struct
747 will immediately make its way up the call chain to be returned by
748 decode_line_1. In particular, all of the functions decode_XXX
749 calculate the appropriate struct symtabs_and_lines, under the
750 assumption that their argument is of the form XXX. */
752 /* First, some functions to initialize stuff at the beggining of the
756 initialize_defaults (struct symtab
**default_symtab
, int *default_line
)
758 if (*default_symtab
== 0)
760 /* Use whatever we have for the default source line. We don't use
761 get_current_or_default_symtab_and_line as it can recurse and call
763 struct symtab_and_line cursal
=
764 get_current_source_symtab_and_line ();
766 *default_symtab
= cursal
.symtab
;
767 *default_line
= cursal
.line
;
772 set_flags (char *arg
, int *is_quoted
, char **paren_pointer
)
777 /* 'has_if' is for the syntax:
778 (gdb) break foo if (a==b)
780 if ((ii
= strstr (arg
, " if ")) != NULL
||
781 (ii
= strstr (arg
, "\tif ")) != NULL
||
782 (ii
= strstr (arg
, " if\t")) != NULL
||
783 (ii
= strstr (arg
, "\tif\t")) != NULL
||
784 (ii
= strstr (arg
, " if(")) != NULL
||
785 (ii
= strstr (arg
, "\tif( ")) != NULL
)
787 /* Temporarily zap out "if (condition)" to not confuse the
788 parenthesis-checking code below. This is undone below. Do not
796 && strchr (get_gdb_completer_quote_characters (),
799 *paren_pointer
= strchr (arg
, '(');
800 if (*paren_pointer
!= NULL
)
801 *paren_pointer
= strrchr (*paren_pointer
, ')');
803 /* Now that we're safely past the paren_pointer check, put back " if
804 (condition)" so outer layers can see it. */
811 /* Decode arg of the form *PC. */
813 static struct symtabs_and_lines
814 decode_indirect (char **argptr
)
816 struct symtabs_and_lines values
;
820 pc
= parse_and_eval_address_1 (argptr
);
822 values
.sals
= (struct symtab_and_line
*)
823 xmalloc (sizeof (struct symtab_and_line
));
826 values
.sals
[0] = find_pc_line (pc
, 0);
827 values
.sals
[0].pc
= pc
;
828 values
.sals
[0].section
= find_pc_overlay (pc
);
835 /* Locate the first half of the linespec, ending in a colon, period,
836 or whitespace. (More or less.) Also, check to see if *ARGPTR is
837 enclosed in double quotes; if so, set is_quote_enclosed, advance
838 ARGPTR past that and zero out the trailing double quote. */
841 locate_first_half (char **argptr
, int *is_quote_enclosed
)
847 /* Maybe we were called with a line range FILENAME:LINENUM,FILENAME:LINENUM
848 and we must isolate the first half. Outer layers will call again later
851 Don't count commas that appear in argument lists of overloaded
852 functions, or in quoted strings. It's stupid to go to this much
853 trouble when the rest of the function is such an obvious roach hotel. */
854 ii
= find_toplevel_char (*argptr
, ',');
855 has_comma
= (ii
!= 0);
857 /* Temporarily zap out second half to not confuse the code below.
858 This is undone below. Do not change ii!! */
864 /* Maybe arg is FILE : LINENUM or FILE : FUNCTION. May also be
865 CLASS::MEMBER, or NAMESPACE::NAME. Look for ':', but ignore
871 *is_quote_enclosed
= 1;
876 *is_quote_enclosed
= 0;
881 char *temp_end
= find_template_name_end (p
);
883 error ("malformed template specification in command");
886 /* Check for the end of the first half of the linespec. End of
887 line, a tab, a double colon or the last single colon, or a
888 space. But if enclosed in double quotes we do not break on
893 && ((p
[1] == ':') || (strchr (p
+ 1, ':') == NULL
)))
894 || ((p
[0] == ' ') && !*is_quote_enclosed
))
896 if (p
[0] == '.' && strchr (p
, ':') == NULL
)
898 /* Java qualified method. Find the *last* '.', since the
899 others are package qualifiers. */
900 for (p1
= p
; *p1
; p1
++)
908 while (p
[0] == ' ' || p
[0] == '\t')
911 /* If the closing double quote was left at the end, remove it. */
912 if (*is_quote_enclosed
)
914 char *closing_quote
= strchr (p
- 1, '"');
915 if (closing_quote
&& closing_quote
[1] == '\0')
916 *closing_quote
= '\0';
919 /* Now that we've safely parsed the first half, put back ',' so
920 outer layers can see it. */
929 /* This handles C++ and Java compound data structures. P should point
930 at the first component separator, i.e. double-colon or period. */
932 static struct symtabs_and_lines
933 decode_compound (char **argptr
, int funfirstline
, char ***canonical
,
934 char *saved_arg
, char *p
)
936 struct symtabs_and_lines values
;
941 char *saved_arg2
= *argptr
;
944 /* The symtab that SYM was found in. */
945 struct symtab
*sym_symtab
;
947 struct symbol
*sym_class
;
949 struct symbol
**sym_arr
;
952 /* First check for "global" namespace specification,
953 of the form "::foo". If found, skip over the colons
954 and jump to normal symbol processing. */
956 && ((*argptr
== p
) || (p
[-1] == ' ') || (p
[-1] == '\t')))
959 /* We have what looks like a class or namespace
960 scope specification (A::B), possibly with many
961 levels of namespaces or classes (A::B::C::D).
963 Some versions of the HP ANSI C++ compiler (as also possibly
964 other compilers) generate class/function/member names with
965 embedded double-colons if they are inside namespaces. To
966 handle this, we loop a few times, considering larger and
967 larger prefixes of the string as though they were single
968 symbols. So, if the initially supplied string is
969 A::B::C::D::foo, we have to look up "A", then "A::B",
970 then "A::B::C", then "A::B::C::D", and finally
971 "A::B::C::D::foo" as single, monolithic symbols, because
972 A, B, C or D may be namespaces.
974 Note that namespaces can nest only inside other
975 namespaces, and not inside classes. So we need only
976 consider *prefixes* of the string; there is no need to look up
977 "B::C" separately as a symbol in the previous example. */
979 p2
= p
; /* Save for restart. */
982 sym_class
= lookup_prefix_sym (argptr
, p
);
985 (t
= check_typedef (SYMBOL_TYPE (sym_class
)),
986 (TYPE_CODE (t
) == TYPE_CODE_STRUCT
987 || TYPE_CODE (t
) == TYPE_CODE_UNION
)))
989 /* Arg token is not digits => try it as a function name.
990 Find the next token (everything up to end or next
993 && strchr (get_gdb_completer_quote_characters (),
996 p
= skip_quoted (*argptr
);
997 *argptr
= *argptr
+ 1;
1002 while (*p
&& *p
!= ' ' && *p
!= '\t' && *p
!= ',' && *p
!= ':')
1006 q = operator_chars (*argptr, &q1);
1010 char *tmp = alloca (q1 - q + 1);
1011 memcpy (tmp, q, q1 - q);
1013 opname = cplus_mangle_opname (tmp, DMGL_ANSI);
1016 cplusplus_error (saved_arg, "no mangling for \"%s\"\n", tmp);
1018 copy = (char*) alloca (3 + strlen(opname));
1019 sprintf (copy, "__%s", opname);
1025 copy
= (char *) alloca (p
- *argptr
+ 1);
1026 memcpy (copy
, *argptr
, p
- *argptr
);
1027 copy
[p
- *argptr
] = '\0';
1029 && copy
[p
- *argptr
- 1]
1030 && strchr (get_gdb_completer_quote_characters (),
1031 copy
[p
- *argptr
- 1]) != NULL
)
1032 copy
[p
- *argptr
- 1] = '\0';
1035 /* No line number may be specified. */
1036 while (*p
== ' ' || *p
== '\t')
1041 i1
= 0; /* Counter for the symbol array. */
1042 sym_arr
= (struct symbol
**) alloca (total_number_of_methods (t
)
1043 * sizeof (struct symbol
*));
1045 if (destructor_name_p (copy
, t
))
1047 /* Destructors are a special case. */
1048 int m_index
, f_index
;
1050 if (get_destructor_fn_field (t
, &m_index
, &f_index
))
1052 struct fn_field
*f
= TYPE_FN_FIELDLIST1 (t
, m_index
);
1055 lookup_symbol (TYPE_FN_FIELD_PHYSNAME (f
, f_index
),
1056 NULL
, VAR_NAMESPACE
, (int *) NULL
,
1057 (struct symtab
**) NULL
);
1063 i1
= find_methods (t
, copy
, sym_arr
);
1066 /* There is exactly one field with that name. */
1069 if (sym
&& SYMBOL_CLASS (sym
) == LOC_BLOCK
)
1071 values
.sals
= (struct symtab_and_line
*)
1072 xmalloc (sizeof (struct symtab_and_line
));
1074 values
.sals
[0] = find_function_start_sal (sym
,
1085 /* There is more than one field with that name
1086 (overloaded). Ask the user which one to use. */
1087 return decode_line_2 (sym_arr
, i1
, funfirstline
, canonical
);
1093 if (is_operator_name (copy
))
1095 tmp
= (char *) alloca (strlen (copy
+ 3) + 9);
1096 strcpy (tmp
, "operator ");
1097 strcat (tmp
, copy
+ 3);
1102 cplusplus_error (saved_arg
,
1103 "the class `%s' does not have destructor defined\n",
1104 SYMBOL_PRINT_NAME (sym_class
));
1106 cplusplus_error (saved_arg
,
1107 "the class %s does not have any method named %s\n",
1108 SYMBOL_PRINT_NAME (sym_class
), tmp
);
1112 /* Move pointer up to next possible class/namespace token. */
1113 p
= p2
+ 1; /* Restart with old value +1. */
1114 /* Move pointer ahead to next double-colon. */
1115 while (*p
&& (p
[0] != ' ') && (p
[0] != '\t') && (p
[0] != '\''))
1119 temp_end
= find_template_name_end (p
);
1121 error ("malformed template specification in command");
1124 else if ((p
[0] == ':') && (p
[1] == ':'))
1125 break; /* Found double-colon. */
1131 break; /* Out of the while (1). */
1133 p2
= p
; /* Save restart for next time around. */
1134 *argptr
= saved_arg2
; /* Restore argptr. */
1137 /* Last chance attempt -- check entire name as a symbol. Use "copy"
1138 in preparation for jumping out of this block, to be consistent
1139 with usage following the jump target. */
1140 copy
= (char *) alloca (p
- saved_arg2
+ 1);
1141 memcpy (copy
, saved_arg2
, p
- saved_arg2
);
1142 /* Note: if is_quoted should be true, we snuff out quote here
1144 copy
[p
- saved_arg2
] = '\000';
1145 /* Set argptr to skip over the name. */
1146 *argptr
= (*p
== '\'') ? p
+ 1 : p
;
1147 /* Look up entire name */
1148 sym
= lookup_symbol (copy
, 0, VAR_NAMESPACE
, 0, &sym_symtab
);
1150 return symbol_found (funfirstline
, canonical
, copy
, sym
,
1153 /* Couldn't find any interpretation as classes/namespaces, so give
1154 up. The quotes are important if copy is empty. */
1155 cplusplus_error (saved_arg
,
1156 "Can't find member of namespace, class, struct, or union named \"%s\"\n",
1160 /* Next come some helper functions for decode_compound. */
1162 /* Return the symbol corresponding to the substring of *ARGPTR ending
1163 at P, allowing whitespace. Also, advance *ARGPTR past the symbol
1164 name in question, the compound object separator ("::" or "."), and
1167 static struct symbol
*
1168 lookup_prefix_sym (char **argptr
, char *p
)
1173 /* Extract the class name. */
1175 while (p
!= *argptr
&& p
[-1] == ' ')
1177 copy
= (char *) alloca (p
- *argptr
+ 1);
1178 memcpy (copy
, *argptr
, p
- *argptr
);
1179 copy
[p
- *argptr
] = 0;
1181 /* Discard the class name from the arg. */
1182 p
= p1
+ (p1
[0] == ':' ? 2 : 1);
1183 while (*p
== ' ' || *p
== '\t')
1187 return lookup_symbol (copy
, 0, STRUCT_NAMESPACE
, 0,
1188 (struct symtab
**) NULL
);
1193 /* Return the symtab associated to the filename given by the substring
1194 of *ARGPTR ending at P, and advance ARGPTR past that filename. */
1196 static struct symtab
*
1197 symtab_from_filename (char **argptr
, char *p
, int is_quote_enclosed
)
1201 struct symtab
*file_symtab
;
1204 while (p
!= *argptr
&& p
[-1] == ' ')
1206 if ((*p
== '"') && is_quote_enclosed
)
1208 copy
= (char *) alloca (p
- *argptr
+ 1);
1209 memcpy (copy
, *argptr
, p
- *argptr
);
1210 /* It may have the ending quote right after the file name. */
1211 if (is_quote_enclosed
&& copy
[p
- *argptr
- 1] == '"')
1212 copy
[p
- *argptr
- 1] = 0;
1214 copy
[p
- *argptr
] = 0;
1216 /* Find that file's data. */
1217 file_symtab
= lookup_symtab (copy
);
1218 if (file_symtab
== 0)
1220 if (!have_full_symbols () && !have_partial_symbols ())
1221 error ("No symbol table is loaded. Use the \"file\" command.");
1222 error ("No source file named %s.", copy
);
1225 /* Discard the file name from the arg. */
1227 while (*p
== ' ' || *p
== '\t')
1236 /* This decodes a line where the argument is all digits (possibly
1237 preceded by a sign). Q should point to the end of those digits;
1238 the other arguments are as usual. */
1240 static struct symtabs_and_lines
1241 decode_all_digits (char **argptr
, struct symtab
*default_symtab
,
1242 int default_line
, char ***canonical
,
1243 struct symtab
*file_symtab
, char *q
)
1246 struct symtabs_and_lines values
;
1247 struct symtab_and_line val
;
1255 /* We might need a canonical line spec if no file was specified. */
1256 int need_canonical
= (file_symtab
== 0) ? 1 : 0;
1260 /* This is where we need to make sure that we have good defaults.
1261 We must guarantee that this section of code is never executed
1262 when we are called with just a function name, since
1263 set_default_source_symtab_and_line uses
1264 select_source_symtab that calls us with such an argument. */
1266 if (file_symtab
== 0 && default_symtab
== 0)
1268 /* Make sure we have at least a default source file. */
1269 set_default_source_symtab_and_line ();
1270 initialize_defaults (&default_symtab
, &default_line
);
1273 if (**argptr
== '+')
1274 sign
= plus
, (*argptr
)++;
1275 else if (**argptr
== '-')
1276 sign
= minus
, (*argptr
)++;
1277 val
.line
= atoi (*argptr
);
1283 if (file_symtab
== 0)
1284 val
.line
= default_line
+ val
.line
;
1289 if (file_symtab
== 0)
1290 val
.line
= default_line
- val
.line
;
1295 break; /* No need to adjust val.line. */
1298 while (*q
== ' ' || *q
== '\t')
1301 if (file_symtab
== 0)
1302 file_symtab
= default_symtab
;
1304 /* It is possible that this source file has more than one symtab,
1305 and that the new line number specification has moved us from the
1306 default (in file_symtab) to a new one. */
1307 val
.symtab
= find_line_symtab (file_symtab
, val
.line
, NULL
, NULL
);
1308 if (val
.symtab
== 0)
1309 val
.symtab
= file_symtab
;
1312 values
.sals
= (struct symtab_and_line
*)
1313 xmalloc (sizeof (struct symtab_and_line
));
1314 values
.sals
[0] = val
;
1317 build_canonical_line_spec (values
.sals
, NULL
, canonical
);
1323 /* Decode a linespec starting with a dollar sign. */
1325 static struct symtabs_and_lines
1326 decode_dollar (char *copy
, int funfirstline
, struct symtab
*default_symtab
,
1327 char ***canonical
, struct symtab
*file_symtab
)
1331 int need_canonical
= 0;
1332 struct symtabs_and_lines values
;
1333 struct symtab_and_line val
;
1336 /* The symtab that SYM was found in. */
1337 struct symtab
*sym_symtab
;
1338 struct minimal_symbol
*msymbol
;
1340 p
= (copy
[1] == '$') ? copy
+ 2 : copy
+ 1;
1341 while (*p
>= '0' && *p
<= '9')
1343 if (!*p
) /* Reached end of token without hitting non-digit. */
1345 /* We have a value history reference. */
1346 sscanf ((copy
[1] == '$') ? copy
+ 2 : copy
+ 1, "%d", &index
);
1347 valx
= access_value_history ((copy
[1] == '$') ? -index
: index
);
1348 if (TYPE_CODE (VALUE_TYPE (valx
)) != TYPE_CODE_INT
)
1349 error ("History values used in line specs must have integer values.");
1353 /* Not all digits -- may be user variable/function or a
1354 convenience variable. */
1356 /* Look up entire name as a symbol first. */
1357 sym
= lookup_symbol (copy
, 0, VAR_NAMESPACE
, 0, &sym_symtab
);
1358 file_symtab
= (struct symtab
*) 0;
1360 /* Symbol was found --> jump to normal symbol processing. */
1362 return symbol_found (funfirstline
, canonical
, copy
, sym
,
1365 /* If symbol was not found, look in minimal symbol tables. */
1366 msymbol
= lookup_minimal_symbol (copy
, NULL
, NULL
);
1367 /* Min symbol was found --> jump to minsym processing. */
1369 return minsym_found (funfirstline
, msymbol
);
1371 /* Not a user variable or function -- must be convenience variable. */
1372 need_canonical
= (file_symtab
== 0) ? 1 : 0;
1373 valx
= value_of_internalvar (lookup_internalvar (copy
+ 1));
1374 if (TYPE_CODE (VALUE_TYPE (valx
)) != TYPE_CODE_INT
)
1375 error ("Convenience variables used in line specs must have integer values.");
1380 /* Either history value or convenience value from above, in valx. */
1381 val
.symtab
= file_symtab
? file_symtab
: default_symtab
;
1382 val
.line
= value_as_long (valx
);
1385 values
.sals
= (struct symtab_and_line
*) xmalloc (sizeof val
);
1386 values
.sals
[0] = val
;
1390 build_canonical_line_spec (values
.sals
, NULL
, canonical
);
1397 /* Decode a linespec that's a variable. If FILE_SYMTAB is non-NULL,
1398 look in that symtab's static variables first. */
1400 static struct symtabs_and_lines
1401 decode_variable (char *copy
, int funfirstline
, char ***canonical
,
1402 struct symtab
*file_symtab
)
1405 /* The symtab that SYM was found in. */
1406 struct symtab
*sym_symtab
;
1408 struct minimal_symbol
*msymbol
;
1410 sym
= lookup_symbol (copy
,
1412 ? BLOCKVECTOR_BLOCK (BLOCKVECTOR (file_symtab
),
1414 : get_selected_block (0)),
1415 VAR_NAMESPACE
, 0, &sym_symtab
);
1418 return symbol_found (funfirstline
, canonical
, copy
, sym
,
1419 file_symtab
, sym_symtab
);
1421 msymbol
= lookup_minimal_symbol (copy
, NULL
, NULL
);
1423 if (msymbol
!= NULL
)
1424 return minsym_found (funfirstline
, msymbol
);
1426 if (!have_full_symbols () &&
1427 !have_partial_symbols () && !have_minimal_symbols ())
1428 error ("No symbol table is loaded. Use the \"file\" command.");
1430 error ("Function \"%s\" not defined.", copy
);
1436 /* Now come some functions that are called from multiple places within
1439 /* We've found a symbol SYM to associate with our linespec; build a
1440 corresponding struct symtabs_and_lines. */
1442 static struct symtabs_and_lines
1443 symbol_found (int funfirstline
, char ***canonical
, char *copy
,
1444 struct symbol
*sym
, struct symtab
*file_symtab
,
1445 struct symtab
*sym_symtab
)
1447 struct symtabs_and_lines values
;
1449 if (SYMBOL_CLASS (sym
) == LOC_BLOCK
)
1451 /* Arg is the name of a function */
1452 values
.sals
= (struct symtab_and_line
*)
1453 xmalloc (sizeof (struct symtab_and_line
));
1454 values
.sals
[0] = find_function_start_sal (sym
, funfirstline
);
1457 /* Don't use the SYMBOL_LINE; if used at all it points to
1458 the line containing the parameters or thereabouts, not
1459 the first line of code. */
1461 /* We might need a canonical line spec if it is a static
1463 if (file_symtab
== 0)
1465 struct blockvector
*bv
= BLOCKVECTOR (sym_symtab
);
1466 struct block
*b
= BLOCKVECTOR_BLOCK (bv
, STATIC_BLOCK
);
1467 if (lookup_block_symbol (b
, copy
, NULL
, VAR_NAMESPACE
) != NULL
)
1468 build_canonical_line_spec (values
.sals
, copy
, canonical
);
1475 error ("\"%s\" is not a function", copy
);
1476 else if (SYMBOL_LINE (sym
) != 0)
1478 /* We know its line number. */
1479 values
.sals
= (struct symtab_and_line
*)
1480 xmalloc (sizeof (struct symtab_and_line
));
1482 memset (&values
.sals
[0], 0, sizeof (values
.sals
[0]));
1483 values
.sals
[0].symtab
= sym_symtab
;
1484 values
.sals
[0].line
= SYMBOL_LINE (sym
);
1488 /* This can happen if it is compiled with a compiler which doesn't
1489 put out line numbers for variables. */
1490 /* FIXME: Shouldn't we just set .line and .symtab to zero
1491 and return? For example, "info line foo" could print
1493 error ("Line number not known for symbol \"%s\"", copy
);
1497 /* We've found a minimal symbol MSYMBOL to associate with our
1498 linespec; build a corresponding struct symtabs_and_lines. */
1500 static struct symtabs_and_lines
1501 minsym_found (int funfirstline
, struct minimal_symbol
*msymbol
)
1503 struct symtabs_and_lines values
;
1505 values
.sals
= (struct symtab_and_line
*)
1506 xmalloc (sizeof (struct symtab_and_line
));
1507 values
.sals
[0] = find_pc_sect_line (SYMBOL_VALUE_ADDRESS (msymbol
),
1508 (struct sec
*) 0, 0);
1509 values
.sals
[0].section
= SYMBOL_BFD_SECTION (msymbol
);
1512 values
.sals
[0].pc
+= FUNCTION_START_OFFSET
;
1513 values
.sals
[0].pc
= SKIP_PROLOGUE (values
.sals
[0].pc
);