1 /* Exception (throw catch) mechanism, for GDB, the GNU debugger.
3 Copyright (C) 1986, 1988, 1989, 1990, 1991, 1992, 1993, 1994, 1995,
4 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006
5 Free Software Foundation, Inc.
7 This file is part of GDB.
9 This program is free software; you can redistribute it and/or modify
10 it under the terms of the GNU General Public License as published by
11 the Free Software Foundation; either version 2 of the License, or
12 (at your option) any later version.
14 This program is distributed in the hope that it will be useful,
15 but WITHOUT ANY WARRANTY; without even the implied warranty of
16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 GNU General Public License for more details.
19 You should have received a copy of the GNU General Public License
20 along with this program; if not, write to the Free Software
21 Foundation, Inc., 51 Franklin Street, Fifth Floor,
22 Boston, MA 02110-1301, USA. */
30 /* Reasons for calling throw_exceptions(). NOTE: all reason values
31 must be less than zero. enum value 0 is reserved for internal use
32 as the return value from an initial setjmp(). The function
33 catch_exceptions() reserves values >= 0 as legal results from its
40 /* Any other error. */
44 #define RETURN_MASK(reason) (1 << (int)(-reason))
45 #define RETURN_MASK_QUIT RETURN_MASK (RETURN_QUIT)
46 #define RETURN_MASK_ERROR RETURN_MASK (RETURN_ERROR)
47 #define RETURN_MASK_ALL (RETURN_MASK_QUIT | RETURN_MASK_ERROR)
48 typedef int return_mask
;
50 /* Describe all exceptions. */
54 /* Any generic error, the corresponding text is in
59 /* Thread library lacks support necessary for finding thread local
61 TLS_NO_LIBRARY_SUPPORT_ERROR
,
63 /* Load module not found while attempting to find thread local storage. */
64 TLS_LOAD_MODULE_NOT_FOUND_ERROR
,
66 /* Thread local storage has not been allocated yet. */
67 TLS_NOT_ALLOCATED_YET_ERROR
,
69 /* Something else went wrong while attempting to find thread local
70 storage. The ``struct gdb_exception'' message field provides
74 /* Add more errors here. */
80 enum return_reason reason
;
85 /* A pre-defined non-exception. */
86 extern const struct gdb_exception exception_none
;
88 /* Wrap set/long jmp so that it's more portable (internal to
91 #if defined(HAVE_SIGSETJMP)
92 #define EXCEPTIONS_SIGJMP_BUF sigjmp_buf
93 #define EXCEPTIONS_SIGSETJMP(buf) sigsetjmp((buf), 1)
94 #define EXCEPTIONS_SIGLONGJMP(buf,val) siglongjmp((buf), (val))
96 #define EXCEPTIONS_SIGJMP_BUF jmp_buf
97 #define EXCEPTIONS_SIGSETJMP(buf) setjmp(buf)
98 #define EXCEPTIONS_SIGLONGJMP(buf,val) longjmp((buf), (val))
101 /* Functions to drive the exceptions state m/c (internal to
103 EXCEPTIONS_SIGJMP_BUF
*exceptions_state_mc_init (struct ui_out
*func_uiout
,
104 volatile struct gdb_exception
*
107 int exceptions_state_mc_action_iter (void);
108 int exceptions_state_mc_action_iter_1 (void);
110 /* Macro to wrap up standard try/catch behavior.
112 The double loop lets us correctly handle code "break"ing out of the
113 try catch block. (It works as the "break" only exits the inner
114 "while" loop, the outer for loop detects this handling it
115 correctly.) Of course "return" and "goto" are not so lucky.
121 volatile struct gdb_exception e;
122 TRY_CATCH (e, RETURN_MASK_ERROR)
127 case RETURN_ERROR: ...
132 #define TRY_CATCH(EXCEPTION,MASK) \
134 EXCEPTIONS_SIGJMP_BUF *buf = \
135 exceptions_state_mc_init (uiout, &(EXCEPTION), (MASK)); \
136 EXCEPTIONS_SIGSETJMP (*buf); \
138 while (exceptions_state_mc_action_iter ()) \
139 while (exceptions_state_mc_action_iter_1 ())
144 /* If E is an exception, print it's error message on the specified
145 stream. for _fprintf, prefix the message with PREFIX... */
146 extern void exception_print (struct ui_file
*file
, struct gdb_exception e
);
147 extern void exception_fprintf (struct ui_file
*file
, struct gdb_exception e
,
149 ...) ATTR_FORMAT (printf
, 3, 4);
151 /* Throw an exception (as described by "struct gdb_exception"). Will
152 execute a LONG JUMP to the inner most containing exception handler
153 established using catch_exceptions() (or similar).
155 Code normally throws an exception using error() et.al. For various
156 reaons, GDB also contains code that throws an exception directly.
157 For instance, the remote*.c targets contain CNTRL-C signal handlers
158 that propogate the QUIT event up the exception chain. ``This could
159 be a good thing or a dangerous thing.'' -- the Existential
162 extern NORETURN
void throw_exception (struct gdb_exception exception
) ATTR_NORETURN
;
163 extern NORETURN
void throw_verror (enum errors
, const char *fmt
, va_list ap
)
164 ATTR_NORETURN
ATTR_FORMAT (printf
, 2, 0);
165 extern NORETURN
void throw_vfatal (const char *fmt
, va_list ap
)
166 ATTR_NORETURN
ATTR_FORMAT (printf
, 1, 0);
167 extern NORETURN
void throw_error (enum errors error
, const char *fmt
,
168 ...) ATTR_NORETURN
ATTR_FORMAT (printf
, 2, 3);
170 /* Instead of deprecated_throw_reason, code should use catch_exception
171 and throw_exception. */
172 extern NORETURN
void deprecated_throw_reason (enum return_reason reason
) ATTR_NORETURN
;
174 /* Call FUNC(UIOUT, FUNC_ARGS) but wrapped within an exception
175 handler. If an exception (enum return_reason) is thrown using
176 throw_exception() than all cleanups installed since
177 catch_exceptions() was entered are invoked, the (-ve) exception
178 value is then returned by catch_exceptions. If FUNC() returns
179 normally (with a postive or zero return value) then that value is
180 returned by catch_exceptions(). It is an internal_error() for
181 FUNC() to return a negative value.
183 For the period of the FUNC() call: UIOUT is installed as the output
184 builder; ERRSTRING is installed as the error/quit message; and a
185 new cleanup_chain is established. The old values are restored
186 before catch_exceptions() returns.
188 The variant catch_exceptions_with_msg() is the same as
189 catch_exceptions() but adds the ability to return an allocated
190 copy of the gdb error message. This is used when a silent error is
191 issued and the caller wants to manually issue the error message.
193 FIXME; cagney/2001-08-13: The need to override the global UIOUT
194 builder variable should just go away.
196 This function superseeds catch_errors().
198 This function uses SETJMP() and LONGJUMP(). */
201 typedef int (catch_exceptions_ftype
) (struct ui_out
*ui_out
, void *args
);
202 extern int catch_exceptions (struct ui_out
*uiout
,
203 catch_exceptions_ftype
*func
, void *func_args
,
205 typedef void (catch_exception_ftype
) (struct ui_out
*ui_out
, void *args
);
206 extern int catch_exceptions_with_msg (struct ui_out
*uiout
,
207 catch_exceptions_ftype
*func
,
212 /* This function, in addition, suppresses the printing of the captured
213 error message. It's up to the client to print it. */
215 extern struct gdb_exception
catch_exception (struct ui_out
*uiout
,
216 catch_exception_ftype
*func
,
220 /* If CATCH_ERRORS_FTYPE throws an error, catch_errors() returns zero
221 otherwize the result from CATCH_ERRORS_FTYPE is returned. It is
222 probably useful for CATCH_ERRORS_FTYPE to always return a non-zero
223 value. It's unfortunate that, catch_errors() does not return an
224 indication of the exact exception that it caught - quit_flag might
227 This function is superseeded by catch_exceptions(). */
229 typedef int (catch_errors_ftype
) (void *);
230 extern int catch_errors (catch_errors_ftype
*, void *, char *, return_mask
);
232 /* Template to catch_errors() that wraps calls to command
235 typedef void (catch_command_errors_ftype
) (char *, int);
236 extern int catch_command_errors (catch_command_errors_ftype
*func
, char *command
, int from_tty
, return_mask
);