]> git.saurik.com Git - wxWidgets.git/blob - src/common/msgout.cpp
Update compile support for OpenVMS
[wxWidgets.git] / src / common / msgout.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: src/common/msgout.cpp
3 // Purpose: wxMessageOutput implementation
4 // Author: Mattia Barbon
5 // Modified by:
6 // Created: 17.07.02
7 // RCS-ID: $Id$
8 // Copyright: (c) the wxWidgets team
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
11
12 // ============================================================================
13 // declarations
14 // ============================================================================
15
16 // ---------------------------------------------------------------------------
17 // headers
18 // ---------------------------------------------------------------------------
19
20 // For compilers that support precompilation, includes "wx.h".
21 #include "wx/wxprec.h"
22
23 #if defined(__BORLANDC__)
24 #pragma hdrstop
25 #endif
26
27 #ifndef WX_PRECOMP
28 #include "wx/string.h"
29 #include "wx/ffile.h"
30 #include "wx/app.h"
31 #include "wx/intl.h"
32 #include "wx/log.h"
33 #if wxUSE_GUI
34 #include "wx/msgdlg.h"
35 #endif // wxUSE_GUI
36 #endif
37
38 #include "wx/msgout.h"
39 #include "wx/apptrait.h"
40 #include <stdarg.h>
41 #include <stdio.h>
42
43 #if defined(__WINDOWS__)
44 #include "wx/msw/private.h"
45 #endif
46
47 // ===========================================================================
48 // implementation
49 // ===========================================================================
50
51 #if wxUSE_BASE
52
53 // ----------------------------------------------------------------------------
54 // wxMessageOutput
55 // ----------------------------------------------------------------------------
56
57 wxMessageOutput* wxMessageOutput::ms_msgOut = 0;
58
59 wxMessageOutput* wxMessageOutput::Get()
60 {
61 if ( !ms_msgOut && wxTheApp )
62 {
63 ms_msgOut = wxTheApp->GetTraits()->CreateMessageOutput();
64 }
65
66 return ms_msgOut;
67 }
68
69 wxMessageOutput* wxMessageOutput::Set(wxMessageOutput* msgout)
70 {
71 wxMessageOutput* old = ms_msgOut;
72 ms_msgOut = msgout;
73 return old;
74 }
75
76 #if !wxUSE_UTF8_LOCALE_ONLY
77 void wxMessageOutput::DoPrintfWchar(const wxChar *format, ...)
78 {
79 va_list args;
80 va_start(args, format);
81 wxString out;
82
83 out.PrintfV(format, args);
84 va_end(args);
85
86 Output(out);
87 }
88 #endif // !wxUSE_UTF8_LOCALE_ONLY
89
90 #if wxUSE_UNICODE_UTF8
91 void wxMessageOutput::DoPrintfUtf8(const char *format, ...)
92 {
93 va_list args;
94 va_start(args, format);
95 wxString out;
96
97 out.PrintfV(format, args);
98 va_end(args);
99
100 Output(out);
101 }
102 #endif // wxUSE_UNICODE_UTF8
103
104 // ----------------------------------------------------------------------------
105 // wxMessageOutputBest
106 // ----------------------------------------------------------------------------
107
108 void wxMessageOutputBest::Output(const wxString& str)
109 {
110 #ifdef __WINDOWS__
111 // decide whether to use console output or not
112 wxAppTraits * const traits = wxTheApp ? wxTheApp->GetTraits() : NULL;
113 const bool hasStderr = traits ? traits->CanUseStderr() : false;
114
115 if ( !(m_flags & wxMSGOUT_PREFER_MSGBOX) )
116 {
117 if ( hasStderr && traits->WriteToStderr(AppendLineFeedIfNeeded(str)) )
118 return;
119 }
120
121 wxString title;
122 if ( wxTheApp )
123 title = wxTheApp->GetAppDisplayName();
124 else // Use some title to avoid default "Error"
125 title = _("Message");
126
127 ::MessageBox(NULL, str.t_str(), title.t_str(), MB_ICONINFORMATION | MB_OK);
128 #else // !__WINDOWS__
129 // TODO: use the native message box for the other ports too
130 wxMessageOutputStderr::Output(str);
131 #endif // __WINDOWS__/!__WINDOWS__
132 }
133
134 // ----------------------------------------------------------------------------
135 // wxMessageOutputStderr
136 // ----------------------------------------------------------------------------
137
138 wxString wxMessageOutputStderr::AppendLineFeedIfNeeded(const wxString& str)
139 {
140 wxString strLF(str);
141 if ( strLF.empty() || *strLF.rbegin() != '\n' )
142 strLF += '\n';
143
144 return strLF;
145 }
146
147 void wxMessageOutputStderr::Output(const wxString& str)
148 {
149 const wxString strWithLF = AppendLineFeedIfNeeded(str);
150 const wxWX2MBbuf buf = strWithLF.mb_str();
151
152 if ( buf )
153 fprintf(m_fp, "%s", (const char*) buf);
154 else // print at least something
155 fprintf(m_fp, "%s", (const char*) strWithLF.ToAscii());
156
157 fflush(m_fp);
158 }
159
160 // ----------------------------------------------------------------------------
161 // wxMessageOutputDebug
162 // ----------------------------------------------------------------------------
163
164 void wxMessageOutputDebug::Output(const wxString& str)
165 {
166 #if defined(__WXMSW__) && !defined(__WXMICROWIN__)
167 wxString out(AppendLineFeedIfNeeded(str));
168 out.Replace(wxT("\t"), wxT(" "));
169 out.Replace(wxT("\n"), wxT("\r\n"));
170 ::OutputDebugString(out.t_str());
171 #else
172 // TODO: use native debug output function for the other ports too
173 wxMessageOutputStderr::Output(str);
174 #endif // platform
175 }
176
177 // ----------------------------------------------------------------------------
178 // wxMessageOutputLog
179 // ----------------------------------------------------------------------------
180
181 void wxMessageOutputLog::Output(const wxString& str)
182 {
183 wxString out(str);
184
185 out.Replace(wxT("\t"), wxT(" "));
186
187 wxLogMessage(wxT("%s"), out.c_str());
188 }
189
190 #endif // wxUSE_BASE
191
192 // ----------------------------------------------------------------------------
193 // wxMessageOutputMessageBox
194 // ----------------------------------------------------------------------------
195
196 #if wxUSE_GUI && wxUSE_MSGDLG
197
198 extern WXDLLEXPORT_DATA(const char) wxMessageBoxCaptionStr[] = "Message";
199
200 void wxMessageOutputMessageBox::Output(const wxString& str)
201 {
202 wxString out(str);
203
204 // the native MSW msg box understands the TABs, others don't
205 #ifndef __WXMSW__
206 out.Replace(wxT("\t"), wxT(" "));
207 #endif
208
209 wxString title = wxT("wxWidgets") ;
210 if (wxTheApp) title = wxTheApp->GetAppDisplayName();
211
212 ::wxMessageBox(out, title);
213 }
214
215 #endif // wxUSE_GUI