CydandClaude Fable 5
fdd9ac9d97
Archival snapshot of the Virtual World Entertainment Tesla cockpit software, 1994-1996: MUNGA engine and L4 pod layer source (Borland C++ 5.0), BT/RP game code, and game content (models, audio, maps, gauges, Division renderer data). Includes third-party libraries: Division dVS/DPL graphics, HMI SOS audio, WATTCP networking. Files are preserved byte-for-byte (.gitattributes disables all line-ending conversion). README.md documents the layout, target hardware, and toolchain. Co-Authored-By: Claude Fable 5 <noreply@anthropic.com>
186 lines
4.4 KiB
C++
186 lines
4.4 KiB
C++
//=======================================================================//
|
|
// File: debug2on.hpp //
|
|
// Project: Architecture //
|
|
// Author: J.M. Albertson //
|
|
// 4-12-95 CPB added Str_Cat macro //
|
|
//-----------------------------------------------------------------------//
|
|
// Copyright (C) 1994, Virtual World Entertainments, All Rights reserved //
|
|
// PROPRIETARY AND CONFIDENTIAL //
|
|
//=======================================================================//
|
|
|
|
#if !defined(OLD_DEBUG_LEVEL)
|
|
# define OLD_DEBUG_LEVEL 2
|
|
#else
|
|
# undef OLD_DEBUG_LEVEL
|
|
# if DEBUG_LEVEL>=3
|
|
# define OLD_DEBUG_LEVEL 3
|
|
# elif DEBUG_LEVEL==1
|
|
# define OLD_DEBUG_LEVEL 1
|
|
# elif DEBUG_LEVEL==0
|
|
# define OLD_DEBUG_LEVEL 0
|
|
# endif
|
|
#endif
|
|
|
|
#undef DEBUG_LEVEL
|
|
#undef Verify
|
|
#undef Verify_And_Dump
|
|
#undef Dump
|
|
#undef Tell
|
|
#undef Warn
|
|
#undef Warn_And_Dump
|
|
#undef Check_Signature
|
|
#undef Check_Pointer
|
|
#undef Check
|
|
#undef Check_Fpu
|
|
#undef Fail
|
|
#undef Cast_Object
|
|
#undef DEBUG_CODE
|
|
#undef Mem_Copy
|
|
#undef Str_Copy
|
|
#undef Str_Cat
|
|
#undef Sqrt
|
|
#undef Arctan
|
|
#undef Arccos
|
|
#undef Arcsin
|
|
#undef Power
|
|
|
|
#define DEBUG_LEVEL 2
|
|
|
|
#define DEBUG_CODE(x) { x }
|
|
|
|
#define Dump(v)\
|
|
(DEBUG_STREAM << __FILE__ "(" << __LINE__ << "): "#v" = " << (v) << endl << flush)
|
|
|
|
#define Verify(c)\
|
|
if (!(c)) {\
|
|
Verify_Failed(#c,__FILE__,__LINE__);\
|
|
}
|
|
|
|
#define Verify_And_Dump(c,v)\
|
|
if (!(c)) {\
|
|
DEBUG_STREAM << __FILE__ "(" << __LINE__ << "): "#v" = " << (v) << endl;\
|
|
Verify_Failed(#c,__FILE__,__LINE__);\
|
|
}
|
|
|
|
#define Warn(c)\
|
|
if (c) {\
|
|
DEBUG_STREAM << __FILE__"(" << __LINE__ << "): Warning -> "#c"\n" << flush;\
|
|
}
|
|
|
|
#define Warn_And_Dump(c,v)\
|
|
if (c) {\
|
|
DEBUG_STREAM << __FILE__ "(" << __LINE__ << "): "#v" = " << (v) << endl;\
|
|
DEBUG_STREAM << __FILE__"(" << __LINE__ << "): Warning -> "#c"\n" << flush;\
|
|
}
|
|
|
|
#define Tell(m)\
|
|
(DEBUG_STREAM << m << flush)
|
|
|
|
#define Check_Pointer(p) Verify(p)
|
|
|
|
#define Check_Fpu() Verify(Fpu_Ok())
|
|
|
|
#define Mem_Copy(destination, source, length, available)\
|
|
{\
|
|
Check_Pointer(destination);\
|
|
Check_Pointer(source);\
|
|
Verify((length) <= (available));\
|
|
Verify(abs((char*)destination - (char*)source) >= length);\
|
|
memcpy(destination, source, length);\
|
|
}
|
|
|
|
#define Str_Copy(destination, source, available)\
|
|
{\
|
|
Check_Pointer(destination);\
|
|
Check_Pointer(source);\
|
|
Verify((strlen(source) + 1) <= (available));\
|
|
Verify(abs(destination - source) >= (strlen(source) + 1));\
|
|
strcpy(destination, source);\
|
|
}
|
|
|
|
#define Str_Cat(destination, source, available)\
|
|
{\
|
|
Check_Pointer(destination);\
|
|
Check_Pointer(source);\
|
|
Verify((strlen(destination) + strlen(source) + 1) <= (available));\
|
|
strcat(destination, source);\
|
|
}
|
|
|
|
#define Sqrt(value)\
|
|
((value>=0.0f) ? sqrt(value) : (Fail("Bad parameter to sqrt"),0.0f))
|
|
|
|
#define Arctan(y,x)\
|
|
(\
|
|
(!Small_Enough(y) || !Small_Enough(x))\
|
|
? atan2((y),(x)) :\
|
|
(Fail("Zero Arctan!"),0.0f)\
|
|
)
|
|
|
|
#define Arccos(x)\
|
|
(\
|
|
((x)>=-1.0f && (x)<=1.0f)\
|
|
? acos(x) :\
|
|
(Fail("Out of range Arccos!"),0.0f)\
|
|
)
|
|
|
|
#define Arcsin(x)\
|
|
(\
|
|
((x)>=-1.0f && (x)<=1.0f)\
|
|
? asin(x) :\
|
|
(Fail("Out of range Arcsin!"),0.0f)\
|
|
)
|
|
|
|
#define Power(x,y)\
|
|
(\
|
|
((x)<0.0f)\
|
|
? (Fail("Out of range Power!"),0.0f) :\
|
|
pow(x,y)\
|
|
)
|
|
|
|
#if defined(USE_SIGNATURE)
|
|
# define Check_Signature(p) {\
|
|
Check_Pointer(p);\
|
|
Verify_And_Dump(!Is_Signature_Bad(p),Is_Signature_Bad(p));\
|
|
}
|
|
#else
|
|
# define Check_Signature(p) Check_Pointer(p)
|
|
#endif
|
|
|
|
#if defined(USE_SIGNATURE)
|
|
# define Check(p) {Check_Signature(p);Verify(!((LWord)p & 3));Check_Fpu();}
|
|
#else
|
|
# define Check(p) {Check_Pointer(p);Verify(!((LWord)p & 3));Check_Fpu();}
|
|
#endif
|
|
|
|
#define Fail(m)\
|
|
Fail_To_Debugger(m,__FILE__,__LINE__)
|
|
|
|
#if defined(USE_SIGNATURE)
|
|
# define Cast_Object(type, ptr) (\
|
|
(!ptr)\
|
|
? (\
|
|
Verify_Failed(#ptr,__FILE__,__LINE__),(type)NULL\
|
|
)\
|
|
: (\
|
|
(Is_Signature_Bad((type)ptr))\
|
|
? (\
|
|
Verify_Failed(\
|
|
"Is_Signature_Bad(("#type")"#ptr")",\
|
|
__FILE__,\
|
|
__LINE__\
|
|
),(type)NULL\
|
|
)\
|
|
: ((type)(ptr))\
|
|
)\
|
|
)
|
|
#else
|
|
# define Cast_Object(type, ptr) (\
|
|
(!ptr)\
|
|
? (\
|
|
Verify_Failed(#ptr,__FILE__,__LINE__),(type)NULL\
|
|
)\
|
|
: ((type)(ptr))\
|
|
)
|
|
#endif
|
|
|