src/generic/logg.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        src/generic/logg.cpp
   3 // Purpose:     wxLog-derived classes which need GUI support (the rest is in
   4 //              src/common/log.cpp)
   5 // Author:      Vadim Zeitlin
   6 // Modified by:
   7 // Created:     20.09.99 (extracted from src/common/log.cpp)
   8 // RCS-ID:      $Id$
   9 // Copyright:   (c) 1998 Vadim Zeitlin <zeitlin@dptmaths.ens-cachan.fr>
  10 // Licence:     wxWindows licence
  11 /////////////////////////////////////////////////////////////////////////////
  12
  13 // ============================================================================
  14 // declarations
  15 // ============================================================================
  16
  17 // ----------------------------------------------------------------------------
  18 // headers
  19 // ----------------------------------------------------------------------------
  20
  21 #if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
  22     #pragma implementation "logg.h"
  23 #endif
  24
  25 // For compilers that support precompilation, includes "wx.h".
  26 #include "wx/wxprec.h"
  27
  28 #ifdef __BORLANDC__
  29   #pragma hdrstop
  30 #endif
  31
  32 #ifndef WX_PRECOMP
  33     #include "wx/app.h"
  34     #include "wx/button.h"
  35     #include "wx/intl.h"
  36     #include "wx/log.h"
  37     #include "wx/menu.h"
  38     #include "wx/frame.h"
  39     #include "wx/filedlg.h"
  40     #include "wx/msgdlg.h"
  41     #include "wx/textctrl.h"
  42     #include "wx/sizer.h"
  43     #include "wx/statbmp.h"
  44     #include "wx/button.h"
  45     #include "wx/settings.h"
  46 #endif // WX_PRECOMP
  47
  48 #if wxUSE_LOGGUI || wxUSE_LOGWINDOW
  49
  50 #include "wx/file.h"
  51 #include "wx/textfile.h"
  52 #include "wx/statline.h"
  53 #include "wx/artprov.h"
  54
  55 #ifdef  __WXMSW__
  56   // for OutputDebugString()
  57   #include  "wx/msw/private.h"
  58 #endif // Windows
  59
  60 #ifdef  __WXPM__
  61   #include <time.h>
  62 #endif
  63
  64 #if wxUSE_LOG_DIALOG
  65     #include "wx/listctrl.h"
  66     #include "wx/imaglist.h"
  67     #include "wx/image.h"
  68 #else // !wxUSE_LOG_DIALOG
  69     #include "wx/msgdlg.h"
  70 #endif // wxUSE_LOG_DIALOG/!wxUSE_LOG_DIALOG
  71
  72 #if defined(__MWERKS__) && wxUSE_UNICODE
  73     #include <wtime.h>
  74 #endif
  75
  76 // the suffix we add to the button to show that the dialog can be expanded
  77 #define EXPAND_SUFFIX _T(" >>")
  78
  79 // ----------------------------------------------------------------------------
  80 // private classes
  81 // ----------------------------------------------------------------------------
  82
  83 #if wxUSE_LOG_DIALOG
  84
  85 // this function is a wrapper around strftime(3)
  86 // allows to exclude the usage of wxDateTime
  87 static wxString TimeStamp(const wxChar *format, time_t t)
  88 {
  89 #ifdef __WXWINCE__
  90     // FIXME
  91     return wxEmptyString;
  92 #else
  93     wxChar buf[4096];
  94     if ( !wxStrftime(buf, WXSIZEOF(buf), format, localtime(&t)) )
  95     {
  96         // buffer is too small?
  97         wxFAIL_MSG(_T("strftime() failed"));
  98     }
  99     return wxString(buf);
 100 #endif
 101 }
 102
 103
 104 class wxLogDialog : public wxDialog
 105 {
 106 public:
 107     wxLogDialog(wxWindow *parent,
 108                 const wxArrayString& messages,
 109                 const wxArrayInt& severity,
 110                 const wxArrayLong& timess,
 111                 const wxString& caption,
 112                 long style);
 113     virtual ~wxLogDialog();
 114
 115     // event handlers
 116     void OnOk(wxCommandEvent& event);
 117     void OnDetails(wxCommandEvent& event);
 118 #if wxUSE_FILE
 119     void OnSave(wxCommandEvent& event);
 120 #endif // wxUSE_FILE
 121     void OnListSelect(wxListEvent& event);
 122
 123 private:
 124     // create controls needed for the details display
 125     void CreateDetailsControls();
 126
 127     // the data for the listctrl
 128     wxArrayString m_messages;
 129     wxArrayInt m_severity;
 130     wxArrayLong m_times;
 131
 132     // the "toggle" button and its state
 133     wxButton *m_btnDetails;
 134     bool      m_showingDetails;
 135
 136     // the controls which are not shown initially (but only when details
 137     // button is pressed)
 138     wxListCtrl *m_listctrl;
 139 #if wxUSE_STATLINE
 140     wxStaticLine *m_statline;
 141 #endif // wxUSE_STATLINE
 142 #if wxUSE_FILE
 143     wxButton *m_btnSave;
 144 #endif // wxUSE_FILE
 145
 146     // the translated "Details" string
 147     static wxString ms_details;
 148
 149     DECLARE_EVENT_TABLE()
 150     DECLARE_NO_COPY_CLASS(wxLogDialog)
 151 };
 152
 153 BEGIN_EVENT_TABLE(wxLogDialog, wxDialog)
 154     EVT_BUTTON(wxID_CANCEL, wxLogDialog::OnOk)
 155     EVT_BUTTON(wxID_MORE,   wxLogDialog::OnDetails)
 156 #if wxUSE_FILE
 157     EVT_BUTTON(wxID_SAVE,   wxLogDialog::OnSave)
 158 #endif // wxUSE_FILE
 159     EVT_LIST_ITEM_SELECTED(-1, wxLogDialog::OnListSelect)
 160 END_EVENT_TABLE()
 161
 162 #endif // wxUSE_LOG_DIALOG
 163
 164 // ----------------------------------------------------------------------------
 165 // private functions
 166 // ----------------------------------------------------------------------------
 167
 168 #if wxUSE_FILE && wxUSE_FILEDLG
 169
 170 // pass an uninitialized file object, the function will ask the user for the
 171 // filename and try to open it, returns TRUE on success (file was opened),
 172 // FALSE if file couldn't be opened/created and -1 if the file selection
 173 // dialog was cancelled
 174 static int OpenLogFile(wxFile& file, wxString *filename = NULL);
 175
 176 #endif // wxUSE_FILE
 177
 178 // ----------------------------------------------------------------------------
 179 // global variables
 180 // ----------------------------------------------------------------------------
 181
 182 // we use a global variable to store the frame pointer for wxLogStatus - bad,
 183 // but it's the easiest way
 184 static wxFrame *gs_pFrame = NULL; // FIXME MT-unsafe
 185
 186 // ============================================================================
 187 // implementation
 188 // ============================================================================
 189
 190 // ----------------------------------------------------------------------------
 191 // global functions
 192 // ----------------------------------------------------------------------------
 193
 194 // accepts an additional argument which tells to which frame the output should
 195 // be directed
 196 void wxVLogStatus(wxFrame *pFrame, const wxChar *szFormat, va_list argptr)
 197 {
 198   wxString msg;
 199
 200   wxLog *pLog = wxLog::GetActiveTarget();
 201   if ( pLog != NULL ) {
 202     msg.PrintfV(szFormat, argptr);
 203
 204     wxASSERT( gs_pFrame == NULL ); // should be reset!
 205     gs_pFrame = pFrame;
 206 #ifdef __WXWINCE__
 207     wxLog::OnLog(wxLOG_Status, msg, 0);
 208 #else
 209     wxLog::OnLog(wxLOG_Status, msg, time(NULL));
 210 #endif
 211     gs_pFrame = (wxFrame *) NULL;
 212   }
 213 }
 214
 215 void wxLogStatus(wxFrame *pFrame, const wxChar *szFormat, ...)
 216 {
 217     va_list argptr;
 218     va_start(argptr, szFormat);
 219     wxVLogStatus(pFrame, szFormat, argptr);
 220     va_end(argptr);
 221 }
 222
 223 // ----------------------------------------------------------------------------
 224 // wxLogGui implementation (FIXME MT-unsafe)
 225 // ----------------------------------------------------------------------------
 226
 227 #if wxUSE_LOGGUI
 228
 229 wxLogGui::wxLogGui()
 230 {
 231     Clear();
 232 }
 233
 234 void wxLogGui::Clear()
 235 {
 236     m_bErrors =
 237     m_bWarnings =
 238     m_bHasMessages = FALSE;
 239
 240     m_aMessages.Empty();
 241     m_aSeverity.Empty();
 242     m_aTimes.Empty();
 243 }
 244
 245 void wxLogGui::Flush()
 246 {
 247     if ( !m_bHasMessages )
 248         return;
 249
 250     // do it right now to block any new calls to Flush() while we're here
 251     m_bHasMessages = FALSE;
 252
 253     wxString appName = wxTheApp->GetAppName();
 254     if ( !!appName )
 255         appName[0u] = wxToupper(appName[0u]);
 256
 257     long style;
 258     wxString titleFormat;
 259     if ( m_bErrors ) {
 260         titleFormat = _("%s Error");
 261         style = wxICON_STOP;
 262     }
 263     else if ( m_bWarnings ) {
 264         titleFormat = _("%s Warning");
 265         style = wxICON_EXCLAMATION;
 266     }
 267     else {
 268         titleFormat = _("%s Information");
 269         style = wxICON_INFORMATION;
 270     }
 271
 272     wxString title;
 273     title.Printf(titleFormat, appName.c_str());
 274
 275     size_t nMsgCount = m_aMessages.Count();
 276
 277     // avoid showing other log dialogs until we're done with the dialog we're
 278     // showing right now: nested modal dialogs make for really bad UI!
 279     Suspend();
 280
 281     wxString str;
 282     if ( nMsgCount == 1 )
 283     {
 284         str = m_aMessages[0];
 285     }
 286     else // more than one message
 287     {
 288 #if wxUSE_LOG_DIALOG
 289
 290         wxLogDialog dlg(NULL,
 291                         m_aMessages, m_aSeverity, m_aTimes,
 292                         title, style);
 293
 294         // clear the message list before showing the dialog because while it's
 295         // shown some new messages may appear
 296         Clear();
 297
 298         (void)dlg.ShowModal();
 299 #else // !wxUSE_LOG_DIALOG
 300         // concatenate all strings (but not too many to not overfill the msg box)
 301         size_t nLines = 0;
 302
 303         // start from the most recent message
 304         for ( size_t n = nMsgCount; n > 0; n-- ) {
 305             // for Windows strings longer than this value are wrapped (NT 4.0)
 306             const size_t nMsgLineWidth = 156;
 307
 308             nLines += (m_aMessages[n - 1].Len() + nMsgLineWidth - 1) / nMsgLineWidth;
 309
 310             if ( nLines > 25 )  // don't put too many lines in message box
 311                 break;
 312
 313             str << m_aMessages[n - 1] << wxT("\n");
 314         }
 315 #endif // wxUSE_LOG_DIALOG/!wxUSE_LOG_DIALOG
 316     }
 317
 318     // this catches both cases of 1 message with wxUSE_LOG_DIALOG and any
 319     // situation without it
 320     if ( !!str )
 321     {
 322         wxMessageBox(str, title, wxOK | style);
 323
 324         // no undisplayed messages whatsoever
 325         Clear();
 326     }
 327
 328     // allow flushing the logs again
 329     Resume();
 330 }
 331
 332 // log all kinds of messages
 333 void wxLogGui::DoLog(wxLogLevel level, const wxChar *szString, time_t t)
 334 {
 335     switch ( level ) {
 336         case wxLOG_Info:
 337             if ( GetVerbose() )
 338         case wxLOG_Message:
 339             {
 340                 m_aMessages.Add(szString);
 341                 m_aSeverity.Add(wxLOG_Message);
 342                 m_aTimes.Add((long)t);
 343                 m_bHasMessages = TRUE;
 344             }
 345             break;
 346
 347         case wxLOG_Status:
 348 #if wxUSE_STATUSBAR
 349             {
 350                 // find the top window and set it's status text if it has any
 351                 wxFrame *pFrame = gs_pFrame;
 352                 if ( pFrame == NULL ) {
 353                     wxWindow *pWin = wxTheApp->GetTopWindow();
 354                     if ( pWin != NULL && pWin->IsKindOf(CLASSINFO(wxFrame)) ) {
 355                         pFrame = (wxFrame *)pWin;
 356                     }
 357                 }
 358
 359                 if ( pFrame && pFrame->GetStatusBar() )
 360                     pFrame->SetStatusText(szString);
 361             }
 362 #endif // wxUSE_STATUSBAR
 363             break;
 364
 365         case wxLOG_Trace:
 366         case wxLOG_Debug:
 367             #ifdef __WXDEBUG__
 368             {
 369                 wxString str;
 370                 TimeStamp(&str);
 371                 str += szString;
 372
 373                 #if defined(__WXMSW__) && !defined(__WXMICROWIN__)
 374                     // don't prepend debug/trace here: it goes to the
 375                     // debug window anyhow
 376                     str += wxT("\r\n");
 377                     OutputDebugString(str);
 378                 #else
 379                     // send them to stderr
 380                     wxFprintf(stderr, wxT("[%s] %s\n"),
 381                               level == wxLOG_Trace ? wxT("Trace")
 382                                                    : wxT("Debug"),
 383                               str.c_str());
 384                     fflush(stderr);
 385                 #endif
 386             }
 387             #endif // __WXDEBUG__
 388
 389             break;
 390
 391         case wxLOG_FatalError:
 392             // show this one immediately
 393             wxMessageBox(szString, _("Fatal error"), wxICON_HAND);
 394             wxExit();
 395             break;
 396
 397         case wxLOG_Error:
 398             if ( !m_bErrors ) {
 399 #if !wxUSE_LOG_DIALOG
 400                 // discard earlier informational messages if this is the 1st
 401                 // error because they might not make sense any more and showing
 402                 // them in a message box might be confusing
 403                 m_aMessages.Empty();
 404                 m_aSeverity.Empty();
 405                 m_aTimes.Empty();
 406 #endif // wxUSE_LOG_DIALOG
 407                 m_bErrors = TRUE;
 408             }
 409             // fall through
 410
 411         case wxLOG_Warning:
 412             if ( !m_bErrors ) {
 413                 // for the warning we don't discard the info messages
 414                 m_bWarnings = TRUE;
 415             }
 416
 417             m_aMessages.Add(szString);
 418             m_aSeverity.Add((int)level);
 419             m_aTimes.Add((long)t);
 420             m_bHasMessages = TRUE;
 421             break;
 422     }
 423 }
 424
 425 #endif   // wxUSE_LOGGUI
 426
 427 // ----------------------------------------------------------------------------
 428 // wxLogWindow and wxLogFrame implementation
 429 // ----------------------------------------------------------------------------
 430
 431 // log frame class
 432 // ---------------
 433 class wxLogFrame : public wxFrame
 434 {
 435 public:
 436     // ctor & dtor
 437     wxLogFrame(wxFrame *pParent, wxLogWindow *log, const wxChar *szTitle);
 438     virtual ~wxLogFrame();
 439
 440     // menu callbacks
 441     void OnClose(wxCommandEvent& event);
 442     void OnCloseWindow(wxCloseEvent& event);
 443 #if wxUSE_FILE
 444     void OnSave (wxCommandEvent& event);
 445 #endif // wxUSE_FILE
 446     void OnClear(wxCommandEvent& event);
 447
 448     // accessors
 449     wxTextCtrl *TextCtrl() const { return m_pTextCtrl; }
 450
 451 private:
 452     // use standard ids for our commands!
 453     enum
 454     {
 455         Menu_Close = wxID_CLOSE,
 456         Menu_Save  = wxID_SAVE,
 457         Menu_Clear = wxID_CLEAR
 458     };
 459
 460     // common part of OnClose() and OnCloseWindow()
 461     void DoClose();
 462
 463     wxTextCtrl  *m_pTextCtrl;
 464     wxLogWindow *m_log;
 465
 466     DECLARE_EVENT_TABLE()
 467     DECLARE_NO_COPY_CLASS(wxLogFrame)
 468 };
 469
 470 BEGIN_EVENT_TABLE(wxLogFrame, wxFrame)
 471     // wxLogWindow menu events
 472     EVT_MENU(Menu_Close, wxLogFrame::OnClose)
 473 #if wxUSE_FILE
 474     EVT_MENU(Menu_Save,  wxLogFrame::OnSave)
 475 #endif // wxUSE_FILE
 476     EVT_MENU(Menu_Clear, wxLogFrame::OnClear)
 477
 478     EVT_CLOSE(wxLogFrame::OnCloseWindow)
 479 END_EVENT_TABLE()
 480
 481 wxLogFrame::wxLogFrame(wxFrame *pParent, wxLogWindow *log, const wxChar *szTitle)
 482           : wxFrame(pParent, -1, szTitle)
 483 {
 484     m_log = log;
 485
 486     m_pTextCtrl = new wxTextCtrl(this, -1, wxEmptyString, wxDefaultPosition,
 487             wxDefaultSize,
 488             wxTE_MULTILINE  |
 489             wxHSCROLL       |
 490             // needed for Win32 to avoid 65Kb limit but it doesn't work well
 491             // when using RichEdit 2.0 which we always do in the Unicode build
 492 #if !wxUSE_UNICODE
 493             wxTE_RICH       |
 494 #endif // !wxUSE_UNICODE
 495             wxTE_READONLY);
 496
 497 #if wxUSE_MENUS
 498     // create menu
 499     wxMenuBar *pMenuBar = new wxMenuBar;
 500     wxMenu *pMenu = new wxMenu;
 501 #if wxUSE_FILE
 502     pMenu->Append(Menu_Save,  _("&Save..."), _("Save log contents to file"));
 503 #endif // wxUSE_FILE
 504     pMenu->Append(Menu_Clear, _("C&lear"), _("Clear the log contents"));
 505     pMenu->AppendSeparator();
 506     pMenu->Append(Menu_Close, _("&Close"), _("Close this window"));
 507     pMenuBar->Append(pMenu, _("&Log"));
 508     SetMenuBar(pMenuBar);
 509 #endif // wxUSE_MENUS
 510
 511 #if wxUSE_STATUSBAR
 512     // status bar for menu prompts
 513     CreateStatusBar();
 514 #endif // wxUSE_STATUSBAR
 515
 516     m_log->OnFrameCreate(this);
 517 }
 518
 519 void wxLogFrame::DoClose()
 520 {
 521     if ( m_log->OnFrameClose(this) )
 522     {
 523         // instead of closing just hide the window to be able to Show() it
 524         // later
 525         Show(FALSE);
 526     }
 527 }
 528
 529 void wxLogFrame::OnClose(wxCommandEvent& WXUNUSED(event))
 530 {
 531     DoClose();
 532 }
 533
 534 void wxLogFrame::OnCloseWindow(wxCloseEvent& WXUNUSED(event))
 535 {
 536     DoClose();
 537 }
 538
 539 #if wxUSE_FILE
 540 void wxLogFrame::OnSave(wxCommandEvent& WXUNUSED(event))
 541 {
 542 #if wxUSE_FILEDLG
 543     wxString filename;
 544     wxFile file;
 545     int rc = OpenLogFile(file, &filename);
 546     if ( rc == -1 )
 547     {
 548         // cancelled
 549         return;
 550     }
 551
 552     bool bOk = rc != 0;
 553
 554     // retrieve text and save it
 555     // -------------------------
 556     int nLines = m_pTextCtrl->GetNumberOfLines();
 557     for ( int nLine = 0; bOk && nLine < nLines; nLine++ ) {
 558         bOk = file.Write(m_pTextCtrl->GetLineText(nLine) +
 559                          wxTextFile::GetEOL());
 560     }
 561
 562     if ( bOk )
 563         bOk = file.Close();
 564
 565     if ( !bOk ) {
 566         wxLogError(_("Can't save log contents to file."));
 567     }
 568     else {
 569         wxLogStatus(this, _("Log saved to the file '%s'."), filename.c_str());
 570     }
 571 #endif
 572 }
 573 #endif // wxUSE_FILE
 574
 575 void wxLogFrame::OnClear(wxCommandEvent& WXUNUSED(event))
 576 {
 577     m_pTextCtrl->Clear();
 578 }
 579
 580 wxLogFrame::~wxLogFrame()
 581 {
 582     m_log->OnFrameDelete(this);
 583 }
 584
 585 // wxLogWindow
 586 // -----------
 587
 588 wxLogWindow::wxLogWindow(wxFrame *pParent,
 589                          const wxChar *szTitle,
 590                          bool bShow,
 591                          bool bDoPass)
 592 {
 593     PassMessages(bDoPass);
 594
 595     m_pLogFrame = new wxLogFrame(pParent, this, szTitle);
 596
 597     if ( bShow )
 598         m_pLogFrame->Show(TRUE);
 599 }
 600
 601 void wxLogWindow::Show(bool bShow)
 602 {
 603     m_pLogFrame->Show(bShow);
 604 }
 605
 606 void wxLogWindow::DoLog(wxLogLevel level, const wxChar *szString, time_t t)
 607 {
 608     // first let the previous logger show it
 609     wxLogPassThrough::DoLog(level, szString, t);
 610
 611     if ( m_pLogFrame ) {
 612         switch ( level ) {
 613             case wxLOG_Status:
 614                 // by default, these messages are ignored by wxLog, so process
 615                 // them ourselves
 616                 if ( !wxIsEmpty(szString) )
 617                 {
 618                     wxString str;
 619                     str << _("Status: ") << szString;
 620                     DoLogString(str, t);
 621                 }
 622                 break;
 623
 624                 // don't put trace messages in the text window for 2 reasons:
 625                 // 1) there are too many of them
 626                 // 2) they may provoke other trace messages thus sending a program
 627                 //    into an infinite loop
 628             case wxLOG_Trace:
 629                 break;
 630
 631             default:
 632                 // and this will format it nicely and call our DoLogString()
 633                 wxLog::DoLog(level, szString, t);
 634         }
 635     }
 636 }
 637
 638 void wxLogWindow::DoLogString(const wxChar *szString, time_t WXUNUSED(t))
 639 {
 640     // put the text into our window
 641     wxTextCtrl *pText = m_pLogFrame->TextCtrl();
 642
 643     // remove selection (WriteText is in fact ReplaceSelection)
 644 #ifdef __WXMSW__
 645     long nLen = pText->GetLastPosition();
 646     pText->SetSelection(nLen, nLen);
 647 #endif // Windows
 648
 649     wxString msg;
 650     TimeStamp(&msg);
 651     msg << szString << wxT('\n');
 652
 653     pText->AppendText(msg);
 654
 655     // TODO ensure that the line can be seen
 656 }
 657
 658 wxFrame *wxLogWindow::GetFrame() const
 659 {
 660     return m_pLogFrame;
 661 }
 662
 663 void wxLogWindow::OnFrameCreate(wxFrame * WXUNUSED(frame))
 664 {
 665 }
 666
 667 bool wxLogWindow::OnFrameClose(wxFrame * WXUNUSED(frame))
 668 {
 669     // allow to close
 670     return TRUE;
 671 }
 672
 673 void wxLogWindow::OnFrameDelete(wxFrame * WXUNUSED(frame))
 674 {
 675     m_pLogFrame = (wxLogFrame *)NULL;
 676 }
 677
 678 wxLogWindow::~wxLogWindow()
 679 {
 680     // may be NULL if log frame already auto destroyed itself
 681     delete m_pLogFrame;
 682 }
 683
 684 // ----------------------------------------------------------------------------
 685 // wxLogDialog
 686 // ----------------------------------------------------------------------------
 687
 688 #if wxUSE_LOG_DIALOG
 689
 690 static const size_t MARGIN = 10;
 691
 692 wxString wxLogDialog::ms_details;
 693
 694 wxLogDialog::wxLogDialog(wxWindow *parent,
 695                          const wxArrayString& messages,
 696                          const wxArrayInt& severity,
 697                          const wxArrayLong& times,
 698                          const wxString& caption,
 699                          long style)
 700            : wxDialog(parent, -1, caption,
 701                       wxDefaultPosition, wxDefaultSize,
 702                       wxDEFAULT_DIALOG_STYLE | wxRESIZE_BORDER)
 703 {
 704     if ( ms_details.IsEmpty() )
 705     {
 706         // ensure that we won't loop here if wxGetTranslation()
 707         // happens to pop up a Log message while translating this :-)
 708         ms_details = wxTRANSLATE("&Details");
 709         ms_details = wxGetTranslation(ms_details);
 710     }
 711
 712     size_t count = messages.GetCount();
 713     m_messages.Alloc(count);
 714     m_severity.Alloc(count);
 715     m_times.Alloc(count);
 716
 717     for ( size_t n = 0; n < count; n++ )
 718     {
 719         wxString msg = messages[n];
 720         do
 721         {
 722             m_messages.Add(msg.BeforeFirst(_T('\n')));
 723             msg = msg.AfterFirst(_T('\n'));
 724
 725             m_severity.Add(severity[n]);
 726             m_times.Add(times[n]);
 727         }
 728         while ( !!msg );
 729     }
 730
 731     m_showingDetails = FALSE; // not initially
 732     m_listctrl = (wxListCtrl *)NULL;
 733
 734 #if wxUSE_STATLINE
 735     m_statline = (wxStaticLine *)NULL;
 736 #endif // wxUSE_STATLINE
 737
 738 #if wxUSE_FILE
 739     m_btnSave = (wxButton *)NULL;
 740 #endif // wxUSE_FILE
 741
 742     // create the controls which are always shown and layout them: we use
 743     // sizers even though our window is not resizeable to calculate the size of
 744     // the dialog properly
 745     wxBoxSizer *sizerTop = new wxBoxSizer(wxVERTICAL);
 746     wxBoxSizer *sizerButtons = new wxBoxSizer(wxVERTICAL);
 747     wxBoxSizer *sizerAll = new wxBoxSizer(wxHORIZONTAL);
 748
 749     // this "Ok" button has wxID_CANCEL id - not very logical, but this allows
 750     // to close the log dialog with <Esc> which wouldn't work otherwise (as it
 751     // translates into click on cancel button)
 752     wxButton *btnOk = new wxButton(this, wxID_CANCEL, _("OK"));
 753     sizerButtons->Add(btnOk, 0, wxCENTRE | wxBOTTOM, MARGIN/2);
 754     m_btnDetails = new wxButton(this, wxID_MORE, ms_details + EXPAND_SUFFIX);
 755     sizerButtons->Add(m_btnDetails, 0, wxCENTRE | wxTOP, MARGIN/2 - 1);
 756
 757 #ifndef __WIN16__
 758     wxBitmap bitmap;
 759     switch ( style & wxICON_MASK )
 760     {
 761         case wxICON_ERROR:
 762             bitmap = wxArtProvider::GetIcon(wxART_ERROR, wxART_MESSAGE_BOX);
 763 #ifdef __WXPM__
 764             bitmap.SetId(wxICON_SMALL_ERROR);
 765 #endif
 766             break;
 767
 768         case wxICON_INFORMATION:
 769             bitmap = wxArtProvider::GetIcon(wxART_INFORMATION, wxART_MESSAGE_BOX);
 770 #ifdef __WXPM__
 771             bitmap.SetId(wxICON_SMALL_INFO);
 772 #endif
 773             break;
 774
 775         case wxICON_WARNING:
 776             bitmap = wxArtProvider::GetIcon(wxART_WARNING, wxART_MESSAGE_BOX);
 777 #ifdef __WXPM__
 778             bitmap.SetId(wxICON_SMALL_WARNING);
 779 #endif
 780             break;
 781
 782         default:
 783             wxFAIL_MSG(_T("incorrect log style"));
 784     }
 785     sizerAll->Add(new wxStaticBitmap(this, -1, bitmap), 0);
 786 #endif // !Win16
 787
 788     const wxString& message = messages.Last();
 789     sizerAll->Add(CreateTextSizer(message), 1,
 790                   wxALIGN_CENTRE_VERTICAL | wxLEFT | wxRIGHT, MARGIN);
 791     sizerAll->Add(sizerButtons, 0, wxALIGN_RIGHT | wxLEFT, MARGIN);
 792
 793     sizerTop->Add(sizerAll, 0, wxALL | wxEXPAND, MARGIN);
 794
 795     SetAutoLayout(TRUE);
 796     SetSizer(sizerTop);
 797
 798     // see comments in OnDetails()
 799     //
 800     // Note: Doing this, this way, triggered a nasty bug in
 801     //       wxTopLevelWindowGTK::GtkOnSize which took -1 literally once
 802     //       either of maxWidth or maxHeight was set.  This symptom has been
 803     //       fixed there, but it is a problem that remains as long as we allow
 804     //       unchecked access to the internal size members.  We really need to
 805     //       encapuslate window sizes more cleanly and make it clear when -1 will
 806     //       be substituted and when it will not.
 807
 808     wxSize size = sizerTop->Fit(this);
 809     m_maxHeight = size.y;
 810     SetSizeHints(size.x, size.y, m_maxWidth, m_maxHeight);
 811
 812     btnOk->SetFocus();
 813
 814     // this can't happen any more as we don't use this dialog in this case
 815 #if 0
 816     if ( count == 1 )
 817     {
 818         // no details... it's easier to disable a button than to change the
 819         // dialog layout depending on whether we have details or not
 820         m_btnDetails->Disable();
 821     }
 822 #endif // 0
 823
 824     Centre();
 825 }
 826
 827 void wxLogDialog::CreateDetailsControls()
 828 {
 829     // create the save button and separator line if possible
 830 #if wxUSE_FILE
 831     m_btnSave = new wxButton(this, wxID_SAVE, _("&Save..."));
 832 #endif // wxUSE_FILE
 833
 834 #if wxUSE_STATLINE
 835     m_statline = new wxStaticLine(this, -1);
 836 #endif // wxUSE_STATLINE
 837
 838     // create the list ctrl now
 839     m_listctrl = new wxListCtrl(this, -1,
 840                                 wxDefaultPosition, wxDefaultSize,
 841                                 wxSUNKEN_BORDER |
 842                                 wxLC_REPORT |
 843                                 wxLC_NO_HEADER |
 844                                 wxLC_SINGLE_SEL);
 845
 846     // no need to translate these strings as they're not shown to the
 847     // user anyhow (we use wxLC_NO_HEADER style)
 848     m_listctrl->InsertColumn(0, _T("Message"));
 849     m_listctrl->InsertColumn(1, _T("Time"));
 850
 851     // prepare the imagelist
 852     static const int ICON_SIZE = 16;
 853     wxImageList *imageList = new wxImageList(ICON_SIZE, ICON_SIZE);
 854
 855     // order should be the same as in the switch below!
 856     static const wxChar* icons[] =
 857     {
 858         wxART_ERROR,
 859         wxART_WARNING,
 860         wxART_INFORMATION
 861     };
 862
 863     bool loadedIcons = TRUE;
 864
 865 #ifndef __WIN16__
 866     for ( size_t icon = 0; icon < WXSIZEOF(icons); icon++ )
 867     {
 868         wxBitmap bmp = wxArtProvider::GetBitmap(icons[icon], wxART_MESSAGE_BOX,
 869                                                 wxSize(ICON_SIZE, ICON_SIZE));
 870
 871         // This may very well fail if there are insufficient colours available.
 872         // Degrade gracefully.
 873         if ( !bmp.Ok() )
 874         {
 875             loadedIcons = FALSE;
 876
 877             break;
 878         }
 879
 880         imageList->Add(bmp);
 881     }
 882
 883     m_listctrl->SetImageList(imageList, wxIMAGE_LIST_SMALL);
 884 #endif // !Win16
 885
 886     // and fill it
 887     wxString fmt = wxLog::GetTimestamp();
 888     if ( !fmt )
 889     {
 890         // default format
 891         fmt = _T("%c");
 892     }
 893
 894     size_t count = m_messages.GetCount();
 895     for ( size_t n = 0; n < count; n++ )
 896     {
 897         int image;
 898
 899 #ifndef __WIN16__
 900         if ( loadedIcons )
 901         {
 902             switch ( m_severity[n] )
 903             {
 904                 case wxLOG_Error:
 905                     image = 0;
 906                     break;
 907
 908                 case wxLOG_Warning:
 909                     image = 1;
 910                     break;
 911
 912                 default:
 913                     image = 2;
 914             }
 915         }
 916         else // failed to load images
 917 #endif // !Win16
 918         {
 919             image = -1;
 920         }
 921
 922         m_listctrl->InsertItem(n, m_messages[n], image);
 923         m_listctrl->SetItem(n, 1, TimeStamp(fmt, (time_t)m_times[n]));
 924     }
 925
 926     // let the columns size themselves
 927     m_listctrl->SetColumnWidth(0, wxLIST_AUTOSIZE);
 928     m_listctrl->SetColumnWidth(1, wxLIST_AUTOSIZE);
 929
 930     // calculate an approximately nice height for the listctrl
 931     int height = GetCharHeight()*(count + 4);
 932
 933     // but check that the dialog won't fall fown from the screen
 934     //
 935     // we use GetMinHeight() to get the height of the dialog part without the
 936     // details and we consider that the "Save" button below and the separator
 937     // line (and the margins around it) take about as much, hence double it
 938     int heightMax = wxGetDisplaySize().y - GetPosition().y - 2*GetMinHeight();
 939
 940     // we should leave a margin
 941     heightMax *= 9;
 942     heightMax /= 10;
 943
 944     m_listctrl->SetSize(-1, wxMin(height, heightMax));
 945 }
 946
 947 void wxLogDialog::OnListSelect(wxListEvent& event)
 948 {
 949     // we can't just disable the control because this looks ugly under Windows
 950     // (wrong bg colour, no scrolling...), but we still want to disable
 951     // selecting items - it makes no sense here
 952     m_listctrl->SetItemState(event.GetIndex(), 0, wxLIST_STATE_SELECTED);
 953 }
 954
 955 void wxLogDialog::OnOk(wxCommandEvent& WXUNUSED(event))
 956 {
 957     EndModal(wxID_OK);
 958 }
 959
 960 #if wxUSE_FILE
 961
 962 void wxLogDialog::OnSave(wxCommandEvent& WXUNUSED(event))
 963 {
 964 #if wxUSE_FILEDLG
 965     wxFile file;
 966     int rc = OpenLogFile(file);
 967     if ( rc == -1 )
 968     {
 969         // cancelled
 970         return;
 971     }
 972
 973     bool ok = rc != 0;
 974
 975     wxString fmt = wxLog::GetTimestamp();
 976     if ( !fmt )
 977     {
 978         // default format
 979         fmt = _T("%c");
 980     }
 981
 982     size_t count = m_messages.GetCount();
 983     for ( size_t n = 0; ok && (n < count); n++ )
 984     {
 985         wxString line;
 986         line << TimeStamp(fmt, (time_t)m_times[n])
 987              << _T(": ")
 988              << m_messages[n]
 989              << wxTextFile::GetEOL();
 990
 991         ok = file.Write(line);
 992     }
 993
 994     if ( ok )
 995         ok = file.Close();
 996
 997     if ( !ok )
 998         wxLogError(_("Can't save log contents to file."));
 999 #endif // wxUSE_FILEDLG
1000 }
1001
1002 #endif // wxUSE_FILE
1003
1004 void wxLogDialog::OnDetails(wxCommandEvent& WXUNUSED(event))
1005 {
1006     wxSizer *sizer = GetSizer();
1007
1008     if ( m_showingDetails )
1009     {
1010         m_btnDetails->SetLabel(ms_details + EXPAND_SUFFIX);
1011
1012         sizer->Detach( m_listctrl );
1013
1014 #if wxUSE_STATLINE
1015         sizer->Detach( m_statline );
1016 #endif // wxUSE_STATLINE
1017
1018 #if wxUSE_FILE
1019         sizer->Detach( m_btnSave );
1020 #endif // wxUSE_FILE
1021     }
1022     else // show details now
1023     {
1024         m_btnDetails->SetLabel(wxString(_T("<< ")) + ms_details);
1025
1026         if ( !m_listctrl )
1027         {
1028             CreateDetailsControls();
1029         }
1030
1031 #if wxUSE_STATLINE
1032         sizer->Add(m_statline, 0, wxEXPAND | (wxALL & ~wxTOP), MARGIN);
1033 #endif // wxUSE_STATLINE
1034
1035         sizer->Add(m_listctrl, 1, wxEXPAND | (wxALL & ~wxTOP), MARGIN);
1036
1037         // VZ: this doesn't work as this becomes the initial (and not only
1038         //     minimal) listctrl height as well - why?
1039 #if 0
1040         // allow the user to make the dialog shorter than its initial height -
1041         // without this it wouldn't work as the list ctrl would have been
1042         // incompressible
1043         sizer->SetItemMinSize(m_listctrl, 100, 3*GetCharHeight());
1044 #endif // 0
1045
1046 #if wxUSE_FILE
1047         sizer->Add(m_btnSave, 0, wxALIGN_RIGHT | (wxALL & ~wxTOP), MARGIN);
1048 #endif // wxUSE_FILE
1049     }
1050
1051     m_showingDetails = !m_showingDetails;
1052
1053     // in any case, our size changed - relayout everything and set new hints
1054     // ---------------------------------------------------------------------
1055
1056     // we have to reset min size constraints or Fit() would never reduce the
1057     // dialog size when collapsing it and we have to reset max constraint
1058     // because it wouldn't expand it otherwise
1059
1060     m_minHeight =
1061     m_maxHeight = -1;
1062
1063     // wxSizer::FitSize() is private, otherwise we might use it directly...
1064     wxSize sizeTotal = GetSize(),
1065            sizeClient = GetClientSize();
1066
1067     wxSize size = sizer->GetMinSize();
1068     size.x += sizeTotal.x - sizeClient.x;
1069     size.y += sizeTotal.y - sizeClient.y;
1070
1071     // we don't want to allow expanding the dialog in vertical direction as
1072     // this would show the "hidden" details but we can resize the dialog
1073     // vertically while the details are shown
1074     if ( !m_showingDetails )
1075         m_maxHeight = size.y;
1076
1077     SetSizeHints(size.x, size.y, m_maxWidth, m_maxHeight);
1078
1079     // don't change the width when expanding/collapsing
1080     SetSize(-1, size.y);
1081
1082 #ifdef __WXGTK__
1083     // VS: this is neccessary in order to force frame redraw under
1084     // WindowMaker or fvwm2 (and probably other broken WMs).
1085     // Otherwise, detailed list wouldn't be displayed.
1086     Show(TRUE);
1087 #endif // wxGTK
1088 }
1089
1090 wxLogDialog::~wxLogDialog()
1091 {
1092     if ( m_listctrl )
1093     {
1094         delete m_listctrl->GetImageList(wxIMAGE_LIST_SMALL);
1095     }
1096 }
1097
1098 #endif // wxUSE_LOG_DIALOG
1099
1100 #if wxUSE_FILE && wxUSE_FILEDLG
1101
1102 // pass an uninitialized file object, the function will ask the user for the
1103 // filename and try to open it, returns TRUE on success (file was opened),
1104 // FALSE if file couldn't be opened/created and -1 if the file selection
1105 // dialog was cancelled
1106 static int OpenLogFile(wxFile& file, wxString *pFilename)
1107 {
1108     // get the file name
1109     // -----------------
1110     wxString filename = wxSaveFileSelector(wxT("log"), wxT("txt"), wxT("log.txt"));
1111     if ( !filename ) {
1112         // cancelled
1113         return -1;
1114     }
1115
1116     // open file
1117     // ---------
1118     bool bOk;
1119     if ( wxFile::Exists(filename) ) {
1120         bool bAppend = FALSE;
1121         wxString strMsg;
1122         strMsg.Printf(_("Append log to file '%s' (choosing [No] will overwrite it)?"),
1123                       filename.c_str());
1124         switch ( wxMessageBox(strMsg, _("Question"),
1125                               wxICON_QUESTION | wxYES_NO | wxCANCEL) ) {
1126             case wxYES:
1127                 bAppend = TRUE;
1128                 break;
1129
1130             case wxNO:
1131                 bAppend = FALSE;
1132                 break;
1133
1134             case wxCANCEL:
1135                 return -1;
1136
1137             default:
1138                 wxFAIL_MSG(_("invalid message box return value"));
1139         }
1140
1141         if ( bAppend ) {
1142             bOk = file.Open(filename, wxFile::write_append);
1143         }
1144         else {
1145             bOk = file.Create(filename, TRUE /* overwrite */);
1146         }
1147     }
1148     else {
1149         bOk = file.Create(filename);
1150     }
1151
1152     if ( pFilename )
1153         *pFilename = filename;
1154
1155     return bOk;
1156 }
1157
1158 #endif // wxUSE_FILE
1159
1160 #endif // !(wxUSE_LOGGUI || wxUSE_LOGWINDOW)
1161
1162 #if wxUSE_LOG && wxUSE_TEXTCTRL
1163
1164 // ----------------------------------------------------------------------------
1165 // wxLogTextCtrl implementation
1166 // ----------------------------------------------------------------------------
1167
1168 wxLogTextCtrl::wxLogTextCtrl(wxTextCtrl *pTextCtrl)
1169 {
1170     m_pTextCtrl = pTextCtrl;
1171 }
1172
1173 void wxLogTextCtrl::DoLogString(const wxChar *szString, time_t WXUNUSED(t))
1174 {
1175     wxString msg;
1176     TimeStamp(&msg);
1177
1178     msg << szString << wxT('\n');
1179     m_pTextCtrl->AppendText(msg);
1180 }
1181
1182 #endif // wxUSE_LOG && wxUSE_TEXTCTRL
1183