mirror of
https://github.com/FirebirdSQL/firebird.git
synced 2025-01-25 00:03:03 +01:00
c5253ae8a5
-Replace codes.h with iberror.h (or remove) -Move gds__vax_integer and gds__event_block* to alt.cpp and isc_ to gds.cpp -Use ISC_QUAD internally -Use isc_vax_integer internally
118 lines
4.2 KiB
C
118 lines
4.2 KiB
C
/*
|
|
* PROGRAM: JRD Access Method
|
|
* MODULE: iberr.h
|
|
* DESCRIPTION: Interbase error handling definitions.
|
|
*
|
|
* The contents of this file are subject to the Interbase Public
|
|
* License Version 1.0 (the "License"); you may not use this file
|
|
* except in compliance with the License. You may obtain a copy
|
|
* of the License at http://www.Inprise.com/IPL.html
|
|
*
|
|
* Software distributed under the License is distributed on an
|
|
* "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express
|
|
* or implied. See the License for the specific language governing
|
|
* rights and limitations under the License.
|
|
*
|
|
* The Original Code was created by Inprise Corporation
|
|
* and its predecessors. Portions created by Inprise Corporation are
|
|
* Copyright (C) Inprise Corporation.
|
|
*
|
|
* All Rights Reserved.
|
|
* Contributor(s): ______________________________________.
|
|
*
|
|
* 2002.10.28 Sean Leyne - Code cleanup, removed obsolete "MPEXL" port
|
|
*
|
|
* 2002.10.29 Sean Leyne - Removed obsolete "Netware" port
|
|
*
|
|
*/
|
|
|
|
#ifndef JRD_IBERR_H
|
|
#define JRD_IBERR_H
|
|
|
|
#include "../jrd/gdsassert.h"
|
|
#include "../jrd/status.h"
|
|
|
|
/*
|
|
* TMN: Leave INIT_STATUS as macro for now. At least "why.c" (what
|
|
* is to become "y_valve.cpp" need it.
|
|
*/
|
|
|
|
#define INIT_STATUS(status) status [0] = isc_arg_gds;\
|
|
status [1] = 0;\
|
|
status [2] = isc_arg_end
|
|
|
|
|
|
#ifdef NOT_USED_OR_REPLACED
|
|
|
|
#define STUFF_STATUS(status_vector,status) \
|
|
{ \
|
|
va_list args; \
|
|
ISC_STATUS *p, *q; \
|
|
int type, len; \
|
|
\
|
|
VA_START (args, status); \
|
|
p = status_vector; \
|
|
\
|
|
*p++ = (ISC_STATUS)isc_arg_gds; \
|
|
*p++ = status; \
|
|
\
|
|
while ((type = va_arg (args, int)) && ((p - status_vector) < 17)) \
|
|
switch (*p++ = type) \
|
|
{ \
|
|
case isc_arg_gds: \
|
|
*p++ = (ISC_STATUS) va_arg (args, ISC_STATUS); \
|
|
break; \
|
|
\
|
|
case isc_arg_string: \
|
|
q = (ISC_STATUS*) va_arg (args, TEXT*); \
|
|
if (strlen ((TEXT*)q) >= MAX_ERRSTR_LEN)\
|
|
{ \
|
|
*(p -1) = isc_arg_cstring; \
|
|
*p++ = (ISC_STATUS) MAX_ERRSTR_LEN; \
|
|
} \
|
|
*p++ = (ISC_STATUS) q; \
|
|
break; \
|
|
\
|
|
case isc_arg_interpreted: \
|
|
*p++ = (ISC_STATUS) va_arg (args, TEXT*); \
|
|
break; \
|
|
\
|
|
case isc_arg_cstring: \
|
|
len = (int) va_arg (args, int); \
|
|
*p++ = (ISC_STATUS) (len >= MAX_ERRSTR_LEN) ? MAX_ERRSTR_LEN : len;\
|
|
*p++ = (ISC_STATUS) va_arg (args, TEXT*); \
|
|
break; \
|
|
\
|
|
case isc_arg_number: \
|
|
*p++ = (ISC_STATUS) va_arg (args, SLONG); \
|
|
break; \
|
|
\
|
|
case isc_arg_vms: \
|
|
case isc_arg_unix: \
|
|
case isc_arg_win32: \
|
|
default: \
|
|
*p++ = (ISC_STATUS) va_arg (args, int); \
|
|
break; \
|
|
} \
|
|
*p = isc_arg_end; \
|
|
}
|
|
/* end of STUFF_STATUS */
|
|
|
|
#else
|
|
/* TMN: The hits just keep on coming. The macro STUFF_STATUS MUST be
|
|
* defined so it can get instantiated in the "calling" place because of
|
|
* the use of varargs. I trimmed this one a bit though by putting the
|
|
* majority of the macro into a function.
|
|
*/
|
|
|
|
#define STUFF_STATUS(status_vector,status) \
|
|
{ \
|
|
va_list args; \
|
|
VA_START (args, status); \
|
|
STUFF_STATUS_function(status_vector, status, args); \
|
|
}
|
|
|
|
#endif /* 0/1 */
|
|
|
|
#endif /* JRD_IBERR_H */
|