ACE/tests/Compiler_Features_39_Test.cpp

   1 /**
   2  * This program checks if the compiler/RTL does have correct support
   3  * for structured exception handling
   4  */
   5
   6 #include "test_config.h"
   7
   8 #if defined (ACE_HAS_WIN32_STRUCTURED_EXCEPTIONS)
   9 int ExFilter(EXCEPTION_POINTERS *ep, DWORD code_arg)
  10 {
  11   ACE_DEBUG ((LM_INFO,("In SEH Filter\n")));
  12   ACE_DEBUG ((LM_INFO,("Code param=%d\n"), code_arg));
  13   ACE_DEBUG ((LM_INFO,("\tep->ExceptionRecord->ExceptionCode =%d\n"), ep->ExceptionRecord->ExceptionCode));
  14   ACE_DEBUG ((LM_INFO,("\tep->ExceptionRecord->ExceptionAddress =%@\n"), ep->ExceptionRecord->ExceptionAddress));
  15   if (ep->ExceptionRecord->NumberParameters >= 1)
  16     ACE_DEBUG ((LM_INFO,("\tep->ExceptionRecord->ExceptionInformation[0]=%@\n"), ep->ExceptionRecord->ExceptionInformation[0]));
  17   if (ep->ExceptionRecord->NumberParameters == 2)
  18     ACE_DEBUG ((LM_INFO,("\tep->ExceptionRecord->ExceptionInformation[1]=%@\n"), ep->ExceptionRecord->ExceptionInformation[1]));
  19   return 1;
  20 }
  21
  22 void test()
  23 {
  24   volatile int* pInt = 0x0000000;
  25   *pInt = 20;
  26 }
  27
  28 #endif /* ACE_HAS_WIN32_STRUCTURED_EXCEPTIONS */
  29
  30 int
  31 run_main (int, ACE_TCHAR *[])
  32 {
  33   ACE_START_TEST (ACE_TEXT("Compiler_Features_39_Test"));
  34
  35 #if defined (ACE_HAS_WIN32_STRUCTURED_EXCEPTIONS)
  36   ACE_DEBUG ((LM_DEBUG,("Testing call SEH\n")));
  37
  38   ACE_SEH_TRY
  39     {
  40       test();
  41     }
  42   ACE_SEH_EXCEPT (ExFilter(GetExceptionInformation(), GetExceptionCode()))
  43     {
  44       ACE_DEBUG ((LM_DEBUG,("In SEH call\n")));
  45     }
  46
  47   ACE_DEBUG ((LM_DEBUG,("SEH call worked\n")));
  48
  49   ACE_DEBUG ((LM_DEBUG,("Testing non-call SEH\n")));
  50
  51   ACE_SEH_TRY
  52     {
  53       volatile int* pInt = 0x0000000;
  54       *pInt = 20;
  55     }
  56   ACE_SEH_EXCEPT (ExFilter(GetExceptionInformation(), GetExceptionCode()))
  57     {
  58       ACE_DEBUG ((LM_DEBUG,("In SEH non-call\n")));
  59     }
  60
  61   ACE_DEBUG ((LM_DEBUG,("SEH non-call worked\n")));
  62 #else
  63   ACE_DEBUG ((LM_INFO,
  64               ACE_TEXT ("Platform lacks ACE_HAS_WIN32_STRUCTURED_EXCEPTIONS\n")));
  65 #endif /* ACE_HAS_WIN32_STRUCTURED_EXCEPTIONS */
  66
  67   ACE_END_TEST;
  68
  69   return 0;
  70 }
  71