1 /////////////////////////////////////////////////////////////////////////////
3 // Purpose: Memory operations
4 // Author: Arthur Seaton, Julian Smart
8 // Copyright: (c) 1998 Julian Smart
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
16 #include "wx/string.h"
17 #include "wx/msgout.h"
20 The macro which will be expanded to include the file and line number
21 info, or to be a straight call to the new operator.
24 #if (defined(__WXDEBUG__) && wxUSE_MEMORY_TRACING) || wxUSE_DEBUG_CONTEXT
30 WXDLLIMPEXP_BASE
void * wxDebugAlloc(size_t size
, wxChar
* fileName
, int lineNum
, bool isObject
, bool isVect
= false);
31 WXDLLIMPEXP_BASE
void wxDebugFree(void * buf
, bool isVect
= false);
33 //**********************************************************************************
35 The global operator new used for everything apart from getting
36 dynamic storage within this function itself.
39 // We'll only do malloc and free for the moment: leave the interesting
40 // stuff for the wxObject versions.
43 #if wxUSE_GLOBAL_MEMORY_OPERATORS
45 // Undefine temporarily (new is #defined in object.h) because we want to
46 // declare some new operators.
51 #if defined(__SUNCC__)
52 #define wxUSE_ARRAY_MEMORY_OPERATORS 0
53 #elif !( defined (__VISUALC__) && (__VISUALC__ <= 1020) ) || defined( __MWERKS__)
54 #define wxUSE_ARRAY_MEMORY_OPERATORS 1
55 #elif defined (__SGI_CC_)
56 // only supported by -n32 compilers
57 #ifndef __EDG_ABI_COMPATIBILITY_VERSION
58 #define wxUSE_ARRAY_MEMORY_OPERATORS 0
60 #elif !( defined (__VISUALC__) && (__VISUALC__ <= 1020) ) || defined( __MWERKS__)
61 #define wxUSE_ARRAY_MEMORY_OPERATORS 1
63 // ::operator new[] is a recent C++ feature, so assume it's not supported
64 #define wxUSE_ARRAY_MEMORY_OPERATORS 0
67 // devik 2000-8-29: All new/delete ops are now inline because they can't
68 // be marked as dllexport/dllimport. It then leads to weird bugs when
70 #if defined(__WXMSW__) && (defined(WXUSINGDLL) || defined(WXMAKINGDLL_BASE))
71 inline void * operator new (size_t size
, wxChar
* fileName
, int lineNum
)
73 return wxDebugAlloc(size
, fileName
, lineNum
, false, false);
76 inline void * operator new (size_t size
)
78 return wxDebugAlloc(size
, NULL
, 0, false);
81 inline void operator delete (void * buf
)
83 wxDebugFree(buf
, false);
86 #if wxUSE_ARRAY_MEMORY_OPERATORS
87 inline void * operator new[] (size_t size
)
89 return wxDebugAlloc(size
, NULL
, 0, false, true);
92 inline void * operator new[] (size_t size
, wxChar
* fileName
, int lineNum
)
94 return wxDebugAlloc(size
, fileName
, lineNum
, false, true);
97 inline void operator delete[] (void * buf
)
99 wxDebugFree(buf
, true);
101 #endif // wxUSE_ARRAY_MEMORY_OPERATORS
105 void * operator new (size_t size
, wxChar
* fileName
, int lineNum
);
107 void * operator new (size_t size
);
109 void operator delete (void * buf
);
111 #if wxUSE_ARRAY_MEMORY_OPERATORS
112 void * operator new[] (size_t size
);
114 void * operator new[] (size_t size
, wxChar
* fileName
, int lineNum
);
116 void operator delete[] (void * buf
);
117 #endif // wxUSE_ARRAY_MEMORY_OPERATORS
118 #endif // defined(__WXMSW__) && (defined(WXUSINGDLL) || defined(WXMAKINGDLL_BASE))
120 // VC++ 6.0 and MWERKS
121 #if ( defined(__VISUALC__) && (__VISUALC__ >= 1200) ) || defined(__MWERKS__)
122 inline void operator delete(void* pData
, wxChar
* /* fileName */, int /* lineNum */)
124 wxDebugFree(pData
, false);
126 inline void operator delete[](void* pData
, wxChar
* /* fileName */, int /* lineNum */)
128 wxDebugFree(pData
, true);
130 #endif // __VISUALC__>=1200
131 #endif // wxUSE_GLOBAL_MEMORY_OPERATORS
132 #endif // __WXDEBUG__
134 //**********************************************************************************
136 typedef unsigned int wxMarkerType
;
139 Define the struct which will be placed at the start of all dynamically
143 class WXDLLIMPEXP_BASE wxMemStruct
{
145 friend class WXDLLIMPEXP_FWD_BASE wxDebugContext
; // access to the m_next pointer for list traversal.
151 size_t RequestSize () { return m_reqSize
; }
152 wxMarkerType
Marker () { return m_firstMarker
; }
154 // When an object is deleted we set the id slot to a specific value.
155 inline void SetDeleted ();
156 inline int IsDeleted ();
161 // Used to determine if the object is really a wxMemStruct.
162 // Not a foolproof test by any means, but better than none I hope!
165 // Do all validation on a node.
168 // Check the integrity of a node and of the list, node by node.
170 int CheckAllPrevious ();
172 // Print a single node.
175 // Called when the memory linking functions get an error.
176 void ErrorMsg (const char *);
179 inline void *GetActualData(void) const { return m_actualData
; }
184 // Check for underwriting. There are 2 of these checks. This one
185 // inside the struct and another right after the struct.
186 wxMarkerType m_firstMarker
;
188 // File name and line number are from cpp.
192 // The amount of memory requested by the caller.
195 // Used to try to verify that we really are dealing with an object
196 // of the required class. Can be 1 of 2 values these indicating a valid
197 // wxMemStruct object, or a deleted wxMemStruct object.
200 wxMemStruct
* m_prev
;
201 wxMemStruct
* m_next
;
208 typedef void (wxMemStruct::*PmSFV
) ();
210 // Type of the app function that can be installed and called at wxWidgets shutdown
211 // (after all other registered files with global destructors have been closed down).
212 typedef void (*wxShutdownNotifyFunction
)();
215 Debugging class. This will only have a single instance, but it's
216 a reasonable way to keep everything together and to make this
217 available for change if needed by someone else.
218 A lot of this stuff would be better off within the wxMemStruct class, but
219 it's stuff which we need to access at times when there is no wxMemStruct
220 object so we use this class instead. Think of it as a collection of
221 globals which have to do with the wxMemStruct class.
224 class WXDLLIMPEXP_BASE wxDebugContext
{
227 // Used to set alignment for markers.
228 static size_t CalcAlignment ();
230 // Returns the amount of padding needed after something of the given
231 // size. This is so that when we cast pointers backwards and forwards
232 // the pointer value will be valid for a wxMarkerType.
233 static size_t GetPadding (const size_t size
) ;
235 // Traverse the list.
236 static void TraverseList (PmSFV
, wxMemStruct
*from
= NULL
);
238 static int debugLevel
;
241 static int m_balign
; // byte alignment
242 static int m_balignmask
; // mask for performing byte alignment
244 // Set a checkpoint to dump only the memory from
246 static wxMemStruct
*checkPoint
;
248 wxDebugContext(void);
249 ~wxDebugContext(void);
251 static int GetLevel(void) { return debugLevel
; }
252 static void SetLevel(int level
) { debugLevel
= level
; }
254 static bool GetDebugMode(void) { return debugOn
; }
255 static void SetDebugMode(bool flag
) { debugOn
= flag
; }
257 static void SetCheckpoint(bool all
= false);
258 static wxMemStruct
*GetCheckpoint(void) { return checkPoint
; }
260 // Calculated from the request size and any padding needed
261 // before the final marker.
262 static size_t PaddedSize (const size_t reqSize
);
264 // Calc the total amount of space we need from the system
265 // to satisfy a caller request. This includes all padding.
266 static size_t TotSize (const size_t reqSize
);
268 // Return valid pointers to offsets within the allocated memory.
269 static char * StructPos (const char * buf
);
270 static char * MidMarkerPos (const char * buf
);
271 static char * CallerMemPos (const char * buf
);
272 static char * EndMarkerPos (const char * buf
, const size_t size
);
274 // Given a pointer to the start of the caller requested area
275 // return a pointer to the start of the entire alloc\'d buffer.
276 static char * StartPos (const char * caller
);
278 // Access to the list.
279 static wxMemStruct
* GetHead () { return m_head
; }
280 static wxMemStruct
* GetTail () { return m_tail
; }
282 // Set the list sentinals.
283 static wxMemStruct
* SetHead (wxMemStruct
* st
) { return (m_head
= st
); }
284 static wxMemStruct
* SetTail (wxMemStruct
* st
) { return (m_tail
= st
); }
286 // If this is set then every new operation checks the validity
287 // of the all previous nodes in the list.
288 static bool GetCheckPrevious () { return m_checkPrevious
; }
289 static void SetCheckPrevious (bool value
) { m_checkPrevious
= value
; }
291 // Checks all nodes, or all nodes if checkAll is true
292 static int Check(bool checkAll
= false);
294 // Print out the list of wxMemStruct nodes.
295 static bool PrintList(void);
298 static bool Dump(void);
301 static bool PrintStatistics(bool detailed
= true);
303 // Print out the classes in the application.
304 static bool PrintClasses(void);
306 // Count the number of non-wxDebugContext-related objects
307 // that are outstanding
308 static int CountObjectsLeft(bool sinceCheckpoint
= false);
310 // This function is used to output the dump
311 static void OutputDumpLine(const wxChar
*szFormat
, ...);
313 static void SetShutdownNotifyFunction(wxShutdownNotifyFunction shutdownFn
);
316 // Store these here to allow access to the list without
317 // needing to have a wxMemStruct object.
318 static wxMemStruct
* m_head
;
319 static wxMemStruct
* m_tail
;
321 // Set to false if we're not checking all previous nodes when
322 // we do a new. Set to true when we are.
323 static bool m_checkPrevious
;
325 // Holds a pointer to an optional application function to call at shutdown.
326 static wxShutdownNotifyFunction sm_shutdownFn
;
328 // Have to access our shutdown hook
329 friend class wxDebugContextDumpDelayCounter
;
332 // Final cleanup (e.g. deleting the log object and doing memory leak checking)
333 // will be delayed until all wxDebugContextDumpDelayCounter objects have been
334 // destructed. Adding one wxDebugContextDumpDelayCounter per file will delay
335 // memory leak checking until after destructing all global objects.
337 class WXDLLIMPEXP_BASE wxDebugContextDumpDelayCounter
340 wxDebugContextDumpDelayCounter();
341 ~wxDebugContextDumpDelayCounter();
348 // make leak dump after all globals have been destructed
349 static wxDebugContextDumpDelayCounter wxDebugContextDumpDelayCounter_File
;
350 #define WXDEBUG_DUMPDELAYCOUNTER \
351 static wxDebugContextDumpDelayCounter wxDebugContextDumpDelayCounter_Extra;
353 // Output a debug message, in a system dependent fashion.
354 void WXDLLIMPEXP_BASE
wxTrace(const wxChar
*fmt
...) ATTRIBUTE_PRINTF_1
;
355 void WXDLLIMPEXP_BASE
wxTraceLevel(int level
, const wxChar
*fmt
...) ATTRIBUTE_PRINTF_2
;
357 #define WXTRACE wxTrace
358 #define WXTRACELEVEL wxTraceLevel
360 #else // (defined(__WXDEBUG__) && wxUSE_MEMORY_TRACING) || wxUSE_DEBUG_CONTEXT
362 #define WXDEBUG_DUMPDELAYCOUNTER
364 // Borland C++ Builder 6 seems to have troubles with inline functions (see bug
367 inline void wxTrace(const wxChar
*WXUNUSED(fmt
)) {}
368 inline void wxTraceLevel(int WXUNUSED(level
), const wxChar
*WXUNUSED(fmt
)) {}
371 #define wxTraceLevel(l, fmt)
374 #define WXTRACE true ? (void)0 : wxTrace
375 #define WXTRACELEVEL true ? (void)0 : wxTraceLevel
377 #endif // (defined(__WXDEBUG__) && wxUSE_MEMORY_TRACING) || wxUSE_DEBUG_CONTEXT