sal/osl/os2/signal.c

   1 /*************************************************************************
   2  *
   3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4  *
   5  * Copyright 2008 by Sun Microsystems, Inc.
   6  *
   7  * OpenOffice.org - a multi-platform office productivity suite
   8  *
   9  * $RCSfile: signal.c,v $
  10  * $Revision: 1.5 $
  11  *
  12  * This file is part of OpenOffice.org.
  13  *
  14  * OpenOffice.org is free software: you can redistribute it and/or modify
  15  * it under the terms of the GNU Lesser General Public License version 3
  16  * only, as published by the Free Software Foundation.
  17  *
  18  * OpenOffice.org is distributed in the hope that it will be useful,
  19  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  20  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21  * GNU Lesser General Public License version 3 for more details
  22  * (a copy is included in the LICENSE file that accompanied this code).
  23  *
  24  * You should have received a copy of the GNU Lesser General Public License
  25  * version 3 along with OpenOffice.org.  If not, see
  26  * <http://www.openoffice.org/license.html>
  27  * for a copy of the LGPLv3 License.
  28  *
  29  ************************************************************************/
  30
  31
  32 /* system headers */
  33 #include "system.h"
  34
  35 #include <osl/diagnose.h>
  36 #include <osl/mutex.h>
  37 #include <osl/signal.h>
  38
  39 typedef struct _oslSignalHandlerImpl
  40 {
  41     oslSignalHandlerFunction      Handler;
  42     void*                                         pData;
  43     struct _oslSignalHandlerImpl* pNext;
  44 } oslSignalHandlerImpl;
  45
  46 static sal_Bool                           bErrorReportingEnabled = sal_True;
  47 static sal_Bool                           bInitSignal = sal_False;
  48 static oslMutex                           SignalListMutex;
  49 static oslSignalHandlerImpl*  SignalList;
  50
  51 /*static*//* ULONG _Export APIENTRY SignalHandlerFunction(PEXCEPTIONREPORTRECORD pERepRec,
  52                                             PEXCEPTIONREGISTRATIONRECORD,
  53                                             PCONTEXTRECORD, PVOID);
  54 */
  55 /*static*/ ULONG __declspec(dllexport) APIENTRY SignalHandlerFunction(PEXCEPTIONREPORTRECORD pERepRec,
  56                                             PEXCEPTIONREGISTRATIONRECORD,
  57                                             PCONTEXTRECORD, PVOID);
  58 static EXCEPTIONREGISTRATIONRECORD ExcptHandler = { 0, SignalHandlerFunction };
  59
  60 static sal_Bool InitSignal( void )
  61 {
  62     SignalListMutex = osl_createMutex();
  63
  64     ExcptHandler.ExceptionHandler = (_ERR *) &SignalHandlerFunction;
  65     /* DosSetExceptionHandler(&ExcptHandler); */
  66
  67     return sal_True;
  68 }
  69
  70 static sal_Bool DeInitSignal( void )
  71 {
  72     /* DosUnsetExceptionHandler(&ExcptHandler); */
  73
  74     osl_destroyMutex(SignalListMutex);
  75
  76     return sal_False;
  77 }
  78
  79 static oslSignalAction CallSignalHandler(oslSignalInfo *pInfo)
  80 {
  81     oslSignalHandlerImpl* pHandler = SignalList;
  82     oslSignalAction Action = osl_Signal_ActCallNextHdl;
  83
  84     while (pHandler != NULL)
  85     {
  86         if ((Action = pHandler->Handler(pHandler->pData, pInfo)) != osl_Signal_ActCallNextHdl)
  87             break;
  88
  89         pHandler = pHandler->pNext;
  90     }
  91
  92     return Action;
  93 }
  94
  95 /*****************************************************************************/
  96 /* SignalHandlerFunction        */
  97 /*****************************************************************************/
  98 /*static*/ ULONG __declspec(dllexport) APIENTRY SignalHandlerFunction(PEXCEPTIONREPORTRECORD pERepRec,
  99                                             PEXCEPTIONREGISTRATIONRECORD pERegRec,
 100                                             PCONTEXTRECORD pConRec, PVOID pReserved)
 101 {
 102     oslSignalInfo        Info;
 103
 104     Info.UserSignal = pERepRec->ExceptionNum;
 105     Info.UserData   = NULL;
 106
 107     switch (pERepRec->ExceptionNum)
 108     {
 109         case XCPT_ACCESS_VIOLATION:
 110             Info.Signal = osl_Signal_AccessViolation;
 111             break;
 112
 113         case XCPT_INTEGER_DIVIDE_BY_ZERO:
 114             Info.Signal = osl_Signal_IntegerDivideByZero;
 115             break;
 116
 117         case XCPT_BREAKPOINT:
 118             Info.Signal = osl_Signal_DebugBreak;
 119             break;
 120
 121         default:
 122             Info.Signal = osl_Signal_System;
 123             break;
 124     }
 125
 126     switch (CallSignalHandler(&Info))
 127     {
 128         case osl_Signal_ActCallNextHdl:
 129             return (XCPT_CONTINUE_SEARCH);
 130
 131         case osl_Signal_ActAbortApp:
 132             return (XCPT_CONTINUE_SEARCH);
 133
 134         case osl_Signal_ActKillApp:
 135             exit(255);
 136             break;
 137     }
 138
 139     return (XCPT_CONTINUE_SEARCH);
 140 }
 141
 142 /*****************************************************************************/
 143 /* osl_addSignalHandler */
 144 /*****************************************************************************/
 145 oslSignalHandler SAL_CALL osl_addSignalHandler(oslSignalHandlerFunction Handler, void* pData)
 146 {
 147     oslSignalHandlerImpl* pHandler;
 148
 149     OSL_ASSERT(Handler != NULL);
 150
 151     if (! bInitSignal)
 152         bInitSignal = InitSignal();
 153
 154     pHandler = (oslSignalHandlerImpl*) calloc(1, sizeof(oslSignalHandlerImpl));
 155
 156     if (pHandler != NULL)
 157     {
 158         pHandler->Handler = Handler;
 159         pHandler->pData   = pData;
 160
 161         osl_acquireMutex(SignalListMutex);
 162
 163         pHandler->pNext = SignalList;
 164         SignalList      = pHandler;
 165
 166         osl_releaseMutex(SignalListMutex);
 167
 168         return (pHandler);
 169     }
 170
 171     return (NULL);
 172 }
 173
 174 /*****************************************************************************/
 175 /* osl_removeSignalHandler */
 176 /*****************************************************************************/
 177 sal_Bool SAL_CALL osl_removeSignalHandler(oslSignalHandler Handler)
 178 {
 179     oslSignalHandlerImpl *pHandler, *pPrevious = NULL;
 180
 181     OSL_ASSERT(Handler != NULL);
 182
 183     if (! bInitSignal)
 184         bInitSignal = InitSignal();
 185
 186     osl_acquireMutex(SignalListMutex);
 187
 188     pHandler = SignalList;
 189
 190     while (pHandler != NULL)
 191     {
 192         if (pHandler == Handler)
 193         {
 194             if (pPrevious)
 195                 pPrevious->pNext = pHandler->pNext;
 196             else
 197                 SignalList = pHandler->pNext;
 198
 199             osl_releaseMutex(SignalListMutex);
 200
 201             if (SignalList == NULL )
 202                 bInitSignal = DeInitSignal();
 203
 204             free(pHandler);
 205
 206             return (sal_True);
 207         }
 208
 209         pPrevious = pHandler;
 210         pHandler  = pHandler->pNext;
 211     }
 212
 213     osl_releaseMutex(SignalListMutex);
 214
 215     return (sal_False);
 216 }
 217
 218 /*****************************************************************************/
 219 /* osl_raiseSignal */
 220 /*****************************************************************************/
 221 oslSignalAction SAL_CALL osl_raiseSignal(sal_Int32 UserSignal, void* UserData)
 222 {
 223     oslSignalInfo   Info;
 224     oslSignalAction Action;
 225
 226     if (! bInitSignal)
 227         bInitSignal = InitSignal();
 228
 229     osl_acquireMutex(SignalListMutex);
 230
 231     Info.Signal     = osl_Signal_User;
 232     Info.UserSignal = UserSignal;
 233     Info.UserData   = UserData;
 234
 235     Action = CallSignalHandler(&Info);
 236
 237     osl_releaseMutex(SignalListMutex);
 238
 239     return (Action);
 240 }
 241
 242 /*****************************************************************************/
 243 /* osl_setErrorReporting */
 244 /*****************************************************************************/
 245 sal_Bool SAL_CALL osl_setErrorReporting( sal_Bool bEnable )
 246 {
 247     sal_Bool bOld = bErrorReportingEnabled;
 248     bErrorReportingEnabled = bEnable;
 249
 250     return bOld;
 251 }
 252