| 1 | #ifndef __RAS__H
|
|---|
| 2 | #define __RAS__H
|
|---|
| 3 |
|
|---|
| 4 | #include <stdio.h>
|
|---|
| 5 | #include <stdlib.h>
|
|---|
| 6 | #include <string.h>
|
|---|
| 7 | #include <stdarg.h>
|
|---|
| 8 |
|
|---|
| 9 | #include <odin.h>
|
|---|
| 10 | #include <win32type.h>
|
|---|
| 11 |
|
|---|
| 12 | #define RAS
|
|---|
| 13 |
|
|---|
| 14 |
|
|---|
| 15 | #ifdef RAS
|
|---|
| 16 |
|
|---|
| 17 | /* The RAS subsystem initialization/deinitialization */
|
|---|
| 18 |
|
|---|
| 19 | int WIN32API RasInitialize (
|
|---|
| 20 | HMODULE hmod /* the custom dll handle */
|
|---|
| 21 | );
|
|---|
| 22 |
|
|---|
| 23 | void WIN32API RasUninitialize (
|
|---|
| 24 | void
|
|---|
| 25 | );
|
|---|
| 26 |
|
|---|
| 27 |
|
|---|
| 28 | /* Generic RAS entry to be called from various places in Odin code.
|
|---|
| 29 | */
|
|---|
| 30 | void WIN32API RasEntry (
|
|---|
| 31 | ULONG ulEvent, /* RAS event number */
|
|---|
| 32 | void *p, /* pointer to event specific data */
|
|---|
| 33 | ULONG cb /* size of event specific data */
|
|---|
| 34 | );
|
|---|
| 35 |
|
|---|
| 36 | /* RAS events */
|
|---|
| 37 | #define RAS_EVENT_Kernel32InitComplete (1)
|
|---|
| 38 | #define RAS_EVENT_User32InitComplete (2)
|
|---|
| 39 | #define RAS_EVENT_Gdi32InitComplete (3)
|
|---|
| 40 |
|
|---|
| 41 | /* External logging library functions typedefs */
|
|---|
| 42 | typedef int WIN32API FNOLF (ULONG *ph, const char *logfilename);
|
|---|
| 43 | typedef void WIN32API FNCLF (ULONG h);
|
|---|
| 44 | typedef void WIN32API FNWL (ULONG h, char *buf, ULONG buflen);
|
|---|
| 45 |
|
|---|
| 46 | /* Tracked objects logging functions typedefs */
|
|---|
| 47 | typedef void WIN32API FNRASLOG_EXTERNAL (char *fmt, ...);
|
|---|
| 48 |
|
|---|
| 49 | typedef ULONG WIN32API FNLOC (ULONG objident, ULONG objhandle, void *objdata, ULONG cbobjdata, FNRASLOG_EXTERNAL *pRasLog);
|
|---|
| 50 | typedef ULONG WIN32API FNCOC (ULONG objhandle, void *objdata1, ULONG cbobjdata1, void *objdata2, ULONG cbobjdata);
|
|---|
| 51 |
|
|---|
| 52 | /* Object tracking handle */
|
|---|
| 53 | typedef struct _RAS_TRACK RAS_TRACK;
|
|---|
| 54 | typedef RAS_TRACK *RAS_TRACK_HANDLE;
|
|---|
| 55 |
|
|---|
| 56 | /* Object tracking flags */
|
|---|
| 57 | #define RAS_TRACK_FLAG_LOGOBJECTCONTENT (0x1)
|
|---|
| 58 | #define RAS_TRACK_FLAG_MEMORY (0x2)
|
|---|
| 59 | #define RAS_TRACK_FLAG_LOG_AT_EXIT (0x4)
|
|---|
| 60 | #define RAS_TRACK_FLAG_LOG_OBJECTS_AT_EXIT (0x8 | RAS_TRACK_FLAG_LOG_AT_EXIT)
|
|---|
| 61 |
|
|---|
| 62 | void WIN32API RasRegisterObjectTracking (
|
|---|
| 63 | RAS_TRACK_HANDLE *ph, /* returned handle */
|
|---|
| 64 | char *objname, /* arbitrary distinguishable object name */
|
|---|
| 65 | ULONG cbuserdata, /* extra data size */
|
|---|
| 66 | ULONG flags, /* object tracking flags */
|
|---|
| 67 | FNLOC *pfnLogObjectContent, /* custom function to log the object content */
|
|---|
| 68 | FNCOC *pfnCompareObjectContent /* custom function to compare two objects */
|
|---|
| 69 | );
|
|---|
| 70 |
|
|---|
| 71 | void WIN32API RasDeregisterObjectTracking (
|
|---|
| 72 | RAS_TRACK_HANDLE h /* handle previously returned by RasRegisterObjectTracking */
|
|---|
| 73 | );
|
|---|
| 74 |
|
|---|
| 75 | ULONG WIN32API RasAddObject ( /* returns unique object ident */
|
|---|
| 76 | RAS_TRACK_HANDLE h, /* handle previously returned by RasRegisterObjectTracking */
|
|---|
| 77 | ULONG objhandle, /* distinctive handle of the object */
|
|---|
| 78 | void *objdata, /* actual object pointer */
|
|---|
| 79 | ULONG cbobjdata /* size of object */
|
|---|
| 80 | );
|
|---|
| 81 |
|
|---|
| 82 | void WIN32API RasTrackMemAlloc (
|
|---|
| 83 | RAS_TRACK_HANDLE h, /* handle previously returned by RasRegisterObjectTracking */
|
|---|
| 84 | ULONG size
|
|---|
| 85 | );
|
|---|
| 86 |
|
|---|
| 87 | void WIN32API RasTrackMemRealloc (
|
|---|
| 88 | RAS_TRACK_HANDLE h, /* handle previously returned by RasRegisterObjectTracking */
|
|---|
| 89 | ULONG oldsize,
|
|---|
| 90 | ULONG newsize
|
|---|
| 91 | );
|
|---|
| 92 |
|
|---|
| 93 | void WIN32API RasTrackMemFree (
|
|---|
| 94 | RAS_TRACK_HANDLE h, /* handle previously returned by RasRegisterObjectTracking */
|
|---|
| 95 | ULONG size
|
|---|
| 96 | );
|
|---|
| 97 |
|
|---|
| 98 | void WIN32API RasRemoveObject (
|
|---|
| 99 | RAS_TRACK_HANDLE h, /* handle previously returned by RasRegisterObjectTracking */
|
|---|
| 100 | ULONG objhandle /* distinctive handle of the object */
|
|---|
| 101 | );
|
|---|
| 102 |
|
|---|
| 103 | void WIN32API RasSetObjectUserData (
|
|---|
| 104 | RAS_TRACK_HANDLE h, /* handle previously returned by RasRegisterObjectTracking */
|
|---|
| 105 | ULONG objident, /* unique object ident returned */
|
|---|
| 106 | void *pdata, /* arbitrary data to be saved */
|
|---|
| 107 | ULONG cbdata, /* size of data */
|
|---|
| 108 | ULONG *pcbdataret /* returned size of data actually saved */
|
|---|
| 109 | );
|
|---|
| 110 |
|
|---|
| 111 | void WIN32API RasQueryObjectUserData (
|
|---|
| 112 | RAS_TRACK_HANDLE h, /* handle previously returned by RasRegisterObjectTracking */
|
|---|
| 113 | ULONG objident, /* unique object ident returned */
|
|---|
| 114 | void *pdata, /* data buffer for queried data */
|
|---|
| 115 | ULONG cbdata, /* size of data buffer */
|
|---|
| 116 | ULONG *pcbdataret /* returned size of data actually queried */
|
|---|
| 117 | );
|
|---|
| 118 |
|
|---|
| 119 | /* RAS serialization */
|
|---|
| 120 | void WIN32API RasEnterSerialize (
|
|---|
| 121 | void
|
|---|
| 122 | );
|
|---|
| 123 |
|
|---|
| 124 | void WIN32API RasExitSerialize (
|
|---|
| 125 | void
|
|---|
| 126 | );
|
|---|
| 127 |
|
|---|
| 128 | /* RAS logging channels */
|
|---|
| 129 | typedef struct _RAS_LOG_CHANNEL;
|
|---|
| 130 | typedef struct _RAS_LOG_CHANNEL *RAS_LOG_CHANNEL_H;
|
|---|
| 131 |
|
|---|
| 132 | int WIN32API RasOpenLogChannel ( /* returns system error code */
|
|---|
| 133 | RAS_LOG_CHANNEL_H *phchannel, /* returned channel handle */
|
|---|
| 134 | const char *env_loghandler, /* name of environment variable that is equal to name of external logging dll */
|
|---|
| 135 | const char *filename /* file name to log to */
|
|---|
| 136 | );
|
|---|
| 137 |
|
|---|
| 138 | void WIN32API RasWriteLogChannel (
|
|---|
| 139 | RAS_LOG_CHANNEL_H hchannel, /* log channel handle returned by RasOpenLogChannel */
|
|---|
| 140 | const char *msg, /* string to log */
|
|---|
| 141 | ULONG length /* length of string */
|
|---|
| 142 | );
|
|---|
| 143 |
|
|---|
| 144 | void WIN32API RasCloseLogChannel (
|
|---|
| 145 | RAS_LOG_CHANNEL_H hchannel /* log channel handle returned by RasOpenLogChannel */
|
|---|
| 146 | );
|
|---|
| 147 |
|
|---|
| 148 | /* RAS logging functions */
|
|---|
| 149 | void WIN32API RasLog (
|
|---|
| 150 | char *fmt, /* 'printf' style format string */
|
|---|
| 151 | ...
|
|---|
| 152 | );
|
|---|
| 153 |
|
|---|
| 154 | void WIN32API RasLogNoEOL (
|
|---|
| 155 | char *fmt, /* 'printf' style format string */
|
|---|
| 156 | ...
|
|---|
| 157 | );
|
|---|
| 158 |
|
|---|
| 159 | void WIN32API RasLogMsg (
|
|---|
| 160 | ULONG msg, /* RAS message number */
|
|---|
| 161 | ULONG parm1, /* message parameter 1 */
|
|---|
| 162 | ULONG parm2 /* message parameter 2 */
|
|---|
| 163 | );
|
|---|
| 164 |
|
|---|
| 165 | #define RAS_FLAG_LOG_OBJECTS (0x1)
|
|---|
| 166 |
|
|---|
| 167 | void WIN32API RasLogObjects (
|
|---|
| 168 | RAS_TRACK_HANDLE h, /* handle previously returned by RasRegisterObjectTracking */
|
|---|
| 169 | ULONG flags /* logging mode */
|
|---|
| 170 | );
|
|---|
| 171 |
|
|---|
| 172 | void WIN32API RasLog2 (
|
|---|
| 173 | RAS_LOG_CHANNEL_H hchannel, /* log channel to log to */
|
|---|
| 174 | char *fmt, /* 'printf' style format string */
|
|---|
| 175 | ...
|
|---|
| 176 | );
|
|---|
| 177 |
|
|---|
| 178 | void WIN32API RasLogNoEOL2 (
|
|---|
| 179 | RAS_LOG_CHANNEL_H hchannel, /* log channel to log to */
|
|---|
| 180 | char *fmt, /* 'printf' style format string */
|
|---|
| 181 | ...
|
|---|
| 182 | );
|
|---|
| 183 |
|
|---|
| 184 | void WIN32API RasLogMsg2 (
|
|---|
| 185 | RAS_LOG_CHANNEL_H hchannel, /* log channel to log to */
|
|---|
| 186 | ULONG msg, /* RAS message number */
|
|---|
| 187 | ULONG parm1, /* message parameter 1 */
|
|---|
| 188 | ULONG parm2 /* message parameter 2 */
|
|---|
| 189 | );
|
|---|
| 190 |
|
|---|
| 191 | /* RAS replacement for C runtime sprintf function */
|
|---|
| 192 | int WIN32API snprintf (
|
|---|
| 193 | char *buf, /* memory buffer for formatted string */
|
|---|
| 194 | int n, /* length of memeory buffer */
|
|---|
| 195 | const char *fmt, /* 'printf' style format string */
|
|---|
| 196 | ...
|
|---|
| 197 | );
|
|---|
| 198 |
|
|---|
| 199 | /* Tracked object counting function */
|
|---|
| 200 | void WIN32API RasCountObjects (
|
|---|
| 201 | RAS_TRACK_HANDLE h, /* handle previously returned by RasRegisterObjectTracking */
|
|---|
| 202 | ULONG *pcount, /* pointer to returned count of objects */
|
|---|
| 203 | ULONG *pallocated /* pointer to returned number of bytes allocated for memory trackings */
|
|---|
| 204 | );
|
|---|
| 205 |
|
|---|
| 206 | /* Obtain tracking handle for particular objects */
|
|---|
| 207 | RAS_TRACK_HANDLE WIN32API RasGetTrackHandle (
|
|---|
| 208 | const char *objname /* object name use in RasRegisterObjectTracking */
|
|---|
| 209 | );
|
|---|
| 210 |
|
|---|
| 211 |
|
|---|
| 212 |
|
|---|
| 213 | /* Odin context save and restore functions.
|
|---|
| 214 | * The context has to be saved before calling
|
|---|
| 215 | * any external API (OS/2 and or C runtime functions).
|
|---|
| 216 | */
|
|---|
| 217 |
|
|---|
| 218 | typedef struct _RASCONTEXT
|
|---|
| 219 | {
|
|---|
| 220 | ULONG data[8];
|
|---|
| 221 | } RASCONTEXT;
|
|---|
| 222 |
|
|---|
| 223 | void WIN32API RasSaveContext (
|
|---|
| 224 | RASCONTEXT *pcontext /* memory buffer for context to save */
|
|---|
| 225 | );
|
|---|
| 226 | void WIN32API RasRestoreContext (
|
|---|
| 227 | RASCONTEXT *pcontext /* memory buffer for context to restore */
|
|---|
| 228 | );
|
|---|
| 229 |
|
|---|
| 230 | FARPROC WIN32API RasSetProcAddr ( /* returns old procedure address */
|
|---|
| 231 | ULONG hModule, /* Odin32 module handle */
|
|---|
| 232 | LPCSTR lpszProc, /* name of procedure */
|
|---|
| 233 | FARPROC pfnNewProc /* new procedure address */
|
|---|
| 234 | );
|
|---|
| 235 |
|
|---|
| 236 | ULONG WIN32API RasGetModuleHandle (
|
|---|
| 237 | LPCTSTR lpszModule
|
|---|
| 238 | );
|
|---|
| 239 |
|
|---|
| 240 |
|
|---|
| 241 | /* RAS entries that are passed to plugin to use
|
|---|
| 242 | */
|
|---|
| 243 | typedef struct _RasEntryTable
|
|---|
| 244 | {
|
|---|
| 245 | ULONG cb;
|
|---|
| 246 |
|
|---|
| 247 | void (* WIN32API RasRegisterObjectTracking) (RAS_TRACK_HANDLE *ph, char *objname, ULONG cbuserdata, ULONG flags, FNLOC *pfnLogObjectContent, FNCOC *pfnCompareObjectContent);
|
|---|
| 248 | void (* WIN32API RasDeregisterObjectTracking) (RAS_TRACK_HANDLE h);
|
|---|
| 249 | ULONG (* WIN32API RasAddObject) (RAS_TRACK_HANDLE h, ULONG objhandle, void *objdata, ULONG cbobjdata);
|
|---|
| 250 | void (* WIN32API RasRemoveObject) (RAS_TRACK_HANDLE h, ULONG objhandle);
|
|---|
| 251 | void (* WIN32API RasSetObjectUserData) (RAS_TRACK_HANDLE h, ULONG objident, void *pdata, ULONG cbdata, ULONG *pcbdataret);
|
|---|
| 252 | void (* WIN32API RasQueryObjectUserData) (RAS_TRACK_HANDLE h, ULONG objident, void *pdata, ULONG cbdata, ULONG *pcbdataret);
|
|---|
| 253 | void (* WIN32API RasEnterSerialize) (void);
|
|---|
| 254 | void (* WIN32API RasExitSerialize) (void);
|
|---|
| 255 | int (* WIN32API RasOpenLogChannel) (RAS_LOG_CHANNEL_H *phchannel, const char *env_loghandler, const char *filename);
|
|---|
| 256 | void (* WIN32API RasWriteLogChannel) (RAS_LOG_CHANNEL_H hchannel, const char *msg, ULONG length);
|
|---|
| 257 | void (* WIN32API RasCloseLogChannel) (RAS_LOG_CHANNEL_H hchannel);
|
|---|
| 258 | void (* WIN32API RasLog) (RAS_LOG_CHANNEL_H hchannel, char *fmt, ...);
|
|---|
| 259 | void (* WIN32API RasLogNoEOL) (RAS_LOG_CHANNEL_H hchannel, char *fmt, ...);
|
|---|
| 260 | void (* WIN32API RasLogMsg) (RAS_LOG_CHANNEL_H hchannel, ULONG msg, ULONG parm1, ULONG parm2);
|
|---|
| 261 | int (* WIN32API snprintf) (char *buf, int n, const char *fmt, ...);
|
|---|
| 262 | void (* WIN32API RasSaveContext) (RASCONTEXT *pcontext);
|
|---|
| 263 | void (* WIN32API RasRestoreContext) (RASCONTEXT *pcontext);
|
|---|
| 264 | FARPROC (* WIN32API RasSetProcAddr) (HMODULE hModule, LPCSTR lpszProc, FARPROC pfnNewProc);
|
|---|
| 265 | ULONG (* WIN32API RasGetModuleHandle) (LPCTSTR lpszModule);
|
|---|
| 266 | void (* WIN32API RasCountObjects) (RAS_TRACK_HANDLE h, ULONG *pcount, ULONG *pallocated);
|
|---|
| 267 | void (* WIN32API RasTrackMemAlloc) (RAS_TRACK_HANDLE h, ULONG size);
|
|---|
| 268 | void (* WIN32API RasTrackMemRealloc) (RAS_TRACK_HANDLE h, ULONG oldsize,ULONG newsize);
|
|---|
| 269 | void (* WIN32API RasTrackMemFree) (RAS_TRACK_HANDLE h, ULONG size);
|
|---|
| 270 | RAS_TRACK_HANDLE (* WIN32API RasGetTrackHandle) (const char *objname);
|
|---|
| 271 |
|
|---|
| 272 | } RasEntryTable;
|
|---|
| 273 |
|
|---|
| 274 | /* RAS entries those can be replaced by plugin
|
|---|
| 275 | */
|
|---|
| 276 | typedef struct _RasPluginEntryTable
|
|---|
| 277 | {
|
|---|
| 278 | ULONG cb;
|
|---|
| 279 |
|
|---|
| 280 | void (* WIN32API RasEntry) (ULONG ulEvent, void *p, ULONG cb);
|
|---|
| 281 | } RasPluginEntryTable;
|
|---|
| 282 |
|
|---|
| 283 | /* RAS plugin functions typedefs */
|
|---|
| 284 | typedef void WIN32API FNPI (HMODULE hmod, RasEntryTable *pret, RasPluginEntryTable *ppet);
|
|---|
| 285 | typedef void WIN32API FNPE (HMODULE hmod);
|
|---|
| 286 |
|
|---|
| 287 | /* RAS breakpoint support */
|
|---|
| 288 | #include <builtin.h>
|
|---|
| 289 |
|
|---|
| 290 | #ifdef __cplusplus
|
|---|
| 291 | #define __INLINE inline
|
|---|
| 292 | #else
|
|---|
| 293 | #define __INLINE _Inline
|
|---|
| 294 | #endif
|
|---|
| 295 |
|
|---|
| 296 | // Note: no need to generate int 3 in RAS build, just log the event.
|
|---|
| 297 |
|
|---|
| 298 | #define RasDebugInt3() RasBreakPoint(__FILE__, __FUNCTION__, __LINE__, 0, 0, 0)
|
|---|
| 299 | #define RasDebugInt3_x(a, b, c) RasBreakPoint(__FILE__, __FUNCTION__, __LINE__, a, b, c)
|
|---|
| 300 |
|
|---|
| 301 | void __INLINE RasBreakPoint (char *szFile, char *szFunction, int iLine, ULONG msg, ULONG parm1, ULONG parm2)
|
|---|
| 302 | {
|
|---|
| 303 | RasLog ("BreakPoint at %s(%d)::%s", szFile, iLine, szFunction);
|
|---|
| 304 | if (msg)
|
|---|
| 305 | {
|
|---|
| 306 | RasLogMsg (msg, parm1, parm2);
|
|---|
| 307 | }
|
|---|
| 308 | }
|
|---|
| 309 |
|
|---|
| 310 | /* Replace old DebugInt3 with RAS version */
|
|---|
| 311 | #ifdef DebugInt3
|
|---|
| 312 | #undef DebugInt3
|
|---|
| 313 | #endif
|
|---|
| 314 |
|
|---|
| 315 | #define DebugInt3 RasDebugInt3
|
|---|
| 316 |
|
|---|
| 317 | #else
|
|---|
| 318 |
|
|---|
| 319 | // non RAS version, that does nothing
|
|---|
| 320 | #define RasRegisterObjectTracking(a, b, c, d, e, f)
|
|---|
| 321 | #define RasDeregisterObjectTracking(a)
|
|---|
| 322 | #define RasAddObject(a, b, c, d)
|
|---|
| 323 | #define RasRemoveObject(a, b)
|
|---|
| 324 | #define RasSetObjectUserData(a, b, c, d, e)
|
|---|
| 325 | #define RasQueryObjectUserData(a, b, c, d, e)
|
|---|
| 326 | #define RasInitialize()
|
|---|
| 327 | #define RasUninitialize()
|
|---|
| 328 | #define RasLogObjects(a, b)
|
|---|
| 329 | #define RasEntry (a, b, c)
|
|---|
| 330 | #define RasTrackMemAlloc(a, b)
|
|---|
| 331 | #define RasTrackMemRealloc(a, b, c)
|
|---|
| 332 | #define RasTrackMemFree(a, b)
|
|---|
| 333 |
|
|---|
| 334 |
|
|---|
| 335 | #endif /* RAS */
|
|---|
| 336 |
|
|---|
| 337 | #endif /* __RAS__H */
|
|---|