cde/programs/dtinfo/DtMmdb/dti_excs/terminate.C

   1 /*
   2  * CDE - Common Desktop Environment
   3  *
   4  * Copyright (c) 1993-2012, The Open Group. All rights reserved.
   5  *
   6  * These libraries and programs are free software; you can
   7  * redistribute them and/or modify them under the terms of the GNU
   8  * Lesser General Public License as published by the Free Software
   9  * Foundation; either version 2 of the License, or (at your option)
  10  * any later version.
  11  *
  12  * These libraries and programs are distributed in the hope that
  13  * they will be useful, but WITHOUT ANY WARRANTY; without even the
  14  * implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
  15  * PURPOSE. See the GNU Lesser General Public License for more
  16  * details.
  17  *
  18  * You should have received a copy of the GNU Lesser General Public
  19  * License along with these librararies and programs; if not, write
  20  * to the Free Software Foundation, Inc., 51 Franklin Street, Fifth
  21  * Floor, Boston, MA 02110-1301 USA
  22  */
  23 // $TOG: terminate.C /main/4 1997/09/05 11:30:17 samborn $
  24 #if !defined(NATIVE_EXCEPTIONS) && !defined(HAS_TERMINATE)
  25 #include "Exceptions.hh"
  26
  27 typedef void (*PFV)();
  28
  29 static PFV _terminate_handler = NULL;
  30
  31 PFV
  32 set_terminate (PFV handler)
  33 {
  34   PFV old_handler = _terminate_handler;
  35
  36   _terminate_handler = handler != NULL ? handler : NULL;
  37
  38   return (old_handler);
  39 }
  40
  41 void
  42 terminate()
  43 {
  44   if (_terminate_handler != NULL)
  45     {
  46       // Reset terminate handler to NULL before handling to
  47       // avoid potential recursive calls due to exceptions
  48       // abuse in the terminate handler.
  49       PFV handler = _terminate_handler;
  50       _terminate_handler = NULL;
  51       mtry
  52         {
  53           (*handler)();
  54         }
  55       mcatch_any()
  56         {
  57           Exceptions::error (Exceptions::f_msg_throw_from_terminate,
  58                              Exceptions::APPLICATION_ERROR);
  59         }
  60       end_try;
  61     }
  62
  63   abort();
  64 }
  65 #else
  66
  67 #ifdef hpux
  68 // HPUX doesn't define the set_terminate function from the ARM.
  69 typedef void (*PFV)();
  70 PFV set_terminate (PFV) { return (0); }
  71 #endif
  72
  73 #endif /* NATIVE_EXCEPTIONS */