src/common/log.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        log.cpp
   3 // Purpose:     Assorted wxLogXXX functions, and wxLog (sink for logs)
   4 // Author:      Vadim Zeitlin
   5 // Modified by:
   6 // Created:     29/01/98
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) 1998 Vadim Zeitlin <zeitlin@dptmaths.ens-cachan.fr>
   9 // Licence:     wxWindows licence
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 // ============================================================================
  13 // declarations
  14 // ============================================================================
  15
  16 // ----------------------------------------------------------------------------
  17 // headers
  18 // ----------------------------------------------------------------------------
  19
  20 #if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
  21     #pragma implementation "log.h"
  22 #endif
  23
  24 // For compilers that support precompilation, includes "wx.h".
  25 #include "wx/wxprec.h"
  26
  27 #ifdef __BORLANDC__
  28     #pragma hdrstop
  29 #endif
  30
  31 #if wxUSE_LOG
  32
  33 // wxWidgets
  34 #ifndef WX_PRECOMP
  35     #include "wx/app.h"
  36     #include "wx/arrstr.h"
  37     #include "wx/intl.h"
  38     #include "wx/string.h"
  39 #endif //WX_PRECOMP
  40
  41 #include "wx/apptrait.h"
  42 #include "wx/file.h"
  43 #include "wx/log.h"
  44 #include "wx/msgout.h"
  45 #include "wx/textfile.h"
  46 #include "wx/thread.h"
  47 #include "wx/utils.h"
  48 #include "wx/wxchar.h"
  49
  50 // other standard headers
  51 #ifndef __WXWINCE__
  52 #include <errno.h>
  53 #endif
  54
  55 #include <stdlib.h>
  56
  57 #ifndef __WXWINCE__
  58 #include <time.h>
  59 #else
  60 #include "wx/msw/wince/time.h"
  61 #endif
  62
  63 #if defined(__WINDOWS__)
  64     #include "wx/msw/private.h" // includes windows.h
  65 #endif
  66
  67 // ----------------------------------------------------------------------------
  68 // non member functions
  69 // ----------------------------------------------------------------------------
  70
  71 // define this to enable wrapping of log messages
  72 //#define LOG_PRETTY_WRAP
  73
  74 #ifdef  LOG_PRETTY_WRAP
  75   static void wxLogWrap(FILE *f, const char *pszPrefix, const char *psz);
  76 #endif
  77
  78 // ============================================================================
  79 // implementation
  80 // ============================================================================
  81
  82 // ----------------------------------------------------------------------------
  83 // globals
  84 // ----------------------------------------------------------------------------
  85
  86 // log functions can't allocate memory (LogError("out of memory...") should
  87 // work!), so we use a static buffer for all log messages
  88 #define LOG_BUFFER_SIZE   (4096)
  89
  90 // static buffer for error messages
  91 static wxChar   s_szBufStatic[LOG_BUFFER_SIZE];
  92
  93 static wxChar  *s_szBuf     = s_szBufStatic;
  94 static size_t   s_szBufSize = WXSIZEOF( s_szBufStatic );
  95
  96 #if wxUSE_THREADS
  97
  98 // the critical section protecting the static buffer
  99 static wxCriticalSection gs_csLogBuf;
 100
 101 #endif // wxUSE_THREADS
 102
 103 // return true if we have a non NULL non disabled log target
 104 static inline bool IsLoggingEnabled()
 105 {
 106     return wxLog::IsEnabled() && (wxLog::GetActiveTarget() != NULL);
 107 }
 108
 109 // ----------------------------------------------------------------------------
 110 // implementation of Log functions
 111 //
 112 // NB: unfortunately we need all these distinct functions, we can't make them
 113 //     macros and not all compilers inline vararg functions.
 114 // ----------------------------------------------------------------------------
 115
 116 // wrapper for wxVsnprintf(s_szBuf) which always NULL-terminates it
 117 static inline void PrintfInLogBug(const wxChar *szFormat, va_list argptr)
 118 {
 119     if ( wxVsnprintf(s_szBuf, s_szBufSize, szFormat, argptr) < 0 )
 120     {
 121         // must NUL-terminate it manually
 122         s_szBuf[s_szBufSize - 1] = _T('\0');
 123     }
 124     //else: NUL-terminated by vsnprintf()
 125 }
 126
 127 // generic log function
 128 void wxVLogGeneric(wxLogLevel level, const wxChar *szFormat, va_list argptr)
 129 {
 130     if ( IsLoggingEnabled() ) {
 131         wxCRIT_SECT_LOCKER(locker, gs_csLogBuf);
 132
 133         PrintfInLogBug(szFormat, argptr);
 134
 135         wxLog::OnLog(level, s_szBuf, time(NULL));
 136     }
 137 }
 138
 139 void wxLogGeneric(wxLogLevel level, const wxChar *szFormat, ...)
 140 {
 141     va_list argptr;
 142     va_start(argptr, szFormat);
 143     wxVLogGeneric(level, szFormat, argptr);
 144     va_end(argptr);
 145 }
 146
 147 #define IMPLEMENT_LOG_FUNCTION(level)                               \
 148   void wxVLog##level(const wxChar *szFormat, va_list argptr)        \
 149   {                                                                 \
 150     if ( IsLoggingEnabled() ) {                                     \
 151       wxCRIT_SECT_LOCKER(locker, gs_csLogBuf);                      \
 152                                                                     \
 153       PrintfInLogBug(szFormat, argptr);                             \
 154                                                                     \
 155       wxLog::OnLog(wxLOG_##level, s_szBuf, time(NULL));             \
 156     }                                                               \
 157   }                                                                 \
 158                                                                     \
 159   void wxLog##level(const wxChar *szFormat, ...)                    \
 160   {                                                                 \
 161     va_list argptr;                                                 \
 162     va_start(argptr, szFormat);                                     \
 163     wxVLog##level(szFormat, argptr);                                \
 164     va_end(argptr);                                                 \
 165   }
 166
 167 IMPLEMENT_LOG_FUNCTION(Error)
 168 IMPLEMENT_LOG_FUNCTION(Warning)
 169 IMPLEMENT_LOG_FUNCTION(Message)
 170 IMPLEMENT_LOG_FUNCTION(Info)
 171 IMPLEMENT_LOG_FUNCTION(Status)
 172
 173 void wxSafeShowMessage(const wxString& title, const wxString& text)
 174 {
 175 #ifdef __WINDOWS__
 176     ::MessageBox(NULL, text, title, MB_OK | MB_ICONSTOP);
 177 #else
 178     wxFprintf(stderr, _T("%s: %s\n"), title.c_str(), text.c_str());
 179 #endif
 180 }
 181
 182 // fatal errors can't be suppressed nor handled by the custom log target and
 183 // always terminate the program
 184 void wxVLogFatalError(const wxChar *szFormat, va_list argptr)
 185 {
 186     wxVsnprintf(s_szBuf, s_szBufSize, szFormat, argptr);
 187
 188     wxSafeShowMessage(_T("Fatal Error"), s_szBuf);
 189
 190 #ifdef __WXWINCE__
 191     ExitThread(3);
 192 #else
 193     abort();
 194 #endif
 195 }
 196
 197 void wxLogFatalError(const wxChar *szFormat, ...)
 198 {
 199     va_list argptr;
 200     va_start(argptr, szFormat);
 201     wxVLogFatalError(szFormat, argptr);
 202
 203     // some compilers warn about unreachable code and it shouldn't matter
 204     // for the others anyhow...
 205     //va_end(argptr);
 206 }
 207
 208 // same as info, but only if 'verbose' mode is on
 209 void wxVLogVerbose(const wxChar *szFormat, va_list argptr)
 210 {
 211     if ( IsLoggingEnabled() ) {
 212         if ( wxLog::GetActiveTarget() != NULL && wxLog::GetVerbose() ) {
 213             wxCRIT_SECT_LOCKER(locker, gs_csLogBuf);
 214
 215             wxVsnprintf(s_szBuf, s_szBufSize, szFormat, argptr);
 216
 217             wxLog::OnLog(wxLOG_Info, s_szBuf, time(NULL));
 218         }
 219     }
 220 }
 221
 222 void wxLogVerbose(const wxChar *szFormat, ...)
 223 {
 224     va_list argptr;
 225     va_start(argptr, szFormat);
 226     wxVLogVerbose(szFormat, argptr);
 227     va_end(argptr);
 228 }
 229
 230 // debug functions
 231 #ifdef __WXDEBUG__
 232 #define IMPLEMENT_LOG_DEBUG_FUNCTION(level)                         \
 233   void wxVLog##level(const wxChar *szFormat, va_list argptr)        \
 234   {                                                                 \
 235     if ( IsLoggingEnabled() ) {                                     \
 236       wxCRIT_SECT_LOCKER(locker, gs_csLogBuf);                      \
 237                                                                     \
 238       wxVsnprintf(s_szBuf, s_szBufSize, szFormat, argptr);    \
 239                                                                     \
 240       wxLog::OnLog(wxLOG_##level, s_szBuf, time(NULL));             \
 241     }                                                               \
 242   }                                                                 \
 243   void wxLog##level(const wxChar *szFormat, ...)                    \
 244   {                                                                 \
 245     va_list argptr;                                                 \
 246     va_start(argptr, szFormat);                                     \
 247     wxVLog##level(szFormat, argptr);                                \
 248     va_end(argptr);                                                 \
 249   }
 250
 251   void wxVLogTrace(const wxChar *mask, const wxChar *szFormat, va_list argptr)
 252   {
 253     if ( IsLoggingEnabled() && wxLog::IsAllowedTraceMask(mask) ) {
 254       wxCRIT_SECT_LOCKER(locker, gs_csLogBuf);
 255
 256       wxChar *p = s_szBuf;
 257       size_t len = s_szBufSize;
 258       wxStrncpy(s_szBuf, _T("("), len);
 259       len -= 1; // strlen("(")
 260       p += 1;
 261       wxStrncat(p, mask, len);
 262       size_t lenMask = wxStrlen(mask);
 263       len -= lenMask;
 264       p += lenMask;
 265
 266       wxStrncat(p, _T(") "), len);
 267       len -= 2;
 268       p += 2;
 269
 270       wxVsnprintf(p, len, szFormat, argptr);
 271
 272       wxLog::OnLog(wxLOG_Trace, s_szBuf, time(NULL));
 273     }
 274   }
 275
 276   void wxLogTrace(const wxChar *mask, const wxChar *szFormat, ...)
 277   {
 278     va_list argptr;
 279     va_start(argptr, szFormat);
 280     wxVLogTrace(mask, szFormat, argptr);
 281     va_end(argptr);
 282   }
 283
 284   void wxVLogTrace(wxTraceMask mask, const wxChar *szFormat, va_list argptr)
 285   {
 286     // we check that all of mask bits are set in the current mask, so
 287     // that wxLogTrace(wxTraceRefCount | wxTraceOle) will only do something
 288     // if both bits are set.
 289     if ( IsLoggingEnabled() && ((wxLog::GetTraceMask() & mask) == mask) ) {
 290       wxCRIT_SECT_LOCKER(locker, gs_csLogBuf);
 291
 292       wxVsnprintf(s_szBuf, s_szBufSize, szFormat, argptr);
 293
 294       wxLog::OnLog(wxLOG_Trace, s_szBuf, time(NULL));
 295     }
 296   }
 297
 298   void wxLogTrace(wxTraceMask mask, const wxChar *szFormat, ...)
 299   {
 300     va_list argptr;
 301     va_start(argptr, szFormat);
 302     wxVLogTrace(mask, szFormat, argptr);
 303     va_end(argptr);
 304   }
 305
 306 #else // release
 307   #define IMPLEMENT_LOG_DEBUG_FUNCTION(level)
 308 #endif
 309
 310 IMPLEMENT_LOG_DEBUG_FUNCTION(Debug)
 311 IMPLEMENT_LOG_DEBUG_FUNCTION(Trace)
 312
 313 // wxLogSysError: one uses the last error code, for other  you must give it
 314 // explicitly
 315
 316 // common part of both wxLogSysError
 317 void wxLogSysErrorHelper(long lErrCode)
 318 {
 319     wxChar szErrMsg[LOG_BUFFER_SIZE / 2];
 320     wxSnprintf(szErrMsg, WXSIZEOF(szErrMsg),
 321                _(" (error %ld: %s)"), lErrCode, wxSysErrorMsg(lErrCode));
 322     wxStrncat(s_szBuf, szErrMsg, s_szBufSize - wxStrlen(s_szBuf));
 323
 324     wxLog::OnLog(wxLOG_Error, s_szBuf, time(NULL));
 325 }
 326
 327 void WXDLLEXPORT wxVLogSysError(const wxChar *szFormat, va_list argptr)
 328 {
 329     if ( IsLoggingEnabled() ) {
 330         wxCRIT_SECT_LOCKER(locker, gs_csLogBuf);
 331
 332         wxVsnprintf(s_szBuf, s_szBufSize, szFormat, argptr);
 333
 334         wxLogSysErrorHelper(wxSysErrorCode());
 335     }
 336 }
 337
 338 void WXDLLEXPORT wxLogSysError(const wxChar *szFormat, ...)
 339 {
 340     va_list argptr;
 341     va_start(argptr, szFormat);
 342     wxVLogSysError(szFormat, argptr);
 343     va_end(argptr);
 344 }
 345
 346 void WXDLLEXPORT wxVLogSysError(long lErrCode, const wxChar *szFormat, va_list argptr)
 347 {
 348     if ( IsLoggingEnabled() ) {
 349         wxCRIT_SECT_LOCKER(locker, gs_csLogBuf);
 350
 351         wxVsnprintf(s_szBuf, s_szBufSize, szFormat, argptr);
 352
 353         wxLogSysErrorHelper(lErrCode);
 354     }
 355 }
 356
 357 void WXDLLEXPORT wxLogSysError(long lErrCode, const wxChar *szFormat, ...)
 358 {
 359     va_list argptr;
 360     va_start(argptr, szFormat);
 361     wxVLogSysError(lErrCode, szFormat, argptr);
 362     va_end(argptr);
 363 }
 364
 365 // ----------------------------------------------------------------------------
 366 // wxLog class implementation
 367 // ----------------------------------------------------------------------------
 368
 369 wxChar *wxLog::SetLogBuffer( wxChar *buf, size_t size)
 370 {
 371     wxChar *oldbuf = s_szBuf;
 372
 373     if( buf == 0 )
 374     {
 375         s_szBuf = s_szBufStatic;
 376         s_szBufSize = WXSIZEOF( s_szBufStatic );
 377     }
 378     else
 379     {
 380         s_szBuf = buf;
 381         s_szBufSize = size;
 382     }
 383
 384     return (oldbuf == s_szBufStatic ) ? 0 : oldbuf;
 385 }
 386
 387 wxLog *wxLog::GetActiveTarget()
 388 {
 389     if ( ms_bAutoCreate && ms_pLogger == NULL ) {
 390         // prevent infinite recursion if someone calls wxLogXXX() from
 391         // wxApp::CreateLogTarget()
 392         static bool s_bInGetActiveTarget = false;
 393         if ( !s_bInGetActiveTarget ) {
 394             s_bInGetActiveTarget = true;
 395
 396             // ask the application to create a log target for us
 397             if ( wxTheApp != NULL )
 398                 ms_pLogger = wxTheApp->GetTraits()->CreateLogTarget();
 399             else
 400                 ms_pLogger = new wxLogStderr;
 401
 402             s_bInGetActiveTarget = false;
 403
 404             // do nothing if it fails - what can we do?
 405         }
 406     }
 407
 408     return ms_pLogger;
 409 }
 410
 411 wxLog *wxLog::SetActiveTarget(wxLog *pLogger)
 412 {
 413     if ( ms_pLogger != NULL ) {
 414         // flush the old messages before changing because otherwise they might
 415         // get lost later if this target is not restored
 416         ms_pLogger->Flush();
 417     }
 418
 419     wxLog *pOldLogger = ms_pLogger;
 420     ms_pLogger = pLogger;
 421
 422     return pOldLogger;
 423 }
 424
 425 void wxLog::DontCreateOnDemand()
 426 {
 427     ms_bAutoCreate = false;
 428
 429     // this is usually called at the end of the program and we assume that it
 430     // is *always* called at the end - so we free memory here to avoid false
 431     // memory leak reports from wxWin  memory tracking code
 432     ClearTraceMasks();
 433 }
 434
 435 void wxLog::RemoveTraceMask(const wxString& str)
 436 {
 437     int index = ms_aTraceMasks.Index(str);
 438     if ( index != wxNOT_FOUND )
 439         ms_aTraceMasks.RemoveAt((size_t)index);
 440 }
 441
 442 void wxLog::ClearTraceMasks()
 443 {
 444     ms_aTraceMasks.Clear();
 445 }
 446
 447 void wxLog::TimeStamp(wxString *str)
 448 {
 449     if ( ms_timestamp )
 450     {
 451         wxChar buf[256];
 452         time_t timeNow;
 453         (void)time(&timeNow);
 454         wxStrftime(buf, WXSIZEOF(buf), ms_timestamp, localtime(&timeNow));
 455
 456         str->Empty();
 457         *str << buf << wxT(": ");
 458     }
 459 }
 460
 461 void wxLog::DoLog(wxLogLevel level, const wxChar *szString, time_t t)
 462 {
 463     switch ( level ) {
 464         case wxLOG_FatalError:
 465             DoLogString(wxString(_("Fatal error: ")) + szString, t);
 466             DoLogString(_("Program aborted."), t);
 467             Flush();
 468 #ifdef __WXWINCE__
 469             ExitThread(3);
 470 #else
 471             abort();
 472 #endif
 473             break;
 474
 475         case wxLOG_Error:
 476             DoLogString(wxString(_("Error: ")) + szString, t);
 477             break;
 478
 479         case wxLOG_Warning:
 480             DoLogString(wxString(_("Warning: ")) + szString, t);
 481             break;
 482
 483         case wxLOG_Info:
 484             if ( GetVerbose() )
 485         case wxLOG_Message:
 486         case wxLOG_Status:
 487         default:    // log unknown log levels too
 488                 DoLogString(szString, t);
 489             break;
 490
 491         case wxLOG_Trace:
 492         case wxLOG_Debug:
 493 #ifdef __WXDEBUG__
 494             {
 495                 wxString msg = level == wxLOG_Trace ? wxT("Trace: ")
 496                                                     : wxT("Debug: ");
 497                 msg << szString;
 498                 DoLogString(msg, t);
 499             }
 500 #endif // Debug
 501             break;
 502     }
 503 }
 504
 505 void wxLog::DoLogString(const wxChar *WXUNUSED(szString), time_t WXUNUSED(t))
 506 {
 507     wxFAIL_MSG(wxT("DoLogString must be overriden if it's called."));
 508 }
 509
 510 void wxLog::Flush()
 511 {
 512     // nothing to do here
 513 }
 514
 515 /*static*/ bool wxLog::IsAllowedTraceMask(const wxChar *mask)
 516 {
 517     for ( wxArrayString::iterator it = ms_aTraceMasks.begin(),
 518                                   en = ms_aTraceMasks.end();
 519          it != en; ++it )
 520         if ( *it == mask)
 521             return true;
 522     return false;
 523 }
 524
 525 // ----------------------------------------------------------------------------
 526 // wxLogStderr class implementation
 527 // ----------------------------------------------------------------------------
 528
 529 wxLogStderr::wxLogStderr(FILE *fp)
 530 {
 531     if ( fp == NULL )
 532         m_fp = stderr;
 533     else
 534         m_fp = fp;
 535 }
 536
 537 void wxLogStderr::DoLogString(const wxChar *szString, time_t WXUNUSED(t))
 538 {
 539     wxString str;
 540     TimeStamp(&str);
 541     str << szString;
 542
 543     fputs(str.mb_str(), m_fp);
 544     fputc(_T('\n'), m_fp);
 545     fflush(m_fp);
 546
 547     // under GUI systems such as Windows or Mac, programs usually don't have
 548     // stderr at all, so show the messages also somewhere else, typically in
 549     // the debugger window so that they go at least somewhere instead of being
 550     // simply lost
 551     if ( m_fp == stderr )
 552     {
 553         wxAppTraits *traits = wxTheApp ? wxTheApp->GetTraits() : NULL;
 554         if ( traits && !traits->HasStderr() )
 555         {
 556             wxMessageOutputDebug dbgout;
 557             dbgout.Printf(_T("%s\n"), str.c_str());
 558         }
 559     }
 560 }
 561
 562 // ----------------------------------------------------------------------------
 563 // wxLogStream implementation
 564 // ----------------------------------------------------------------------------
 565
 566 #if wxUSE_STD_IOSTREAM
 567 #include "wx/ioswrap.h"
 568 wxLogStream::wxLogStream(wxSTD ostream *ostr)
 569 {
 570     if ( ostr == NULL )
 571         m_ostr = &wxSTD cerr;
 572     else
 573         m_ostr = ostr;
 574 }
 575
 576 void wxLogStream::DoLogString(const wxChar *szString, time_t WXUNUSED(t))
 577 {
 578     wxString str;
 579     TimeStamp(&str);
 580     (*m_ostr) << str << wxConvertWX2MB(szString) << wxSTD endl;
 581 }
 582 #endif // wxUSE_STD_IOSTREAM
 583
 584 // ----------------------------------------------------------------------------
 585 // wxLogChain
 586 // ----------------------------------------------------------------------------
 587
 588 wxLogChain::wxLogChain(wxLog *logger)
 589 {
 590     m_bPassMessages = true;
 591
 592     m_logNew = logger;
 593     m_logOld = wxLog::SetActiveTarget(this);
 594 }
 595
 596 wxLogChain::~wxLogChain()
 597 {
 598     delete m_logOld;
 599
 600     if ( m_logNew != this )
 601         delete m_logNew;
 602 }
 603
 604 void wxLogChain::SetLog(wxLog *logger)
 605 {
 606     if ( m_logNew != this )
 607         delete m_logNew;
 608
 609     m_logNew = logger;
 610 }
 611
 612 void wxLogChain::Flush()
 613 {
 614     if ( m_logOld )
 615         m_logOld->Flush();
 616
 617     // be careful to avoid infinite recursion
 618     if ( m_logNew && m_logNew != this )
 619         m_logNew->Flush();
 620 }
 621
 622 void wxLogChain::DoLog(wxLogLevel level, const wxChar *szString, time_t t)
 623 {
 624     // let the previous logger show it
 625     if ( m_logOld && IsPassingMessages() )
 626     {
 627         // bogus cast just to access protected DoLog
 628         ((wxLogChain *)m_logOld)->DoLog(level, szString, t);
 629     }
 630
 631     if ( m_logNew && m_logNew != this )
 632     {
 633         // as above...
 634         ((wxLogChain *)m_logNew)->DoLog(level, szString, t);
 635     }
 636 }
 637
 638 // ----------------------------------------------------------------------------
 639 // wxLogPassThrough
 640 // ----------------------------------------------------------------------------
 641
 642 #ifdef __VISUALC__
 643     // "'this' : used in base member initializer list" - so what?
 644     #pragma warning(disable:4355)
 645 #endif // VC++
 646
 647 wxLogPassThrough::wxLogPassThrough()
 648                 : wxLogChain(this)
 649 {
 650 }
 651
 652 #ifdef __VISUALC__
 653     #pragma warning(default:4355)
 654 #endif // VC++
 655
 656 // ============================================================================
 657 // Global functions/variables
 658 // ============================================================================
 659
 660 // ----------------------------------------------------------------------------
 661 // static variables
 662 // ----------------------------------------------------------------------------
 663
 664 wxLog          *wxLog::ms_pLogger      = (wxLog *)NULL;
 665 bool            wxLog::ms_doLog        = true;
 666 bool            wxLog::ms_bAutoCreate  = true;
 667 bool            wxLog::ms_bVerbose     = false;
 668
 669 wxLogLevel      wxLog::ms_logLevel     = wxLOG_Max;  // log everything by default
 670
 671 size_t          wxLog::ms_suspendCount = 0;
 672
 673 const wxChar   *wxLog::ms_timestamp    = wxT("%X");  // time only, no date
 674
 675 wxTraceMask     wxLog::ms_ulTraceMask  = (wxTraceMask)0;
 676 wxArrayString   wxLog::ms_aTraceMasks;
 677
 678 // ----------------------------------------------------------------------------
 679 // stdout error logging helper
 680 // ----------------------------------------------------------------------------
 681
 682 // helper function: wraps the message and justifies it under given position
 683 // (looks more pretty on the terminal). Also adds newline at the end.
 684 //
 685 // TODO this is now disabled until I find a portable way of determining the
 686 //      terminal window size (ok, I found it but does anybody really cares?)
 687 #ifdef LOG_PRETTY_WRAP
 688 static void wxLogWrap(FILE *f, const char *pszPrefix, const char *psz)
 689 {
 690     size_t nMax = 80; // FIXME
 691     size_t nStart = strlen(pszPrefix);
 692     fputs(pszPrefix, f);
 693
 694     size_t n;
 695     while ( *psz != '\0' ) {
 696         for ( n = nStart; (n < nMax) && (*psz != '\0'); n++ )
 697             putc(*psz++, f);
 698
 699         // wrapped?
 700         if ( *psz != '\0' ) {
 701             /*putc('\n', f);*/
 702             for ( n = 0; n < nStart; n++ )
 703                 putc(' ', f);
 704
 705             // as we wrapped, squeeze all white space
 706             while ( isspace(*psz) )
 707                 psz++;
 708         }
 709     }
 710
 711     putc('\n', f);
 712 }
 713 #endif  //LOG_PRETTY_WRAP
 714
 715 // ----------------------------------------------------------------------------
 716 // error code/error message retrieval functions
 717 // ----------------------------------------------------------------------------
 718
 719 // get error code from syste
 720 unsigned long wxSysErrorCode()
 721 {
 722 #if defined(__WXMSW__) && !defined(__WXMICROWIN__)
 723     return ::GetLastError();
 724 #else   //Unix
 725     return errno;
 726 #endif  //Win/Unix
 727 }
 728
 729 // get error message from system
 730 const wxChar *wxSysErrorMsg(unsigned long nErrCode)
 731 {
 732     if ( nErrCode == 0 )
 733         nErrCode = wxSysErrorCode();
 734
 735 #if defined(__WXMSW__) && !defined(__WXMICROWIN__)
 736     static wxChar s_szBuf[LOG_BUFFER_SIZE / 2];
 737
 738     // get error message from system
 739     LPVOID lpMsgBuf;
 740     FormatMessage(FORMAT_MESSAGE_ALLOCATE_BUFFER | FORMAT_MESSAGE_FROM_SYSTEM,
 741             NULL, nErrCode,
 742             MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT),
 743             (LPTSTR)&lpMsgBuf,
 744             0, NULL);
 745
 746     // copy it to our buffer and free memory
 747     // Crashes on SmartPhone
 748 #if !defined(__SMARTPHONE__) /* of WinCE */
 749      if( lpMsgBuf != 0 ) {
 750         wxStrncpy(s_szBuf, (const wxChar *)lpMsgBuf, WXSIZEOF(s_szBuf) - 1);
 751         s_szBuf[WXSIZEOF(s_szBuf) - 1] = wxT('\0');
 752
 753         LocalFree(lpMsgBuf);
 754
 755         // returned string is capitalized and ended with '\r\n' - bad
 756         s_szBuf[0] = (wxChar)wxTolower(s_szBuf[0]);
 757         size_t len = wxStrlen(s_szBuf);
 758         if ( len > 0 ) {
 759             // truncate string
 760             if ( s_szBuf[len - 2] == wxT('\r') )
 761                 s_szBuf[len - 2] = wxT('\0');
 762         }
 763     }
 764     else
 765 #endif
 766     {
 767         s_szBuf[0] = wxT('\0');
 768     }
 769
 770     return s_szBuf;
 771 #else   // Unix-WXMICROWIN
 772 #if wxUSE_UNICODE
 773     static wxChar s_szBuf[LOG_BUFFER_SIZE / 2];
 774     wxConvCurrent->MB2WC(s_szBuf, strerror(nErrCode), WXSIZEOF(s_szBuf) -1);
 775     return s_szBuf;
 776 #else
 777     return strerror((int)nErrCode);
 778 #endif
 779 #endif  // Win/Unix-WXMICROWIN
 780 }
 781
 782 #endif // wxUSE_LOG
 783