summaryrefslogtreecommitdiff
path: root/src/third_party/unwind/dist/tests/Gtest-exc.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/third_party/unwind/dist/tests/Gtest-exc.c')
-rw-r--r--src/third_party/unwind/dist/tests/Gtest-exc.c162
1 files changed, 162 insertions, 0 deletions
diff --git a/src/third_party/unwind/dist/tests/Gtest-exc.c b/src/third_party/unwind/dist/tests/Gtest-exc.c
new file mode 100644
index 00000000000..1170bdd03fd
--- /dev/null
+++ b/src/third_party/unwind/dist/tests/Gtest-exc.c
@@ -0,0 +1,162 @@
+/* libunwind - a platform-independent unwind library
+ Copyright (C) 2001-2004 Hewlett-Packard Co
+ Contributed by David Mosberger-Tang <davidm@hpl.hp.com>
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. */
+
+/* This illustrates the basics of using the unwind interface for
+ exception handling. */
+
+#ifdef HAVE_CONFIG_H
+# include "config.h"
+#endif
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <unistd.h>
+
+#include <libunwind.h>
+
+#ifdef HAVE_IA64INTRIN_H
+# include <ia64intrin.h>
+#endif
+
+#define panic(args...) \
+ { ++nerrors; fprintf (stderr, args); }
+
+int nerrors = 0;
+int verbose = 0;
+int depth = 13;
+volatile int got_here = 0;
+
+extern void b (int);
+
+void
+raise_exception (void)
+{
+ unw_cursor_t cursor;
+ unw_context_t uc;
+ int i;
+
+ unw_getcontext (&uc);
+ if (unw_init_local (&cursor, &uc) < 0)
+ {
+ panic ("unw_init_local() failed!\n");
+ return;
+ }
+
+ /* unwind to top-most frame a(), skipping over b() and raise_exception(): */
+ for (i = 0; i < depth + 2; ++i)
+ if (unw_step (&cursor) < 0)
+ {
+ panic ("unw_step() failed!\n");
+ return;
+ }
+ unw_resume (&cursor); /* transfer control to exception handler */
+}
+
+uintptr_t
+get_bsp (void)
+{
+#if UNW_TARGET_IA64
+# ifdef __INTEL_COMPILER
+ return __getReg (_IA64_REG_AR_BSP);
+# else
+ return (uintptr_t) __builtin_ia64_bsp ();
+# endif
+#else
+ return 0;
+#endif
+}
+
+int
+a (int n)
+{
+ long stack;
+ int result = 99;
+
+ if (verbose)
+ printf ("a(n=%d): sp=%p bsp=0x%lx\n",
+ n, &stack, (unsigned long) get_bsp ());
+
+ if (n > 0)
+ a (n - 1);
+ else
+ b (16);
+
+ if (verbose)
+ {
+ printf ("exception handler: here we go (sp=%p, bsp=0x%lx)...\n",
+ &stack, (unsigned long) get_bsp ());
+ /* This call works around a bug in gcc (up-to pre3.4) which
+ causes invalid assembly code to be generated when
+ __builtin_ia64_bsp() gets predicated. */
+ getpid ();
+ }
+ if (n == depth)
+ {
+ result = 0;
+ got_here = 1;
+ }
+ return result;
+}
+
+void
+b (int n)
+{
+ if ((n & 1) == 0)
+ {
+ if (verbose)
+ printf ("b(n=%d) calling raise_exception()\n", n);
+ raise_exception ();
+ }
+ panic ("FAILURE: b() returned from raise_exception()!!\n");
+}
+
+int
+main (int argc, char **argv)
+{
+ int result;
+
+ if (argc > 1)
+ {
+ ++verbose;
+ depth = atol (argv[1]);
+ if (depth < 1)
+ {
+ fprintf (stderr, "Usage: %s depth\n"
+ " depth must be >= 1\n", argv[0]);
+ exit (-1);
+ }
+ }
+
+ result = a (depth);
+ if (result != 0 || !got_here || nerrors > 0)
+ {
+ fprintf (stderr,
+ "FAILURE: test failed: result=%d got_here=%d nerrors=%d\n",
+ result, got_here, nerrors);
+ exit (-1);
+ }
+
+ if (verbose)
+ printf ("SUCCESS!\n");
+ return 0;
+}