1db126ae2SDaniel Kiss // -*- C++ -*-
2db126ae2SDaniel Kiss //===----------------------------------------------------------------------===//
3db126ae2SDaniel Kiss //
4db126ae2SDaniel Kiss // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
5db126ae2SDaniel Kiss // See https://llvm.org/LICENSE.txt for license information.
6db126ae2SDaniel Kiss // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
7db126ae2SDaniel Kiss //
8db126ae2SDaniel Kiss //===----------------------------------------------------------------------===//
9db126ae2SDaniel Kiss 
10db126ae2SDaniel Kiss // REQUIRES: linux
11db126ae2SDaniel Kiss 
12*cb055e51SLouis Dionne // TODO: Figure out why this fails with Memory Sanitizer.
13*cb055e51SLouis Dionne // XFAIL: msan
14*cb055e51SLouis Dionne 
15db126ae2SDaniel Kiss // Basic test for _Unwind_ForcedUnwind.
16db126ae2SDaniel Kiss // See libcxxabi/test/forced_unwind* tests too.
17db126ae2SDaniel Kiss 
18db126ae2SDaniel Kiss #include <assert.h>
19db126ae2SDaniel Kiss #include <dlfcn.h>
20db126ae2SDaniel Kiss #include <signal.h>
21db126ae2SDaniel Kiss #include <stdint.h>
22db126ae2SDaniel Kiss #include <stdio.h>
23db126ae2SDaniel Kiss #include <stdlib.h>
24db126ae2SDaniel Kiss #include <string.h>
25db126ae2SDaniel Kiss #include <sys/types.h>
26db126ae2SDaniel Kiss #include <unistd.h>
27db126ae2SDaniel Kiss #include <unwind.h>
28db126ae2SDaniel Kiss 
29db126ae2SDaniel Kiss void foo();
30db126ae2SDaniel Kiss _Unwind_Exception ex;
31db126ae2SDaniel Kiss 
stop(int version,_Unwind_Action actions,_Unwind_Exception_Class exceptionClass,_Unwind_Exception * exceptionObject,struct _Unwind_Context * context,void * stop_parameter)32db126ae2SDaniel Kiss _Unwind_Reason_Code stop(int version, _Unwind_Action actions,
33f5b997e6SDaniel Kiss                          _Unwind_Exception_Class exceptionClass,
34db126ae2SDaniel Kiss                          _Unwind_Exception *exceptionObject,
35db126ae2SDaniel Kiss                          struct _Unwind_Context *context,
36db126ae2SDaniel Kiss                          void *stop_parameter) {
37db126ae2SDaniel Kiss   assert(version == 1);
38db126ae2SDaniel Kiss   assert((actions & _UA_FORCE_UNWIND) != 0);
39db126ae2SDaniel Kiss   (void)exceptionClass;
40db126ae2SDaniel Kiss   assert(exceptionObject == &ex);
41db126ae2SDaniel Kiss   assert(stop_parameter == &foo);
42db126ae2SDaniel Kiss 
43db126ae2SDaniel Kiss   Dl_info info = {0, 0, 0, 0};
44db126ae2SDaniel Kiss 
45db126ae2SDaniel Kiss   // Unwind util the main is reached, above frames depend on the platform and
46db126ae2SDaniel Kiss   // architecture.
47db126ae2SDaniel Kiss   if (dladdr(reinterpret_cast<void *>(_Unwind_GetIP(context)), &info) &&
48db126ae2SDaniel Kiss       info.dli_sname && !strcmp("main", info.dli_sname)) {
49db126ae2SDaniel Kiss     _Exit(0);
50db126ae2SDaniel Kiss   }
51db126ae2SDaniel Kiss   return _URC_NO_REASON;
52db126ae2SDaniel Kiss }
53db126ae2SDaniel Kiss 
foo()54db126ae2SDaniel Kiss __attribute__((noinline)) void foo() {
55db126ae2SDaniel Kiss 
56db126ae2SDaniel Kiss   // Arm EHABI defines struct _Unwind_Control_Block as exception
57db126ae2SDaniel Kiss   // object. Ensure struct _Unwind_Exception* work there too,
58db126ae2SDaniel Kiss   // because _Unwind_Exception in this case is just an alias.
59db126ae2SDaniel Kiss   struct _Unwind_Exception *e = &ex;
60db126ae2SDaniel Kiss #if defined(_LIBUNWIND_ARM_EHABI)
61db126ae2SDaniel Kiss   // Create a mock exception object.
62db126ae2SDaniel Kiss   memset(e, '\0', sizeof(*e));
63f5b997e6SDaniel Kiss   strcpy(reinterpret_cast<char *>(&e->exception_class), "CLNGUNW");
64db126ae2SDaniel Kiss #endif
65db126ae2SDaniel Kiss   _Unwind_ForcedUnwind(e, stop, (void *)&foo);
66db126ae2SDaniel Kiss }
67db126ae2SDaniel Kiss 
main()68db126ae2SDaniel Kiss int main() {
69db126ae2SDaniel Kiss   foo();
70db126ae2SDaniel Kiss   return -2;
71db126ae2SDaniel Kiss }
72