X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/f4a8c29f7a3ffa7eb60d9b7f055565eb2df368d9..7aa88ac4af764fa92c781056bc23103cadea21a4:/src/common/memory.cpp diff --git a/src/common/memory.cpp b/src/common/memory.cpp index a3dbce7516..8f9b0d0ac3 100644 --- a/src/common/memory.cpp +++ b/src/common/memory.cpp @@ -24,7 +24,7 @@ #include "wx/defs.h" #endif -#if (WXDEBUG && USE_MEMORY_TRACING) || USE_DEBUG_CONTEXT +#if (defined(__WXDEBUG__) && wxUSE_MEMORY_TRACING) || wxUSE_DEBUG_CONTEXT #ifdef __GNUG__ // #pragma implementation @@ -35,14 +35,19 @@ #include "wx/app.h" #endif +#include #include -#if USE_IOSTREAMH +#if wxUSE_IOSTREAMH #include +#include #else #include +#include +# ifdef _MSC_VER + using namespace std; +# endif #endif -#include #if !defined(__WATCOMC__) && !defined(__VMS__) #include @@ -66,11 +71,9 @@ #include "wx/memory.h" -/* #ifdef new #undef new #endif -*/ // wxDebugContext wxTheDebugContext; /* @@ -110,7 +113,7 @@ */ void wxMemStruct::ErrorMsg (const char * mesg) { - wxTrace("wxWindows memory checking error: %s\n", mesg); + wxLogDebug("wxWindows memory checking error: %s", mesg); PrintNode (); // << m_fileName << ' ' << m_lineNum << endl; @@ -121,7 +124,7 @@ void wxMemStruct::ErrorMsg (const char * mesg) */ void wxMemStruct::ErrorMsg () { - wxTrace("wxWindows over/underwrite memory error: \n"); + wxLogDebug("wxWindows over/underwrite memory error:"); PrintNode (); // cerr << m_fileName << ' ' << m_lineNum << endl; @@ -327,22 +330,36 @@ void wxMemStruct::PrintNode () wxObject *obj = (wxObject *)m_actualData; wxClassInfo *info = obj->GetClassInfo(); + // Let's put this in standard form so IDEs can load the file at the appropriate + // line + wxString msg(""); + + if (m_fileName) + msg.Printf("%s(%d): ", m_fileName, (int)m_lineNum); + if (info && info->GetClassName()) - wxTrace("%s", info->GetClassName()); + msg += info->GetClassName(); else - wxTrace("Object"); + msg += "object"; - if (m_fileName) - wxTrace(" (%s %d)", m_fileName, (int)m_lineNum); + wxString msg2; + msg2.Printf(" at $%lX, size %d", (long)GetActualData(), (int)RequestSize()); + msg += msg2; - wxTrace(" at $%lX, size %d\n", (long)GetActualData(), (int)RequestSize()); + wxLogDebug(msg); } else { - wxTrace("Non-object data"); + wxString msg(""); + if (m_fileName) - wxTrace(" (%s %d)", m_fileName, (int)m_lineNum); - wxTrace(" at $%lX, size %d\n", (long)GetActualData(), (int)RequestSize()); + msg.Printf("%s(%d): ", m_fileName, (int)m_lineNum); + msg += ("non-object data"); + wxString msg2; + msg2.Printf(" at $%lX, size %d\n", (long)GetActualData(), (int)RequestSize()); + msg += msg2; + + wxLogDebug(msg); } } @@ -353,24 +370,40 @@ void wxMemStruct::Dump () if (m_isObject) { wxObject *obj = (wxObject *)m_actualData; -// wxClassInfo *info = obj->GetClassInfo(); + wxString msg(""); if (m_fileName) - wxTrace("Item (%s %d)", m_fileName, (int)m_lineNum); - else - wxTrace("Item"); + msg.Printf("%s(%d): ", m_fileName, (int)m_lineNum); - wxTrace(" at $%lX, size %d: ", (long)GetActualData(), (int)RequestSize()); -// wxTrace(info->GetClassName()); + + /* TODO: We no longer have a stream (using wxLogDebug) so we can't dump it. + * Instead, do what wxObject::Dump does. + * What should we do long-term, eliminate Dumping? Or specify + * that MyClass::Dump should use wxLogDebug? Ugh. obj->Dump(wxDebugContext::GetStream()); - wxTrace("\n"); + */ + + if (obj->GetClassInfo() && obj->GetClassInfo()->GetClassName()) + msg += obj->GetClassInfo()->GetClassName(); + else + msg += "unknown object class"; + + wxString msg2(""); + msg2.Printf(" at $%lX, size %d", (long)GetActualData(), (int)RequestSize()); + msg += msg2; + + wxLogDebug(msg); } else { - wxTrace("Non-object data"); + wxString msg(""); if (m_fileName) - wxTrace(" (%s %d)", m_fileName, (int)m_lineNum); - wxTrace(" at $%lX, size %d\n", (long)GetActualData(), (int)RequestSize()); + msg.Printf("%s(%d): ", m_fileName, (int)m_lineNum); + + wxString msg2(""); + msg2.Printf("non-object data at $%lX, size %d", (long)GetActualData(), (int)RequestSize() ); + msg += msg2; + wxLogDebug(msg); } } @@ -388,7 +421,7 @@ int wxMemStruct::ValidateNode () else { // Can't use the error routines as we have no recognisable object. #ifndef __WXGTK__ - wxTrace("Can't verify memory struct - all bets are off!\n"); + wxLogDebug("Can't verify memory struct - all bets are off!"); #endif } return 0; @@ -460,15 +493,6 @@ wxDebugContext::~wxDebugContext(void) void wxDebugContext::SetStream(ostream *str, streambuf *buf) { -/* - if (str) - { - char buff[128]; - sprintf(buff, "SetStream (1): str is %ld", (long) str); - MessageBox(NULL, buff, "Memory", MB_OK); - } -*/ - if (m_debugStream) { m_debugStream->flush(); @@ -501,11 +525,6 @@ bool wxDebugContext::SetFile(const wxString& file) } else { -/* - char buf[40]; - sprintf(buf, "SetFile: str is %ld", (long) str); - MessageBox(NULL, buf, "Memory", MB_OK); -*/ SetStream(str); return TRUE; } @@ -612,7 +631,8 @@ void wxDebugContext::TraverseList (PmSFV func, wxMemStruct *from) for (wxMemStruct * st = from; st != 0; st = st->m_next) { void* data = st->GetActualData(); - if ((data != (void*)m_debugStream) && (data != (void*) m_streamBuf)) +// if ((data != (void*)m_debugStream) && (data != (void*) m_streamBuf)) + if (data != (void*) wxLog::GetActiveTarget()) { (st->*func) (); } @@ -625,9 +645,9 @@ void wxDebugContext::TraverseList (PmSFV func, wxMemStruct *from) */ bool wxDebugContext::PrintList (void) { -#if WXDEBUG - if (!HasStream()) - return FALSE; +#ifdef __WXDEBUG__ +// if (!HasStream()) +// return FALSE; TraverseList ((PmSFV)&wxMemStruct::PrintNode, (checkPoint ? checkPoint->m_next : (wxMemStruct*)NULL)); @@ -639,9 +659,9 @@ bool wxDebugContext::PrintList (void) bool wxDebugContext::Dump(void) { -#if WXDEBUG - if (!HasStream()) - return FALSE; +#ifdef __WXDEBUG__ +// if (!HasStream()) +// return FALSE; if (TRUE) { @@ -651,10 +671,17 @@ bool wxDebugContext::Dump(void) { appNameStr = wxTheApp->GetAppName(); appName = (char*) (const char*) appNameStr; - wxTrace("Memory dump of %s at %s:\n", appName, WXSTRINGCAST wxNow() ); + wxLogDebug("----- Memory dump of %s at %s -----", appName, WXSTRINGCAST wxNow() ); + } + else + { + wxLogDebug( "----- Memory dump -----" ); } } TraverseList ((PmSFV)&wxMemStruct::Dump, (checkPoint ? checkPoint->m_next : (wxMemStruct*)NULL)); + + wxLogDebug( "" ); + wxLogDebug( "" ); return TRUE; #else @@ -689,10 +716,26 @@ static wxDebugStatsStruct *InsertStatsStruct(wxDebugStatsStruct *head, wxDebugSt bool wxDebugContext::PrintStatistics(bool detailed) { -#if WXDEBUG - if (!HasStream()) - return FALSE; +#ifdef __WXDEBUG__ +// if (!HasStream()) +// return FALSE; + if (TRUE) + { + char* appName = "application"; + wxString appNameStr(""); + if (wxTheApp) + { + appNameStr = wxTheApp->GetAppName(); + appName = (char*) (const char*) appNameStr; + wxLogDebug("----- Memory statistics of %s at %s -----", appName, WXSTRINGCAST wxNow() ); + } + else + { + wxLogDebug( "----- Memory statistics -----" ); + } + } + bool currentMode = GetDebugMode(); SetDebugMode(FALSE); @@ -710,7 +753,8 @@ bool wxDebugContext::PrintStatistics(bool detailed) for (st = from; st != 0; st = st->m_next) { void* data = st->GetActualData(); - if (detailed && (data != (void*)m_debugStream) && (data != (void*) m_streamBuf)) +// if (detailed && (data != (void*)m_debugStream) && (data != (void*) m_streamBuf)) + if (detailed && (data != (void*) wxLog::GetActiveTarget())) { char *className = "nonobject"; if (st->m_isObject && st->GetActualData()) @@ -732,7 +776,8 @@ bool wxDebugContext::PrintStatistics(bool detailed) stats->totalSize += st->RequestSize(); } - if ((data != (void*)m_debugStream) && (data != (void*) m_streamBuf)) +// if ((data != (void*)m_debugStream) && (data != (void*) m_streamBuf)) + if (data != (void*) wxLog::GetActiveTarget()) { totalSize += st->RequestSize(); if (st->m_isObject) @@ -746,20 +791,22 @@ bool wxDebugContext::PrintStatistics(bool detailed) { while (list) { - wxTrace("%ld objects of class %s, total size %ld\n", + wxLogDebug("%ld objects of class %s, total size %ld", list->instanceCount, list->instanceClass, list->totalSize); wxDebugStatsStruct *old = list; list = old->next; free((char *)old); } - wxTrace("\n"); + wxLogDebug(""); } SetDebugMode(currentMode); - wxTrace("Number of object items: %ld\n", noObjectNodes); - wxTrace("Number of non-object items: %ld\n", noNonObjectNodes); - wxTrace("Total allocated size: %ld\n", totalSize); + wxLogDebug("Number of object items: %ld", noObjectNodes); + wxLogDebug("Number of non-object items: %ld", noNonObjectNodes); + wxLogDebug("Total allocated size: %ld", totalSize); + wxLogDebug(""); + wxLogDebug(""); return TRUE; #else @@ -769,8 +816,8 @@ bool wxDebugContext::PrintStatistics(bool detailed) bool wxDebugContext::PrintClasses(void) { - if (!HasStream()) - return FALSE; +// if (!HasStream()) +// return FALSE; if (TRUE) { @@ -780,7 +827,7 @@ bool wxDebugContext::PrintClasses(void) { appNameStr = wxTheApp->GetAppName(); appName = (char*) (const char*) appNameStr; - wxTrace("Classes in %s:\n\n", appName); + wxLogDebug("----- Classes in %s -----", appName); } } @@ -788,28 +835,40 @@ bool wxDebugContext::PrintClasses(void) wxNode *node; wxClassInfo *info; - wxClassInfo::classTable.BeginFind(); - node = wxClassInfo::classTable.Next(); + wxClassInfo::sm_classTable->BeginFind(); + node = wxClassInfo::sm_classTable->Next(); while (node) { info = (wxClassInfo *)node->Data(); if (info->GetClassName()) { - wxTrace("%s ", info->GetClassName()); - - if (info->GetBaseClassName1() && !info->GetBaseClassName2()) - wxTrace("is a %s", info->GetBaseClassName1()); - else if (info->GetBaseClassName1() && info->GetBaseClassName2()) - wxTrace("is a %s, %s", info->GetBaseClassName1(), info->GetBaseClassName2()); - if (info->objectConstructor) - wxTrace(": dynamic\n"); - else - wxTrace("\n"); + wxString msg(info->GetClassName()); + msg += " "; + + if (info->GetBaseClassName1() && !info->GetBaseClassName2()) + { + msg += "is a "; + msg += info->GetBaseClassName1(); + } + else if (info->GetBaseClassName1() && info->GetBaseClassName2()) + { + msg += "is a "; + msg += info->GetBaseClassName1() ; + msg += ", "; + msg += info->GetBaseClassName2() ; + } + if (info->GetConstructor()) + msg += ": dynamic"; + + wxLogDebug(msg); } - node = node->Next(); + node = wxClassInfo::sm_classTable->Next(); n ++; } - wxTrace("\nThere are %d classes derived from wxObject.\n", n); + wxLogDebug(""); + wxLogDebug("There are %d classes derived from wxObject.", n); + wxLogDebug(""); + wxLogDebug(""); return TRUE; } @@ -852,7 +911,8 @@ int wxDebugContext::CountObjectsLeft(void) for (wxMemStruct * st = from; st != 0; st = st->m_next) { void* data = st->GetActualData(); - if ((data != (void*)m_debugStream) && (data != (void*) m_streamBuf)) +// if ((data != (void*)m_debugStream) && (data != (void*) m_streamBuf)) + if (data != (void*) wxLog::GetActiveTarget()) n ++; } @@ -867,7 +927,7 @@ int wxDebugContext::CountObjectsLeft(void) // We'll only do malloc and free for the moment: leave the interesting // stuff for the wxObject versions. -#if WXDEBUG && USE_GLOBAL_MEMORY_OPERATORS +#if defined(__WXDEBUG__) && wxUSE_GLOBAL_MEMORY_OPERATORS #ifdef new #undef new @@ -891,7 +951,26 @@ void * operator new (size_t size, char * fileName, int lineNum) #endif } -#if !( defined (_MSC_VER) && (_MSC_VER <= 1000) ) +// Added JACS 25/11/98 +void * operator new (size_t size) +{ +#ifdef NO_DEBUG_ALLOCATION + return malloc(size); +#else + return wxDebugAlloc(size, NULL, 0, FALSE); +#endif +} + +void * operator new[] (size_t size) +{ +#ifdef NO_DEBUG_ALLOCATION + return malloc(size); +#else + return wxDebugAlloc(size, NULL, 0, FALSE, TRUE); +#endif +} + +#if !( defined (_MSC_VER) && (_MSC_VER <= 1020) ) void * operator new[] (size_t size, char * fileName, int lineNum) { #ifdef NO_DEBUG_ALLOCATION @@ -911,7 +990,23 @@ void operator delete (void * buf) #endif } -#if !( defined (_MSC_VER) && (_MSC_VER <= 1000) ) +// VC++ 6.0 +#if _MSC_VER >= 1200 +void operator delete(void* pData, char* /* fileName */, int /* lineNum */) +{ +// ::operator delete(pData); + // JACS 21/11/1998: surely we need to call wxDebugFree? + wxDebugFree(pData, FALSE); +} +// New operator 21/11/1998 +void operator delete[](void* pData, char* /* fileName */, int /* lineNum */) +{ + wxDebugFree(pData, TRUE); +} +#endif + +#if !( defined (_MSC_VER) && (_MSC_VER <= 1020) ) + void operator delete[] (void * buf) { #ifdef NO_DEBUG_ALLOCATION @@ -937,7 +1032,7 @@ void * wxDebugAlloc(size_t size, char * fileName, int lineNum, bool isObject, bo char * buf = (char *) malloc(wxDebugContext::TotSize (size)); if (!buf) { - wxTrace("Call to malloc (%ld) failed.\n", (long)size); + wxLogDebug("Call to malloc (%ld) failed.", (long)size); return 0; } wxMemStruct * st = (wxMemStruct *)buf; @@ -1081,7 +1176,7 @@ void wxTraceLevel(int level, const char *fmt ...) #endif } -#else // USE_MEMORY_TRACING && WXDEBUG +#else // wxUSE_MEMORY_TRACING && defined(__WXDEBUG__) void wxTrace(const char *WXUNUSED(fmt) ...) { }