186 lines
4.1 KiB
C
186 lines
4.1 KiB
C
/*-------------------------------------------------------------------------
|
|
*
|
|
* exc.c--
|
|
* POSTGRES exception handling code.
|
|
*
|
|
* Copyright (c) 1994, Regents of the University of California
|
|
*
|
|
*
|
|
* IDENTIFICATION
|
|
* $Header: /cvsroot/pgsql/src/backend/utils/error/Attic/exc.c,v 1.3 1996/07/22 21:58:28 scrappy Exp $
|
|
*
|
|
* NOTE
|
|
* XXX this code needs improvement--check for state violations and
|
|
* XXX reset after handling an exception.
|
|
*
|
|
*-------------------------------------------------------------------------
|
|
*/
|
|
#include <stdio.h> /* XXX use own I/O routines */
|
|
#include <errno.h>
|
|
#include "utils/exc.h"
|
|
#include "storage/ipc.h"
|
|
|
|
/*
|
|
* Global Variables
|
|
*/
|
|
static bool ExceptionHandlingEnabled = false;
|
|
|
|
char* ExcFileName = NULL;
|
|
Index ExcLineNumber = 0;
|
|
|
|
ExcFrame *ExcCurFrameP = NULL;
|
|
|
|
static ExcProc *ExcUnCaughtP = NULL;
|
|
|
|
extern char* ProgramName;
|
|
|
|
/*
|
|
* Exported Functions
|
|
*/
|
|
|
|
/*
|
|
* EnableExceptionHandling --
|
|
* Enables/disables the exception handling system.
|
|
*
|
|
* Note:
|
|
* This must be called before any exceptions occur. I.e., call this first!
|
|
* This routine will not return if an error is detected.
|
|
* This does not follow the usual Enable... protocol.
|
|
* This should be merged more closely with the error logging and tracing
|
|
* packages.
|
|
*
|
|
* Exceptions:
|
|
* none
|
|
*/
|
|
/*
|
|
* Excection handling should be supported by the language, thus there should
|
|
* be no need to explicitly enable exception processing.
|
|
*
|
|
* This function should probably not be called, ever. Currently it does
|
|
* almost nothing. If there is a need for this intialization and checking.
|
|
* then this function should be converted to the new-style Enable code and
|
|
* called by all the other module Enable functions.
|
|
*/
|
|
void
|
|
EnableExceptionHandling(bool on)
|
|
{
|
|
if (on == ExceptionHandlingEnabled) {
|
|
/* XXX add logging of failed state */
|
|
exitpg(255);
|
|
/* ExitPostgres(FatalExitStatus); */
|
|
}
|
|
|
|
if (on) { /* initialize */
|
|
;
|
|
} else { /* cleanup */
|
|
ExcFileName = NULL;
|
|
ExcLineNumber = 0;
|
|
ExcCurFrameP = NULL;
|
|
ExcUnCaughtP = NULL;
|
|
}
|
|
|
|
ExceptionHandlingEnabled = on;
|
|
}
|
|
|
|
void
|
|
ExcPrint(Exception *excP,
|
|
ExcDetail detail,
|
|
ExcData data,
|
|
ExcMessage message)
|
|
{
|
|
extern int errno;
|
|
extern int sys_nerr;
|
|
#if !defined(PORTNAME_BSD44_derived) && \
|
|
!defined(PORTNAME_bsdi) && \
|
|
!defined(PORTNAME_bsdi_2_1)
|
|
extern char *sys_errlist[];
|
|
#endif /* ! bsd_derived */
|
|
|
|
#ifdef lint
|
|
data = data;
|
|
#endif
|
|
|
|
(void) fflush(stdout); /* In case stderr is buffered */
|
|
|
|
#if 0
|
|
if (ProgramName != NULL && *ProgramName != '\0')
|
|
(void) fprintf(stderr, "%s: ", ProgramName);
|
|
#endif
|
|
|
|
if (message != NULL)
|
|
(void) fprintf(stderr, "%s", message);
|
|
else if (excP->message != NULL)
|
|
(void) fprintf(stderr, "%s", excP->message);
|
|
else
|
|
#ifdef lint
|
|
(void) fprintf(stderr, "UNNAMED EXCEPTION 0x%lx", excP);
|
|
#else
|
|
(void) fprintf(stderr, "UNNAMED EXCEPTION 0x%lx", (long)excP);
|
|
#endif
|
|
|
|
(void) fprintf(stderr, " (%ld)", detail);
|
|
|
|
if (errno > 0 && errno < sys_nerr &&
|
|
sys_errlist[errno] != NULL && sys_errlist[errno][0] != '\0')
|
|
(void) fprintf(stderr, " [%s]", sys_errlist[errno]);
|
|
else if (errno != 0)
|
|
(void) fprintf(stderr, " [Error %d]", errno);
|
|
|
|
(void) fprintf(stderr, "\n");
|
|
|
|
(void) fflush(stderr);
|
|
}
|
|
|
|
ExcProc *
|
|
ExcGetUnCaught()
|
|
{
|
|
return (ExcUnCaughtP);
|
|
}
|
|
|
|
ExcProc *
|
|
ExcSetUnCaught(ExcProc *newP)
|
|
{
|
|
ExcProc *oldP = ExcUnCaughtP;
|
|
|
|
ExcUnCaughtP = newP;
|
|
|
|
return (oldP);
|
|
}
|
|
|
|
void
|
|
ExcUnCaught(Exception *excP,
|
|
ExcDetail detail,
|
|
ExcData data,
|
|
ExcMessage message)
|
|
{
|
|
ExcPrint(excP, detail, data, message);
|
|
|
|
ExcAbort(excP, detail, data, message);
|
|
}
|
|
|
|
void
|
|
ExcRaise(Exception *excP,
|
|
ExcDetail detail,
|
|
ExcData data,
|
|
ExcMessage message)
|
|
{
|
|
register ExcFrame *efp;
|
|
|
|
efp = ExcCurFrameP;
|
|
if (efp == NULL) {
|
|
if (ExcUnCaughtP != NULL)
|
|
(*ExcUnCaughtP)(excP, detail, data, message);
|
|
|
|
ExcUnCaught(excP, detail, data, message);
|
|
} else {
|
|
efp->id = excP;
|
|
efp->detail = detail;
|
|
efp->data = data;
|
|
efp->message = message;
|
|
|
|
ExcCurFrameP = efp->link;
|
|
|
|
longjmp(efp->context, 1);
|
|
}
|
|
}
|