You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
86 lines
2.5 KiB
86 lines
2.5 KiB
// scuDbgTracer.h -- Debug trace helpers
|
|
|
|
// (c) Copyright Schlumberger Technology Corp., unpublished work, created
|
|
// 1999. This computer program includes Confidential, Proprietary
|
|
// Information and is a Trade Secret of Schlumberger Technology Corp. All
|
|
// use, disclosure, and/or reproduction is prohibited unless authorized
|
|
// in writing. All Rights Reserved.
|
|
|
|
#if !defined(SLBSCU_DBGTRACE_H)
|
|
#define SLBSCU_DBGTRACE_H
|
|
|
|
#if defined(_DEBUG)
|
|
|
|
#include <stdio.h>
|
|
#include <windows.h>
|
|
|
|
#include "scuExc.h"
|
|
|
|
namespace scu
|
|
{
|
|
|
|
inline void
|
|
TraceRoutine(char const *szRoutineName,
|
|
char const *szAction)
|
|
{
|
|
FILE *pf = fopen("C:\\slbTrace.log", "a");
|
|
pf = fopen("C:\\slbTrace.log", "a");
|
|
if (pf)
|
|
{
|
|
fprintf(pf,
|
|
"Routine: %s Action: %s\n",
|
|
szRoutineName, szAction);
|
|
fclose(pf);
|
|
}
|
|
}
|
|
|
|
inline void
|
|
TraceCatch(char const *szRoutineName,
|
|
Exception const &rExc)
|
|
{
|
|
FILE *pf = fopen("C:\\slbTrace.log", "a");
|
|
pf = fopen("C:\\slbTrace.log", "a");
|
|
if (pf)
|
|
{
|
|
fprintf(pf,
|
|
"Routine: %s Action: Catching Type: scu::Exception Facility: %u Cause: %08u (0x%08x) Description %s\n",
|
|
szRoutineName, rExc.Facility(), rExc.Error(), rExc.Error(), rExc.Description());
|
|
fclose(pf);
|
|
}
|
|
}
|
|
|
|
inline void
|
|
Trace(char const *szRoutineName,
|
|
char const *szAction,
|
|
char const *szType,
|
|
DWORD dwValue)
|
|
{
|
|
FILE *pf = fopen("C:\\slbTrace.log", "a");
|
|
pf = fopen("C:\\slbTrace.log", "a");
|
|
if (pf)
|
|
{
|
|
fprintf(pf,
|
|
"Routine: %s Action: %s Type: %s Value: 0x%08x\n",
|
|
szRoutineName, szAction, szType, dwValue);
|
|
fclose(pf);
|
|
}
|
|
}
|
|
}
|
|
|
|
#define SCUTRACE(RoutineName, Action, Type, dwValue) scu::Trace(RoutineName, Action, Type, (dwValue))
|
|
#define SCUTRACE_RTN(RoutineName, Action) scu::TraceRoutine(RoutineName, Action)
|
|
#define SCUTRACE_CATCH(RoutineName, rExc) scu::TraceCatch(RoutineName, rExc)
|
|
#define SCUTRACE_THROW(RoutineName, Type, dwValue) scu::Trace(RoutineName, "Throwing", Type, dwValue)
|
|
#else
|
|
|
|
#define SCUTRACE(RoutineName, Action, Type, dwValue)
|
|
#define SCUTRACE_RTN(RoutineName, Action)
|
|
#define SCUTRACE_CATCH(RoutineName, rExc)
|
|
#define SCUTRACE_THROW(RoutineName, Type, dwValue)
|
|
|
|
#endif // !defined(_DEBUG)
|
|
|
|
#endif // !defined(SLBSCU_DBGTRACE_H)
|
|
|
|
|
|
|