1 /* Data structures and API for event locations in GDB.
2 Copyright (C) 2013-2015 Free Software Foundation, Inc.
4 This file is part of GDB.
6 This program is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 3 of the License, or
9 (at your option) any later version.
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with this program. If not, see <http://www.gnu.org/licenses/>. */
20 #include "gdb_assert.h"
25 #include "cli/cli-utils.h"
31 /* An event location used to set a stop event in the inferior.
32 This structure is an amalgam of the various ways
33 to specify where a stop event should be set. */
37 /* The type of this breakpoint specification. */
38 enum event_location_type type;
39 #define EL_TYPE(PTR) (PTR)->type
43 /* A generic "this is a string specification" for a location.
44 This representation is used by both "normal" linespecs and
47 #define EL_LINESPEC(PTR) ((PTR)->u.addr_string)
50 /* Cached string representation of this location. This is used, e.g., to
51 save stop event locations to file. Malloc'd. */
53 #define EL_STRING(PTR) ((PTR)->as_string)
56 /* See description in location.h. */
58 enum event_location_type
59 event_location_type (const struct event_location *location)
61 return EL_TYPE (location);
64 /* See description in location.h. */
66 struct event_location *
67 new_linespec_location (char **linespec)
69 struct event_location *location;
71 location = XCNEW (struct event_location);
72 EL_TYPE (location) = LINESPEC_LOCATION;
73 if (*linespec != NULL)
76 char *orig = *linespec;
78 linespec_lex_to_end (linespec);
79 p = remove_trailing_whitespace (orig, *linespec);
81 EL_LINESPEC (location) = savestring (orig, p - orig);
86 /* See description in location.h. */
89 get_linespec_location (const struct event_location *location)
91 gdb_assert (EL_TYPE (location) == LINESPEC_LOCATION);
92 return EL_LINESPEC (location);
95 /* See description in location.h. */
97 struct event_location *
98 copy_event_location (const struct event_location *src)
100 struct event_location *dst;
102 dst = XCNEW (struct event_location);
103 EL_TYPE (dst) = EL_TYPE (src);
104 if (EL_STRING (src) != NULL)
105 EL_STRING (dst) = xstrdup (EL_STRING (src));
107 switch (EL_TYPE (src))
109 case LINESPEC_LOCATION:
110 if (EL_LINESPEC (src) != NULL)
111 EL_LINESPEC (dst) = xstrdup (EL_LINESPEC (src));
115 gdb_assert_not_reached ("unknown event location type");
121 /* A cleanup function for struct event_location. */
124 delete_event_location_cleanup (void *data)
126 struct event_location *location = (struct event_location *) data;
128 delete_event_location (location);
131 /* See description in location.h. */
134 make_cleanup_delete_event_location (struct event_location *location)
136 return make_cleanup (delete_event_location_cleanup, location);
139 /* See description in location.h. */
142 delete_event_location (struct event_location *location)
144 if (location != NULL)
146 xfree (EL_STRING (location));
148 switch (EL_TYPE (location))
150 case LINESPEC_LOCATION:
151 xfree (EL_LINESPEC (location));
155 gdb_assert_not_reached ("unknown event location type");
162 /* See description in location.h. */
165 event_location_to_string (struct event_location *location)
167 if (EL_STRING (location) == NULL)
169 switch (EL_TYPE (location))
171 case LINESPEC_LOCATION:
172 if (EL_LINESPEC (location) != NULL)
173 EL_STRING (location) = xstrdup (EL_LINESPEC (location));
177 gdb_assert_not_reached ("unknown event location type");
181 return EL_STRING (location);
184 /* See description in location.h. */
186 struct event_location *
187 string_to_event_location (char **stringp,
188 const struct language_defn *language)
190 struct event_location *location;
192 location = new_linespec_location (stringp);
196 /* See description in location.h. */
199 event_location_empty_p (const struct event_location *location)
201 switch (EL_TYPE (location))
203 case LINESPEC_LOCATION:
204 /* Linespecs are never "empty." (NULL is a valid linespec) */
208 gdb_assert_not_reached ("unknown event location type");
212 /* See description in location.h. */
215 set_event_location_string (struct event_location *location,
218 xfree (EL_STRING (location));
219 EL_STRING (location) = string == NULL ? NULL : xstrdup (string);