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 #ifdef __GNUG__
  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 // wxWindows
  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     va_end(argptr);
 203 }
 204
 205 // same as info, but only if 'verbose' mode is on
 206 void wxVLogVerbose(const wxChar *szFormat, va_list argptr)
 207 {
 208     if ( IsLoggingEnabled() ) {
 209         wxLog *pLog = wxLog::GetActiveTarget();
 210         if ( pLog != NULL && pLog->GetVerbose() ) {
 211             wxCRIT_SECT_LOCKER(locker, gs_csLogBuf);
 212
 213             wxVsnprintf(s_szBuf, s_szBufSize, szFormat, argptr);
 214
 215             wxLog::OnLog(wxLOG_Info, s_szBuf, time(NULL));
 216         }
 217     }
 218 }
 219
 220 void wxLogVerbose(const wxChar *szFormat, ...)
 221 {
 222     va_list argptr;
 223     va_start(argptr, szFormat);
 224     wxVLogVerbose(szFormat, argptr);
 225     va_end(argptr);
 226 }
 227
 228 // debug functions
 229 #ifdef __WXDEBUG__
 230 #define IMPLEMENT_LOG_DEBUG_FUNCTION(level)                         \
 231   void wxVLog##level(const wxChar *szFormat, va_list argptr)        \
 232   {                                                                 \
 233     if ( IsLoggingEnabled() ) {                                     \
 234       wxCRIT_SECT_LOCKER(locker, gs_csLogBuf);                      \
 235                                                                     \
 236       wxVsnprintf(s_szBuf, s_szBufSize, szFormat, argptr);    \
 237                                                                     \
 238       wxLog::OnLog(wxLOG_##level, s_szBuf, time(NULL));             \
 239     }                                                               \
 240   }                                                                 \
 241   void wxLog##level(const wxChar *szFormat, ...)                    \
 242   {                                                                 \
 243     va_list argptr;                                                 \
 244     va_start(argptr, szFormat);                                     \
 245     wxVLog##level(szFormat, argptr);                                \
 246     va_end(argptr);                                                 \
 247   }
 248
 249   void wxVLogTrace(const wxChar *mask, const wxChar *szFormat, va_list argptr)
 250   {
 251     if ( IsLoggingEnabled() && wxLog::IsAllowedTraceMask(mask) ) {
 252       wxCRIT_SECT_LOCKER(locker, gs_csLogBuf);
 253
 254       wxChar *p = s_szBuf;
 255       size_t len = s_szBufSize;
 256       wxStrncpy(s_szBuf, _T("("), len);
 257       len -= 1; // strlen("(")
 258       p += 1;
 259       wxStrncat(p, mask, len);
 260       size_t lenMask = wxStrlen(mask);
 261       len -= lenMask;
 262       p += lenMask;
 263
 264       wxStrncat(p, _T(") "), len);
 265       len -= 2;
 266       p += 2;
 267
 268       wxVsnprintf(p, len, szFormat, argptr);
 269
 270       wxLog::OnLog(wxLOG_Trace, s_szBuf, time(NULL));
 271     }
 272   }
 273
 274   void wxLogTrace(const wxChar *mask, const wxChar *szFormat, ...)
 275   {
 276     va_list argptr;
 277     va_start(argptr, szFormat);
 278     wxVLogTrace(mask, szFormat, argptr);
 279     va_end(argptr);
 280   }
 281
 282   void wxVLogTrace(wxTraceMask mask, const wxChar *szFormat, va_list argptr)
 283   {
 284     // we check that all of mask bits are set in the current mask, so
 285     // that wxLogTrace(wxTraceRefCount | wxTraceOle) will only do something
 286     // if both bits are set.
 287     if ( IsLoggingEnabled() && ((wxLog::GetTraceMask() & mask) == mask) ) {
 288       wxCRIT_SECT_LOCKER(locker, gs_csLogBuf);
 289
 290       wxVsnprintf(s_szBuf, s_szBufSize, szFormat, argptr);
 291
 292       wxLog::OnLog(wxLOG_Trace, s_szBuf, time(NULL));
 293     }
 294   }
 295
 296   void wxLogTrace(wxTraceMask mask, const wxChar *szFormat, ...)
 297   {
 298     va_list argptr;
 299     va_start(argptr, szFormat);
 300     wxVLogTrace(mask, szFormat, argptr);
 301     va_end(argptr);
 302   }
 303
 304 #else // release
 305   #define IMPLEMENT_LOG_DEBUG_FUNCTION(level)
 306 #endif
 307
 308 IMPLEMENT_LOG_DEBUG_FUNCTION(Debug)
 309 IMPLEMENT_LOG_DEBUG_FUNCTION(Trace)
 310
 311 // wxLogSysError: one uses the last error code, for other  you must give it
 312 // explicitly
 313
 314 // common part of both wxLogSysError
 315 void wxLogSysErrorHelper(long lErrCode)
 316 {
 317     wxChar szErrMsg[LOG_BUFFER_SIZE / 2];
 318     wxSnprintf(szErrMsg, WXSIZEOF(szErrMsg),
 319                _(" (error %ld: %s)"), lErrCode, wxSysErrorMsg(lErrCode));
 320     wxStrncat(s_szBuf, szErrMsg, s_szBufSize - wxStrlen(s_szBuf));
 321
 322     wxLog::OnLog(wxLOG_Error, s_szBuf, time(NULL));
 323 }
 324
 325 void WXDLLEXPORT wxVLogSysError(const wxChar *szFormat, va_list argptr)
 326 {
 327     if ( IsLoggingEnabled() ) {
 328         wxCRIT_SECT_LOCKER(locker, gs_csLogBuf);
 329
 330         wxVsnprintf(s_szBuf, s_szBufSize, szFormat, argptr);
 331
 332         wxLogSysErrorHelper(wxSysErrorCode());
 333     }
 334 }
 335
 336 void WXDLLEXPORT wxLogSysError(const wxChar *szFormat, ...)
 337 {
 338     va_list argptr;
 339     va_start(argptr, szFormat);
 340     wxVLogSysError(szFormat, argptr);
 341     va_end(argptr);
 342 }
 343
 344 void WXDLLEXPORT wxVLogSysError(long lErrCode, const wxChar *szFormat, va_list argptr)
 345 {
 346     if ( IsLoggingEnabled() ) {
 347         wxCRIT_SECT_LOCKER(locker, gs_csLogBuf);
 348
 349         wxVsnprintf(s_szBuf, s_szBufSize, szFormat, argptr);
 350
 351         wxLogSysErrorHelper(lErrCode);
 352     }
 353 }
 354
 355 void WXDLLEXPORT wxLogSysError(long lErrCode, const wxChar *szFormat, ...)
 356 {
 357     va_list argptr;
 358     va_start(argptr, szFormat);
 359     wxVLogSysError(lErrCode, szFormat, argptr);
 360     va_end(argptr);
 361 }
 362
 363 // ----------------------------------------------------------------------------
 364 // wxLog class implementation
 365 // ----------------------------------------------------------------------------
 366
 367 wxLog::wxLog()
 368 {
 369 }
 370
 371 wxChar *wxLog::SetLogBuffer( wxChar *buf, size_t size)
 372 {
 373     wxChar *oldbuf = s_szBuf;
 374
 375     if( buf == 0 )
 376     {
 377         s_szBuf = s_szBufStatic;
 378         s_szBufSize = WXSIZEOF( s_szBufStatic );
 379     }
 380     else
 381     {
 382         s_szBuf = buf;
 383         s_szBufSize = size;
 384     }
 385
 386     return (oldbuf == s_szBufStatic ) ? 0 : oldbuf;
 387 }
 388
 389 wxLog *wxLog::GetActiveTarget()
 390 {
 391     if ( ms_bAutoCreate && ms_pLogger == NULL ) {
 392         // prevent infinite recursion if someone calls wxLogXXX() from
 393         // wxApp::CreateLogTarget()
 394         static bool s_bInGetActiveTarget = FALSE;
 395         if ( !s_bInGetActiveTarget ) {
 396             s_bInGetActiveTarget = TRUE;
 397
 398             // ask the application to create a log target for us
 399             if ( wxTheApp != NULL )
 400                 ms_pLogger = wxTheApp->GetTraits()->CreateLogTarget();
 401             else
 402                 ms_pLogger = new wxLogStderr;
 403
 404             s_bInGetActiveTarget = FALSE;
 405
 406             // do nothing if it fails - what can we do?
 407         }
 408     }
 409
 410     return ms_pLogger;
 411 }
 412
 413 wxLog *wxLog::SetActiveTarget(wxLog *pLogger)
 414 {
 415     if ( ms_pLogger != NULL ) {
 416         // flush the old messages before changing because otherwise they might
 417         // get lost later if this target is not restored
 418         ms_pLogger->Flush();
 419     }
 420
 421     wxLog *pOldLogger = ms_pLogger;
 422     ms_pLogger = pLogger;
 423
 424     return pOldLogger;
 425 }
 426
 427 void wxLog::DontCreateOnDemand()
 428 {
 429     ms_bAutoCreate = FALSE;
 430
 431     // this is usually called at the end of the program and we assume that it
 432     // is *always* called at the end - so we free memory here to avoid false
 433     // memory leak reports from wxWin  memory tracking code
 434     ClearTraceMasks();
 435 }
 436
 437 void wxLog::RemoveTraceMask(const wxString& str)
 438 {
 439     int index = ms_aTraceMasks.Index(str);
 440     if ( index != wxNOT_FOUND )
 441         ms_aTraceMasks.RemoveAt((size_t)index);
 442 }
 443
 444 void wxLog::ClearTraceMasks()
 445 {
 446     ms_aTraceMasks.Clear();
 447 }
 448
 449 void wxLog::TimeStamp(wxString *str)
 450 {
 451     if ( ms_timestamp )
 452     {
 453         wxChar buf[256];
 454         time_t timeNow;
 455         (void)time(&timeNow);
 456         wxStrftime(buf, WXSIZEOF(buf), ms_timestamp, localtime(&timeNow));
 457
 458         str->Empty();
 459         *str << buf << wxT(": ");
 460     }
 461 }
 462
 463 void wxLog::DoLog(wxLogLevel level, const wxChar *szString, time_t t)
 464 {
 465     switch ( level ) {
 466         case wxLOG_FatalError:
 467             DoLogString(wxString(_("Fatal error: ")) + szString, t);
 468             DoLogString(_("Program aborted."), t);
 469             Flush();
 470 #ifdef __WXWINCE__
 471             ExitThread(3);
 472 #else
 473             abort();
 474 #endif
 475             break;
 476
 477         case wxLOG_Error:
 478             DoLogString(wxString(_("Error: ")) + szString, t);
 479             break;
 480
 481         case wxLOG_Warning:
 482             DoLogString(wxString(_("Warning: ")) + szString, t);
 483             break;
 484
 485         case wxLOG_Info:
 486             if ( GetVerbose() )
 487         case wxLOG_Message:
 488         case wxLOG_Status:
 489         default:    // log unknown log levels too
 490                 DoLogString(szString, t);
 491             break;
 492
 493         case wxLOG_Trace:
 494         case wxLOG_Debug:
 495 #ifdef __WXDEBUG__
 496             {
 497                 wxString msg = level == wxLOG_Trace ? wxT("Trace: ")
 498                                                     : wxT("Debug: ");
 499                 msg << szString;
 500                 DoLogString(msg, t);
 501             }
 502 #endif // Debug
 503             break;
 504     }
 505 }
 506
 507 void wxLog::DoLogString(const wxChar *WXUNUSED(szString), time_t WXUNUSED(t))
 508 {
 509     wxFAIL_MSG(wxT("DoLogString must be overriden if it's called."));
 510 }
 511
 512 void wxLog::Flush()
 513 {
 514     // nothing to do here
 515 }
 516
 517 /*static*/ bool wxLog::IsAllowedTraceMask(const wxChar *mask)
 518 {
 519     for ( wxArrayString::iterator it = ms_aTraceMasks.begin(),
 520                                   en = ms_aTraceMasks.end();
 521          it != en; ++it )
 522         if ( *it == mask)
 523             return true;
 524     return false;
 525 }
 526
 527 // ----------------------------------------------------------------------------
 528 // wxLogStderr class implementation
 529 // ----------------------------------------------------------------------------
 530
 531 wxLogStderr::wxLogStderr(FILE *fp)
 532 {
 533     if ( fp == NULL )
 534         m_fp = stderr;
 535     else
 536         m_fp = fp;
 537 }
 538
 539 void wxLogStderr::DoLogString(const wxChar *szString, time_t WXUNUSED(t))
 540 {
 541     wxString str;
 542     TimeStamp(&str);
 543     str << szString;
 544
 545     fputs(str.mb_str(), m_fp);
 546     fputc(_T('\n'), m_fp);
 547     fflush(m_fp);
 548
 549     // under GUI systems such as Windows or Mac, programs usually don't have
 550     // stderr at all, so show the messages also somewhere else, typically in
 551     // the debugger window so that they go at least somewhere instead of being
 552     // simply lost
 553     if ( m_fp == stderr )
 554     {
 555         wxAppTraits *traits = wxTheApp ? wxTheApp->GetTraits() : NULL;
 556         if ( traits && !traits->HasStderr() )
 557         {
 558             wxMessageOutputDebug().Printf(_T("%s"), str.c_str());
 559         }
 560     }
 561 }
 562
 563 // ----------------------------------------------------------------------------
 564 // wxLogStream implementation
 565 // ----------------------------------------------------------------------------
 566
 567 #if wxUSE_STD_IOSTREAM
 568 #include "wx/ioswrap.h"
 569 wxLogStream::wxLogStream(wxSTD ostream *ostr)
 570 {
 571     if ( ostr == NULL )
 572         m_ostr = &wxSTD cerr;
 573     else
 574         m_ostr = ostr;
 575 }
 576
 577 void wxLogStream::DoLogString(const wxChar *szString, time_t WXUNUSED(t))
 578 {
 579     wxString str;
 580     TimeStamp(&str);
 581     (*m_ostr) << str << wxConvertWX2MB(szString) << wxSTD endl;
 582 }
 583 #endif // wxUSE_STD_IOSTREAM
 584
 585 // ----------------------------------------------------------------------------
 586 // wxLogChain
 587 // ----------------------------------------------------------------------------
 588
 589 wxLogChain::wxLogChain(wxLog *logger)
 590 {
 591     m_bPassMessages = TRUE;
 592
 593     m_logNew = logger;
 594     m_logOld = wxLog::SetActiveTarget(this);
 595 }
 596
 597 wxLogChain::~wxLogChain()
 598 {
 599     delete m_logOld;
 600
 601     if ( m_logNew != this )
 602         delete m_logNew;
 603 }
 604
 605 void wxLogChain::SetLog(wxLog *logger)
 606 {
 607     if ( m_logNew != this )
 608         delete m_logNew;
 609
 610     m_logNew = logger;
 611 }
 612
 613 void wxLogChain::Flush()
 614 {
 615     if ( m_logOld )
 616         m_logOld->Flush();
 617
 618     // be careful to avoid infinite recursion
 619     if ( m_logNew && m_logNew != this )
 620         m_logNew->Flush();
 621 }
 622
 623 void wxLogChain::DoLog(wxLogLevel level, const wxChar *szString, time_t t)
 624 {
 625     // let the previous logger show it
 626     if ( m_logOld && IsPassingMessages() )
 627     {
 628         // bogus cast just to access protected DoLog
 629         ((wxLogChain *)m_logOld)->DoLog(level, szString, t);
 630     }
 631
 632     if ( m_logNew && m_logNew != this )
 633     {
 634         // as above...
 635         ((wxLogChain *)m_logNew)->DoLog(level, szString, t);
 636     }
 637 }
 638
 639 // ----------------------------------------------------------------------------
 640 // wxLogPassThrough
 641 // ----------------------------------------------------------------------------
 642
 643 #ifdef __VISUALC__
 644     // "'this' : used in base member initializer list" - so what?
 645     #pragma warning(disable:4355)
 646 #endif // VC++
 647
 648 wxLogPassThrough::wxLogPassThrough()
 649                 : wxLogChain(this)
 650 {
 651 }
 652
 653 #ifdef __VISUALC__
 654     #pragma warning(default:4355)
 655 #endif // VC++
 656
 657 // ============================================================================
 658 // Global functions/variables
 659 // ============================================================================
 660
 661 // ----------------------------------------------------------------------------
 662 // static variables
 663 // ----------------------------------------------------------------------------
 664
 665 wxLog          *wxLog::ms_pLogger      = (wxLog *)NULL;
 666 bool            wxLog::ms_doLog        = TRUE;
 667 bool            wxLog::ms_bAutoCreate  = TRUE;
 668 bool            wxLog::ms_bVerbose     = FALSE;
 669
 670 wxLogLevel      wxLog::ms_logLevel     = wxLOG_Max;  // log everything by default
 671
 672 size_t          wxLog::ms_suspendCount = 0;
 673
 674 const wxChar   *wxLog::ms_timestamp    = wxT("%X");  // time only, no date
 675
 676 wxTraceMask     wxLog::ms_ulTraceMask  = (wxTraceMask)0;
 677 wxArrayString   wxLog::ms_aTraceMasks;
 678
 679 // ----------------------------------------------------------------------------
 680 // stdout error logging helper
 681 // ----------------------------------------------------------------------------
 682
 683 // helper function: wraps the message and justifies it under given position
 684 // (looks more pretty on the terminal). Also adds newline at the end.
 685 //
 686 // TODO this is now disabled until I find a portable way of determining the
 687 //      terminal window size (ok, I found it but does anybody really cares?)
 688 #ifdef LOG_PRETTY_WRAP
 689 static void wxLogWrap(FILE *f, const char *pszPrefix, const char *psz)
 690 {
 691     size_t nMax = 80; // FIXME
 692     size_t nStart = strlen(pszPrefix);
 693     fputs(pszPrefix, f);
 694
 695     size_t n;
 696     while ( *psz != '\0' ) {
 697         for ( n = nStart; (n < nMax) && (*psz != '\0'); n++ )
 698             putc(*psz++, f);
 699
 700         // wrapped?
 701         if ( *psz != '\0' ) {
 702             /*putc('\n', f);*/
 703             for ( n = 0; n < nStart; n++ )
 704                 putc(' ', f);
 705
 706             // as we wrapped, squeeze all white space
 707             while ( isspace(*psz) )
 708                 psz++;
 709         }
 710     }
 711
 712     putc('\n', f);
 713 }
 714 #endif  //LOG_PRETTY_WRAP
 715
 716 // ----------------------------------------------------------------------------
 717 // error code/error message retrieval functions
 718 // ----------------------------------------------------------------------------
 719
 720 // get error code from syste
 721 unsigned long wxSysErrorCode()
 722 {
 723 #if defined(__WXMSW__) && !defined(__WXMICROWIN__)
 724 #ifdef  __WIN32__
 725     return ::GetLastError();
 726 #else   //WIN16
 727     // TODO what to do on Windows 3.1?
 728     return 0;
 729 #endif  //WIN16/32
 730 #else   //Unix
 731     return errno;
 732 #endif  //Win/Unix
 733 }
 734
 735 // get error message from system
 736 const wxChar *wxSysErrorMsg(unsigned long nErrCode)
 737 {
 738     if ( nErrCode == 0 )
 739         nErrCode = wxSysErrorCode();
 740
 741 #if defined(__WXMSW__) && !defined(__WXMICROWIN__)
 742 #ifdef  __WIN32__
 743     static wxChar s_szBuf[LOG_BUFFER_SIZE / 2];
 744
 745     // get error message from system
 746     LPVOID lpMsgBuf;
 747     FormatMessage(FORMAT_MESSAGE_ALLOCATE_BUFFER | FORMAT_MESSAGE_FROM_SYSTEM,
 748             NULL, nErrCode,
 749             MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT),
 750             (LPTSTR)&lpMsgBuf,
 751             0, NULL);
 752
 753     // copy it to our buffer and free memory
 754     if( lpMsgBuf != 0 ) {
 755         wxStrncpy(s_szBuf, (const wxChar *)lpMsgBuf, WXSIZEOF(s_szBuf) - 1);
 756         s_szBuf[WXSIZEOF(s_szBuf) - 1] = wxT('\0');
 757
 758         LocalFree(lpMsgBuf);
 759
 760         // returned string is capitalized and ended with '\r\n' - bad
 761         s_szBuf[0] = (wxChar)wxTolower(s_szBuf[0]);
 762         size_t len = wxStrlen(s_szBuf);
 763         if ( len > 0 ) {
 764             // truncate string
 765             if ( s_szBuf[len - 2] == wxT('\r') )
 766                 s_szBuf[len - 2] = wxT('\0');
 767         }
 768     }
 769     else {
 770         s_szBuf[0] = wxT('\0');
 771     }
 772
 773     return s_szBuf;
 774 #else   //Win16
 775     // TODO
 776     return NULL;
 777 #endif // Win16/32
 778 #else   // Unix
 779 #if wxUSE_UNICODE
 780     static wxChar s_szBuf[LOG_BUFFER_SIZE / 2];
 781     wxConvCurrent->MB2WC(s_szBuf, strerror(nErrCode), WXSIZEOF(s_szBuf) -1);
 782     return s_szBuf;
 783 #else
 784     return strerror((int)nErrCode);
 785 #endif
 786 #endif  // Win/Unix
 787 }
 788
 789 #endif // wxUSE_LOG
 790