+// ----------------------------------------------------------------------------
+// wxLogDialog
+// ----------------------------------------------------------------------------
+
+#if wxUSE_LOG_DIALOG
+
+static const size_t MARGIN = 10;
+
+wxString wxLogDialog::ms_details;
+
+wxLogDialog::wxLogDialog(wxWindow *parent,
+ const wxArrayString& messages,
+ const wxArrayInt& severity,
+ const wxArrayLong& times,
+ const wxString& caption,
+ long style)
+ : wxDialog(parent, -1, caption,
+ wxDefaultPosition, wxDefaultSize,
+ wxDEFAULT_DIALOG_STYLE | wxRESIZE_BORDER)
+{
+ if ( ms_details.IsEmpty() )
+ {
+ // ensure that we won't loop here if wxGetTranslation()
+ // happens to pop up a Log message while translating this :-)
+ ms_details = wxTRANSLATE("&Details");
+ ms_details = wxGetTranslation(ms_details);
+ }
+
+ size_t count = messages.GetCount();
+ m_messages.Alloc(count);
+ m_severity.Alloc(count);
+ m_times.Alloc(count);
+
+ for ( size_t n = 0; n < count; n++ )
+ {
+ wxString msg = messages[n];
+ do
+ {
+ m_messages.Add(msg.BeforeFirst(_T('\n')));
+ msg = msg.AfterFirst(_T('\n'));
+
+ m_severity.Add(severity[n]);
+ m_times.Add(times[n]);
+ }
+ while ( !!msg );
+ }
+
+ m_showingDetails = FALSE; // not initially
+ m_listctrl = (wxListCtrl *)NULL;
+
+#if wxUSE_STATLINE
+ m_statline = (wxStaticLine *)NULL;
+#endif // wxUSE_STATLINE
+
+#if wxUSE_FILE
+ m_btnSave = (wxButton *)NULL;
+#endif // wxUSE_FILE
+
+ // create the controls which are always shown and layout them: we use
+ // sizers even though our window is not resizeable to calculate the size of
+ // the dialog properly
+ wxBoxSizer *sizerTop = new wxBoxSizer(wxVERTICAL);
+ wxBoxSizer *sizerButtons = new wxBoxSizer(wxVERTICAL);
+ wxBoxSizer *sizerAll = new wxBoxSizer(wxHORIZONTAL);
+
+ // this "Ok" button has wxID_CANCEL id - not very logical, but this allows
+ // to close the log dialog with <Esc> which wouldn't work otherwise (as it
+ // translates into click on cancel button)
+ wxButton *btnOk = new wxButton(this, wxID_CANCEL, _("OK"));
+ sizerButtons->Add(btnOk, 0, wxCENTRE | wxBOTTOM, MARGIN/2);
+ m_btnDetails = new wxButton(this, wxID_MORE, ms_details + _T(" >>"));
+ sizerButtons->Add(m_btnDetails, 0, wxCENTRE | wxTOP, MARGIN/2 - 1);
+
+#ifndef __WIN16__
+ wxIcon icon = wxTheApp->GetStdIcon((int)(style & wxICON_MASK));
+ sizerAll->Add(new wxStaticBitmap(this, -1, icon), 0);
+#endif // !Win16
+
+ const wxString& message = messages.Last();
+ sizerAll->Add(CreateTextSizer(message), 1,
+ wxALIGN_CENTRE_VERTICAL | wxLEFT | wxRIGHT, MARGIN);
+ sizerAll->Add(sizerButtons, 0, wxALIGN_RIGHT | wxLEFT, MARGIN);
+
+ sizerTop->Add(sizerAll, 0, wxALL | wxEXPAND, MARGIN);
+
+ SetAutoLayout(TRUE);
+ SetSizer(sizerTop);
+
+ sizerTop->SetSizeHints(this);
+ sizerTop->Fit(this);
+
+ btnOk->SetFocus();
+
+ // this can't happen any more as we don't use this dialog in this case
+#if 0
+ if ( count == 1 )
+ {
+ // no details... it's easier to disable a button than to change the
+ // dialog layout depending on whether we have details or not
+ m_btnDetails->Disable();
+ }
+#endif // 0
+
+ Centre();
+}
+
+void wxLogDialog::CreateDetailsControls()
+{
+ // create the save button and separator line if possible
+#if wxUSE_FILE
+ m_btnSave = new wxButton(this, wxID_SAVE, _("&Save..."));
+#endif // wxUSE_FILE
+
+#if wxUSE_STATLINE
+ m_statline = new wxStaticLine(this, -1);
+#endif // wxUSE_STATLINE
+
+ // create the list ctrl now
+ m_listctrl = new wxListCtrl(this, -1,
+ wxDefaultPosition, wxDefaultSize,
+ wxSUNKEN_BORDER |
+ wxLC_REPORT |
+ wxLC_NO_HEADER |
+ wxLC_SINGLE_SEL);
+
+ // no need to translate these strings as they're not shown to the
+ // user anyhow (we use wxLC_NO_HEADER style)
+ m_listctrl->InsertColumn(0, _T("Message"));
+ m_listctrl->InsertColumn(1, _T("Time"));
+
+ // prepare the imagelist
+ static const int ICON_SIZE = 16;
+ wxImageList *imageList = new wxImageList(ICON_SIZE, ICON_SIZE);
+
+ // order should be the same as in the switch below!
+ static const int icons[] =
+ {
+ wxICON_ERROR,
+ wxICON_EXCLAMATION,
+ wxICON_INFORMATION
+ };
+
+ bool loadedIcons = TRUE;
+
+#ifndef __WIN16__
+ for ( size_t icon = 0; icon < WXSIZEOF(icons); icon++ )
+ {
+ wxBitmap bmp = wxTheApp->GetStdIcon(icons[icon]);
+
+ // This may very well fail if there are insufficient
+ // colours available. Degrade gracefully.
+
+ if (!bmp.Ok())
+ loadedIcons = FALSE;
+ else
+ imageList->Add(wxImage(bmp).
+ Rescale(ICON_SIZE, ICON_SIZE).
+ ConvertToBitmap());
+ }
+
+ m_listctrl->SetImageList(imageList, wxIMAGE_LIST_SMALL);
+#endif // !Win16
+
+ // and fill it
+ wxString fmt = wxLog::GetTimestamp();
+ if ( !fmt )
+ {
+ // default format
+ fmt = _T("%c");
+ }
+
+ size_t count = m_messages.GetCount();
+ for ( size_t n = 0; n < count; n++ )
+ {
+ int image = -1;
+#ifndef __WIN16__
+ switch ( m_severity[n] )
+ {
+ case wxLOG_Error:
+ image = 0;
+ break;
+
+ case wxLOG_Warning:
+ image = 1;
+ break;
+
+ default:
+ image = 2;
+ }
+#endif // !Win16
+
+ if (!loadedIcons)
+ image = -1;
+
+ if (image > -1)
+ m_listctrl->InsertItem(n, m_messages[n], image);
+ else
+ m_listctrl->InsertItem(n, m_messages[n]);
+
+ m_listctrl->SetItem(n, 1,
+ TimeStamp(fmt, (time_t)m_times[n]));
+ }
+
+ // let the columns size themselves
+ m_listctrl->SetColumnWidth(0, wxLIST_AUTOSIZE);
+ m_listctrl->SetColumnWidth(1, wxLIST_AUTOSIZE);
+
+ // get the approx height of the listctrl
+ wxFont font = GetFont();
+ if ( !font.Ok() )
+ font = *wxSWISS_FONT;
+
+ int y;
+ GetTextExtent(_T("H"), (int*)NULL, &y, (int*)NULL, (int*)NULL, &font);
+ int height = wxMax(y*(count + 3), 100);
+
+ // if the height as computed from list items exceeds, together with the
+ // actual message & controls, the screen, make it smaller
+ int heightMax =
+ (3*wxSystemSettings::GetSystemMetric(wxSYS_SCREEN_Y))/5 - GetSize().y;
+
+ m_listctrl->SetSize(-1, wxMin(height, heightMax));
+}
+
+void wxLogDialog::OnListSelect(wxListEvent& event)
+{
+ // we can't just disable the control because this looks ugly under Windows
+ // (wrong bg colour, no scrolling...), but we still want to disable
+ // selecting items - it makes no sense here
+ m_listctrl->SetItemState(event.GetIndex(), 0, wxLIST_STATE_SELECTED);
+}
+
+void wxLogDialog::OnOk(wxCommandEvent& WXUNUSED(event))
+{
+ EndModal(wxID_OK);
+}
+
+#if wxUSE_FILE
+
+void wxLogDialog::OnSave(wxCommandEvent& WXUNUSED(event))
+{
+#if wxUSE_FILEDLG
+ wxFile file;
+ int rc = OpenLogFile(file);
+ if ( rc == -1 )
+ {
+ // cancelled
+ return;
+ }
+
+ bool ok = rc != 0;
+
+ wxString fmt = wxLog::GetTimestamp();
+ if ( !fmt )
+ {
+ // default format
+ fmt = _T("%c");
+ }
+
+ size_t count = m_messages.GetCount();
+ for ( size_t n = 0; ok && (n < count); n++ )
+ {
+ wxString line;
+ line << TimeStamp(fmt, (time_t)m_times[n])
+ << _T(": ")
+ << m_messages[n]
+ << wxTextFile::GetEOL();
+
+ ok = file.Write(line);
+ }
+
+ if ( ok )
+ ok = file.Close();
+
+ if ( !ok )
+ wxLogError(_("Can't save log contents to file."));
+#endif
+}
+
+#endif // wxUSE_FILE
+
+void wxLogDialog::OnDetails(wxCommandEvent& WXUNUSED(event))
+{
+ wxSizer *sizer = GetSizer();
+
+ if ( m_showingDetails )
+ {
+ m_btnDetails->SetLabel(ms_details + _T(">>"));
+
+ sizer->Remove(m_listctrl);
+
+#if wxUSE_STATLINE
+ sizer->Remove(m_statline);
+#endif // wxUSE_STATLINE
+
+#if wxUSE_FILE
+ sizer->Remove(m_btnSave);
+#endif // wxUSE_FILE
+ }
+ else // show details now
+ {
+ m_btnDetails->SetLabel(wxString(_T("<< ")) + ms_details);
+
+ if ( !m_listctrl )
+ {
+ CreateDetailsControls();
+ }
+
+#if wxUSE_STATLINE
+ sizer->Add(m_statline, 0, wxEXPAND | (wxALL & ~wxTOP), MARGIN);
+#endif // wxUSE_STATLINE
+
+ sizer->Add(m_listctrl, 1, wxEXPAND | (wxALL & ~wxTOP), MARGIN);
+
+#if wxUSE_FILE
+ sizer->Add(m_btnSave, 0, wxALIGN_RIGHT | (wxALL & ~wxTOP), MARGIN);
+#endif // wxUSE_FILE
+ }
+
+ m_showingDetails = !m_showingDetails;
+
+ // in any case, our size changed - update
+ sizer->SetSizeHints(this);
+ sizer->Fit(this);
+
+#ifdef __WXGTK__
+ // VS: this is neccessary in order to force frame redraw under
+ // WindowMaker or fvwm2 (and probably other broken WMs).
+ // Otherwise, detailed list wouldn't be displayed.
+ Show(TRUE);
+#endif // wxGTK
+}
+
+wxLogDialog::~wxLogDialog()
+{
+ if ( m_listctrl )
+ {
+ delete m_listctrl->GetImageList(wxIMAGE_LIST_SMALL);
+ }
+}
+
+#endif // wxUSE_LOG_DIALOG
+
+#if wxUSE_FILE && wxUSE_FILEDLG
+
+// pass an uninitialized file object, the function will ask the user for the
+// filename and try to open it, returns TRUE on success (file was opened),
+// FALSE if file couldn't be opened/created and -1 if the file selection
+// dialog was cancelled
+static int OpenLogFile(wxFile& file, wxString *pFilename)
+{
+ // get the file name
+ // -----------------
+ wxString filename = wxSaveFileSelector(wxT("log"), wxT("txt"), wxT("log.txt"));
+ if ( !filename ) {
+ // cancelled
+ return -1;
+ }
+
+ // open file
+ // ---------
+ bool bOk = FALSE;
+ if ( wxFile::Exists(filename) ) {
+ bool bAppend = FALSE;
+ wxString strMsg;
+ strMsg.Printf(_("Append log to file '%s' (choosing [No] will overwrite it)?"),
+ filename.c_str());
+ switch ( wxMessageBox(strMsg, _("Question"),
+ wxICON_QUESTION | wxYES_NO | wxCANCEL) ) {
+ case wxYES:
+ bAppend = TRUE;
+ break;
+
+ case wxNO:
+ bAppend = FALSE;
+ break;
+
+ case wxCANCEL:
+ return -1;
+
+ default:
+ wxFAIL_MSG(_("invalid message box return value"));
+ }
+
+ if ( bAppend ) {
+ bOk = file.Open(filename, wxFile::write_append);
+ }
+ else {
+ bOk = file.Create(filename, TRUE /* overwrite */);
+ }
+ }
+ else {
+ bOk = file.Create(filename);
+ }
+
+ if ( pFilename )
+ *pFilename = filename;
+
+ return bOk;
+}
+
+#endif // wxUSE_FILE
+
+#endif // !(wxUSE_LOGGUI || wxUSE_LOGWINDOW)
+
+#if wxUSE_TEXTCTRL
+
+// ----------------------------------------------------------------------------
+// wxLogTextCtrl implementation
+// ----------------------------------------------------------------------------
+
+wxLogTextCtrl::wxLogTextCtrl(wxTextCtrl *pTextCtrl)
+{
+ m_pTextCtrl = pTextCtrl;
+}
+
+void wxLogTextCtrl::DoLogString(const wxChar *szString, time_t WXUNUSED(t))
+{
+ wxString msg;
+ TimeStamp(&msg);
+
+#if defined(__WXMAC__) && !defined(__DARWIN__)
+ // VZ: this is a bug in wxMac, it *must* accept '\n' as new line, the
+ // translation must be done in wxTextCtrl, not here! (FIXME)
+ msg << szString << wxT('\r');
+#else
+ msg << szString << wxT('\n');
+#endif
+
+ m_pTextCtrl->AppendText(msg);
+}
+
+#endif // wxUSE_TEXTCTRL
+