/* Parser definitions for GDB.
- Copyright 1986, 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1996,
- 1997, 1998, 1999, 2000, 2002 Free Software Foundation, Inc.
+ Copyright (C) 1986-2021 Free Software Foundation, Inc.
Modified from expread.y by the Department of Computer Science at the
State University of New York at Buffalo.
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,
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., 59 Temple Place - Suite 330,
- Boston, MA 02111-1307, USA. */
+ along with this program. If not, see <http://www.gnu.org/licenses/>. */
#if !defined (PARSER_DEFS_H)
#define PARSER_DEFS_H 1
-#include "doublest.h"
+#include "expression.h"
+#include "symtab.h"
+#include "expop.h"
-extern struct expression *expout;
-extern int expout_size;
-extern int expout_ptr;
+struct block;
+struct language_defn;
+struct internalvar;
+class innermost_block_tracker;
-/* If this is nonzero, this block is used as the lexical context
- for symbol names. */
+extern bool parser_debug;
-extern struct block *expression_context_block;
+/* A class that can be used to build a "struct expression". */
-/* If expression_context_block is non-zero, then this is the PC within
- the block that we want to evaluate expressions at. When debugging
- C or C++ code, we use this to find the exact line we're at, and
- then look up the macro definitions active at that point. */
-extern CORE_ADDR expression_context_pc;
+struct expr_builder
+{
+ /* Constructor. LANG is the language used to parse the expression.
+ And GDBARCH is the gdbarch to use during parsing. */
-/* The innermost context required by the stack and register variables
- we've encountered so far. */
-extern struct block *innermost_block;
+ expr_builder (const struct language_defn *lang,
+ struct gdbarch *gdbarch)
+ : expout (new expression (lang, gdbarch))
+ {
+ }
-/* The block in which the most recently discovered symbol was found.
- FIXME: Should be declared along with lookup_symbol in symtab.h; is not
- related specifically to parsing. */
-extern struct block *block_found;
+ DISABLE_COPY_AND_ASSIGN (expr_builder);
-/* Number of arguments seen so far in innermost function call. */
-extern int arglist_len;
+ /* Resize the allocated expression to the correct size, and return
+ it as an expression_up -- passing ownership to the caller. */
+ ATTRIBUTE_UNUSED_RESULT expression_up release ()
+ {
+ return std::move (expout);
+ }
-/* A string token, either a char-string or bit-string. Char-strings are
- used, for example, for the names of symbols. */
+ /* Return the gdbarch that was passed to the constructor. */
-struct stoken
+ struct gdbarch *gdbarch ()
{
- /* Pointer to first byte of char-string or first bit of bit-string */
- char *ptr;
- /* Length of string in bytes for char-string or bits for bit-string */
- int length;
- };
+ return expout->gdbarch;
+ }
-struct ttype
+ /* Return the language that was passed to the constructor. */
+
+ const struct language_defn *language ()
{
- struct stoken stoken;
- struct type *type;
- };
+ return expout->language_defn;
+ }
-struct symtoken
+ /* Set the root operation of the expression that is currently being
+ built. */
+ void set_operation (expr::operation_up &&op)
{
- struct stoken stoken;
- struct symbol *sym;
- int is_a_field_of_this;
- };
+ expout->op = std::move (op);
+ }
+
+ /* The expression related to this parser state. */
+
+ expression_up expout;
+};
+
+/* This is used for expression completion. */
+
+struct expr_completion_state
+{
+ /* The last struct expression directly before a '.' or '->'. This
+ is set when parsing and is only used when completing a field
+ name. It is nullptr if no dereference operation was found. */
+ expr::structop_base_operation *expout_last_op = nullptr;
+
+ /* If we are completing a tagged type name, this will be nonzero. */
+ enum type_code expout_tag_completion_type = TYPE_CODE_UNDEF;
+
+ /* The token for tagged type name completion. */
+ gdb::unique_xmalloc_ptr<char> expout_completion_name;
+};
+
+/* An instance of this type is instantiated during expression parsing,
+ and passed to the appropriate parser. It holds both inputs to the
+ parser, and result. */
+
+struct parser_state : public expr_builder
+{
+ /* Constructor. LANG is the language used to parse the expression.
+ And GDBARCH is the gdbarch to use during parsing. */
+
+ parser_state (const struct language_defn *lang,
+ struct gdbarch *gdbarch,
+ const struct block *context_block,
+ CORE_ADDR context_pc,
+ int comma,
+ const char *input,
+ bool completion,
+ innermost_block_tracker *tracker,
+ bool void_p)
+ : expr_builder (lang, gdbarch),
+ expression_context_block (context_block),
+ expression_context_pc (context_pc),
+ comma_terminates (comma),
+ lexptr (input),
+ parse_completion (completion),
+ block_tracker (tracker),
+ void_context_p (void_p)
+ {
+ }
-/* For parsing of complicated types.
- An array should be preceded in the list by the size of the array. */
-enum type_pieces
- {
- tp_end = -1,
- tp_pointer,
- tp_reference,
- tp_array,
- tp_function,
- tp_const,
- tp_volatile,
- tp_space_identifier
- };
-/* The stack can contain either an enum type_pieces or an int. */
-union type_stack_elt
+ DISABLE_COPY_AND_ASSIGN (parser_state);
+
+ /* Begin counting arguments for a function call,
+ saving the data about any containing call. */
+
+ void start_arglist ()
{
- enum type_pieces piece;
- int int_val;
- };
-extern union type_stack_elt *type_stack;
-extern int type_stack_depth, type_stack_size;
+ m_funcall_chain.push_back (arglist_len);
+ arglist_len = 0;
+ }
+
+ /* Return the number of arguments in a function call just terminated,
+ and restore the data for the containing function call. */
-extern void write_exp_elt (union exp_element);
+ int end_arglist ()
+ {
+ int val = arglist_len;
+ arglist_len = m_funcall_chain.back ();
+ m_funcall_chain.pop_back ();
+ return val;
+ }
-extern void write_exp_elt_opcode (enum exp_opcode);
+ /* Mark the given operation as the starting location of a structure
+ expression. This is used when completing on field names. */
-extern void write_exp_elt_sym (struct symbol *);
+ void mark_struct_expression (expr::structop_base_operation *op);
-extern void write_exp_elt_longcst (LONGEST);
+ /* Indicate that the current parser invocation is completing a tag.
+ TAG is the type code of the tag, and PTR and LENGTH represent the
+ start of the tag name. */
-extern void write_exp_elt_dblcst (DOUBLEST);
+ void mark_completion_tag (enum type_code tag, const char *ptr, int length);
-extern void write_exp_elt_type (struct type *);
+ /* Push an operation on the stack. */
+ void push (expr::operation_up &&op)
+ {
+ m_operations.push_back (std::move (op));
+ }
-extern void write_exp_elt_intern (struct internalvar *);
+ /* Create a new operation and push it on the stack. */
+ template<typename T, typename... Arg>
+ void push_new (Arg... args)
+ {
+ m_operations.emplace_back (new T (std::forward<Arg> (args)...));
+ }
-extern void write_exp_string (struct stoken);
+ /* Push a new C string operation. */
+ void push_c_string (int, struct stoken_vector *vec);
-extern void write_exp_bitstring (struct stoken);
+ /* Push a symbol reference. If SYM is nullptr, look for a minimal
+ symbol. */
+ void push_symbol (const char *name, block_symbol sym);
-extern void write_exp_elt_block (struct block *);
+ /* Push a reference to $mumble. This may result in a convenience
+ variable, a history reference, or a register. */
+ void push_dollar (struct stoken str);
-extern void write_exp_msymbol (struct minimal_symbol *,
- struct type *, struct type *);
+ /* Pop an operation from the stack. */
+ expr::operation_up pop ()
+ {
+ expr::operation_up result = std::move (m_operations.back ());
+ m_operations.pop_back ();
+ return result;
+ }
-extern void write_dollar_variable (struct stoken str);
+ /* Pop N elements from the stack and return a vector. */
+ std::vector<expr::operation_up> pop_vector (int n)
+ {
+ std::vector<expr::operation_up> result (n);
+ for (int i = 1; i <= n; ++i)
+ result[n - i] = pop ();
+ return result;
+ }
+
+ /* A helper that pops an operation, wraps it in some other
+ operation, and pushes it again. */
+ template<typename T>
+ void wrap ()
+ {
+ using namespace expr;
+ operation_up v = ::expr::make_operation<T> (pop ());
+ push (std::move (v));
+ }
+
+ /* A helper that pops two operations, wraps them in some other
+ operation, and pushes the result. */
+ template<typename T>
+ void wrap2 ()
+ {
+ expr::operation_up rhs = pop ();
+ expr::operation_up lhs = pop ();
+ push (expr::make_operation<T> (std::move (lhs), std::move (rhs)));
+ }
-extern struct symbol *parse_nested_classes_for_hpacc (char *, int, char **,
- int *, char **);
+ /* If this is nonzero, this block is used as the lexical context for
+ symbol names. */
-extern char *find_template_name_end (char *);
+ const struct block * const expression_context_block;
-extern void start_arglist (void);
+ /* If expression_context_block is non-zero, then this is the PC
+ within the block that we want to evaluate expressions at. When
+ debugging C or C++ code, we use this to find the exact line we're
+ at, and then look up the macro definitions active at that
+ point. */
+ const CORE_ADDR expression_context_pc;
-extern int end_arglist (void);
+ /* Nonzero means stop parsing on first comma (if not within parentheses). */
-extern char *copy_name (struct stoken);
+ int comma_terminates;
-extern void push_type (enum type_pieces);
+ /* During parsing of a C expression, the pointer to the next character
+ is in this variable. */
-extern void push_type_int (int);
+ const char *lexptr;
-extern void push_type_address_space (char *);
+ /* After a token has been recognized, this variable points to it.
+ Currently used only for error reporting. */
+ const char *prev_lexptr = nullptr;
-extern enum type_pieces pop_type (void);
+ /* Number of arguments seen so far in innermost function call. */
-extern int pop_type_int (void);
+ int arglist_len = 0;
-extern int length_of_subexp (struct expression *, int);
+ /* True if parsing an expression to attempt completion. */
+ bool parse_completion;
-extern struct type *follow_types (struct type *);
+ /* Completion state is updated here. */
+ expr_completion_state m_completion_state;
-/* During parsing of a C expression, the pointer to the next character
- is in this variable. */
+ /* The innermost block tracker. */
+ innermost_block_tracker *block_tracker;
-extern char *lexptr;
+ /* True if no value is expected from the expression. */
+ bool void_context_p;
-/* After a token has been recognized, this variable points to it.
- Currently used only for error reporting. */
-extern char *prev_lexptr;
+private:
-/* Tokens that refer to names do so with explicit pointer and length,
- so they can share the storage that lexptr is parsing.
+ /* Data structure for saving values of arglist_len for function calls whose
+ arguments contain other function calls. */
- When it is necessary to pass a name to a function that expects
- a null-terminated string, the substring is copied out
- into a block of storage that namecopy points to.
+ std::vector<int> m_funcall_chain;
- namecopy is allocated once, guaranteed big enough, for each parsing. */
+ /* Stack of operations. */
+ std::vector<expr::operation_up> m_operations;
+};
-extern char *namecopy;
+/* When parsing expressions we track the innermost block that was
+ referenced. */
-/* Current depth in parentheses within the expression. */
+class innermost_block_tracker
+{
+public:
+ innermost_block_tracker (innermost_block_tracker_types types
+ = INNERMOST_BLOCK_FOR_SYMBOLS)
+ : m_types (types),
+ m_innermost_block (NULL)
+ { /* Nothing. */ }
-extern int paren_depth;
+ /* Update the stored innermost block if the new block B is more inner
+ than the currently stored block, or if no block is stored yet. The
+ type T tells us whether the block B was for a symbol or for a
+ register. The stored innermost block is only updated if the type T is
+ a type we are interested in, the types we are interested in are held
+ in M_TYPES and set during RESET. */
+ void update (const struct block *b, innermost_block_tracker_types t);
-/* Nonzero means stop parsing on first comma (if not within parentheses). */
+ /* Overload of main UPDATE method which extracts the block from BS. */
+ void update (const struct block_symbol &bs)
+ {
+ update (bs.block, INNERMOST_BLOCK_FOR_SYMBOLS);
+ }
-extern int comma_terminates;
-\f
-/* These codes indicate operator precedences for expression printing,
- least tightly binding first. */
-/* Adding 1 to a precedence value is done for binary operators,
- on the operand which is more tightly bound, so that operators
- of equal precedence within that operand will get parentheses. */
-/* PREC_HYPER and PREC_ABOVE_COMMA are not the precedence of any operator;
- they are used as the "surrounding precedence" to force
- various kinds of things to be parenthesized. */
-enum precedence
- {
- PREC_NULL, PREC_COMMA, PREC_ABOVE_COMMA, PREC_ASSIGN, PREC_LOGICAL_OR,
- PREC_LOGICAL_AND, PREC_BITWISE_IOR, PREC_BITWISE_AND, PREC_BITWISE_XOR,
- PREC_EQUAL, PREC_ORDER, PREC_SHIFT, PREC_ADD, PREC_MUL, PREC_REPEAT,
- PREC_HYPER, PREC_PREFIX, PREC_SUFFIX, PREC_BUILTIN_FUNCTION
+ /* Return the stored innermost block. Can be nullptr if no symbols or
+ registers were found during an expression parse, and so no innermost
+ block was defined. */
+ const struct block *block () const
+ {
+ return m_innermost_block;
+ }
+
+private:
+ /* The type of innermost block being looked for. */
+ innermost_block_tracker_types m_types;
+
+ /* The currently stored innermost block found while parsing an
+ expression. */
+ const struct block *m_innermost_block;
+};
+
+/* A string token, either a char-string or bit-string. Char-strings are
+ used, for example, for the names of symbols. */
+
+struct stoken
+ {
+ /* Pointer to first byte of char-string or first bit of bit-string. */
+ const char *ptr;
+ /* Length of string in bytes for char-string or bits for bit-string. */
+ int length;
+ };
+
+struct typed_stoken
+ {
+ /* A language-specific type field. */
+ int type;
+ /* Pointer to first byte of char-string or first bit of bit-string. */
+ char *ptr;
+ /* Length of string in bytes for char-string or bits for bit-string. */
+ int length;
+ };
+
+struct stoken_vector
+ {
+ int len;
+ struct typed_stoken *tokens;
};
-/* Table mapping opcodes into strings for printing operators
- and precedences of the operators. */
+struct ttype
+ {
+ struct stoken stoken;
+ struct type *type;
+ };
-struct op_print
+struct symtoken
{
- char *string;
- enum exp_opcode opcode;
- /* Precedence of operator. These values are used only by comparisons. */
- enum precedence precedence;
+ struct stoken stoken;
+ struct block_symbol sym;
+ int is_a_field_of_this;
+ };
- /* For a binary operator: 1 iff right associate.
- For a unary operator: 1 iff postfix. */
- int right_assoc;
+struct objc_class_str
+ {
+ struct stoken stoken;
+ struct type *type;
+ int theclass;
};
-/* The generic method for targets to specify how their registers are
- named. The mapping can be derived from two sources: REGISTER_NAME;
- and builtin regs. */
+extern const char *find_template_name_end (const char *);
-extern int target_map_name_to_register (char *, int);
+extern std::string copy_name (struct stoken);
+
+extern bool parse_float (const char *p, int len,
+ const struct type *type, gdb_byte *data);
+\f
/* Function used to avoid direct calls to fprintf
in the code generated by the bison parser. */
-extern void parser_fprintf (FILE *, const char *, ...) ATTR_FORMAT (printf, 2 ,3);
+extern void parser_fprintf (FILE *, const char *, ...) ATTRIBUTE_PRINTF (2, 3);
+
+extern bool exp_uses_objfile (struct expression *exp, struct objfile *objfile);
#endif /* PARSER_DEFS_H */
+
projects / deliverable / binutils-gdb.git / blobdiff