]>
Commit | Line | Data |
---|---|---|
1 | ///////////////////////////////////////////////////////////////////////////// | |
2 | // Name: client.cpp | |
3 | // Purpose: DDE sample: client | |
4 | // Author: Julian Smart | |
5 | // Modified by: Jurgen Doornik | |
6 | // Created: 25/01/99 | |
7 | // RCS-ID: $Id$ | |
8 | // Copyright: (c) Julian Smart | |
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 | #ifdef __BORLANDC__ | |
24 | #pragma hdrstop | |
25 | #endif | |
26 | ||
27 | #ifndef WX_PRECOMP | |
28 | #include "wx/wx.h" | |
29 | #endif | |
30 | ||
31 | // Settings common to both executables: determines whether | |
32 | // we're using TCP/IP or real DDE. | |
33 | #include "ipcsetup.h" | |
34 | ||
35 | #if defined(__WXGTK__) || defined(__WXX11__) || defined(__WXMOTIF__) || defined(__WXMAC__) | |
36 | #include "mondrian.xpm" | |
37 | #endif | |
38 | ||
39 | #include "wx/datetime.h" | |
40 | #include "client.h" | |
41 | ||
42 | // ---------------------------------------------------------------------------- | |
43 | // wxWin macros | |
44 | // ---------------------------------------------------------------------------- | |
45 | ||
46 | IMPLEMENT_APP(MyApp) | |
47 | ||
48 | BEGIN_EVENT_TABLE(MyFrame, wxFrame) | |
49 | EVT_MENU(wxID_EXIT, MyFrame::OnExit) | |
50 | EVT_CLOSE( MyFrame::OnClose ) | |
51 | EVT_BUTTON( ID_START, MyFrame::OnStart ) | |
52 | EVT_CHOICE( ID_SERVERNAME, MyFrame::OnServername ) | |
53 | EVT_CHOICE( ID_HOSTNAME, MyFrame::OnHostname ) | |
54 | EVT_CHOICE( ID_TOPIC, MyFrame::OnTopic ) | |
55 | EVT_BUTTON( ID_DISCONNECT, MyFrame::OnDisconnect ) | |
56 | EVT_BUTTON( ID_STARTADVISE, MyFrame::OnStartAdvise ) | |
57 | EVT_BUTTON( ID_STOPADVISE, MyFrame::OnStopAdvise ) | |
58 | EVT_BUTTON( ID_POKE, MyFrame::OnPoke ) | |
59 | EVT_BUTTON( ID_EXECUTE, MyFrame::OnExecute ) | |
60 | EVT_BUTTON( ID_REQUEST, MyFrame::OnRequest ) | |
61 | END_EVENT_TABLE() | |
62 | ||
63 | // ---------------------------------------------------------------------------- | |
64 | // globals | |
65 | // ---------------------------------------------------------------------------- | |
66 | ||
67 | // ============================================================================ | |
68 | // implementation | |
69 | // ============================================================================ | |
70 | ||
71 | // ---------------------------------------------------------------------------- | |
72 | // MyApp | |
73 | // ---------------------------------------------------------------------------- | |
74 | ||
75 | // The `main program' equivalent, creating the windows and returning the | |
76 | // main frame | |
77 | bool MyApp::OnInit() | |
78 | { | |
79 | if ( !wxApp::OnInit() ) | |
80 | return false; | |
81 | ||
82 | // Create the main frame window | |
83 | m_frame = new MyFrame(NULL, _T("Client")); | |
84 | m_frame->Show(true); | |
85 | ||
86 | return true; | |
87 | } | |
88 | ||
89 | int MyApp::OnExit() | |
90 | { | |
91 | ||
92 | return 0; | |
93 | } | |
94 | ||
95 | // Define my frame constructor | |
96 | MyFrame::MyFrame(wxFrame *frame, const wxString& title) | |
97 | : wxFrame(frame, wxID_ANY, title, wxDefaultPosition, wxSize(400, 300)) | |
98 | { | |
99 | // Give it an icon | |
100 | SetIcon(wxICON(mondrian)); | |
101 | ||
102 | // Make a menubar | |
103 | wxMenu *file_menu = new wxMenu; | |
104 | ||
105 | file_menu->Append(wxID_EXIT, _T("&Quit\tCtrl-Q")); | |
106 | ||
107 | wxMenuBar *menu_bar = new wxMenuBar; | |
108 | ||
109 | menu_bar->Append(file_menu, _T("&File")); | |
110 | ||
111 | // Associate the menu bar with the frame | |
112 | SetMenuBar(menu_bar); | |
113 | ||
114 | // set a dialog background | |
115 | SetBackgroundColour(wxSystemSettings::GetColour(wxSYS_COLOUR_BTNFACE)); | |
116 | ||
117 | // add the controls to the frame | |
118 | wxString strs4[] = | |
119 | { | |
120 | IPC_SERVICE, _T("...") | |
121 | }; | |
122 | wxString strs5[] = | |
123 | { | |
124 | IPC_HOST, _T("...") | |
125 | }; | |
126 | wxString strs6[] = | |
127 | { | |
128 | IPC_TOPIC, _T("...") | |
129 | }; | |
130 | ||
131 | wxBoxSizer *item0 = new wxBoxSizer( wxVERTICAL ); | |
132 | ||
133 | wxBoxSizer *item1 = new wxBoxSizer( wxHORIZONTAL ); | |
134 | ||
135 | wxGridSizer *item2 = new wxGridSizer( 4, 0, 0 ); | |
136 | ||
137 | wxButton *item3 = new wxButton( this, ID_START, wxT("Connect to server"), wxDefaultPosition, wxDefaultSize, 0 ); | |
138 | item2->Add( item3, 0, wxGROW|wxALIGN_CENTER_VERTICAL|wxALL, 5 ); | |
139 | ||
140 | wxChoice *item5 = new wxChoice( this, ID_HOSTNAME, wxDefaultPosition, wxSize(100,-1), 2, strs5, 0 ); | |
141 | item2->Add( item5, 0, wxALIGN_CENTER|wxALL, 5 ); | |
142 | ||
143 | wxChoice *item4 = new wxChoice( this, ID_SERVERNAME, wxDefaultPosition, wxSize(100,-1), 2, strs4, 0 ); | |
144 | item2->Add( item4, 0, wxGROW|wxALIGN_CENTER_VERTICAL|wxALL, 5 ); | |
145 | ||
146 | wxChoice *item6 = new wxChoice( this, ID_TOPIC, wxDefaultPosition, wxSize(100,-1), 2, strs6, 0 ); | |
147 | item2->Add( item6, 0, wxALIGN_CENTER|wxALL, 5 ); | |
148 | ||
149 | wxButton *item7 = new wxButton( this, ID_DISCONNECT, wxT("Disconnect "), wxDefaultPosition, wxDefaultSize, 0 ); | |
150 | item2->Add( item7, 0, wxGROW|wxALIGN_CENTER_VERTICAL|wxALL, 5 ); | |
151 | ||
152 | item2->Add( 20, 20, 0, wxALIGN_CENTER|wxALL, 5 ); | |
153 | ||
154 | item2->Add( 20, 20, 0, wxALIGN_CENTER|wxALL, 5 ); | |
155 | ||
156 | item2->Add( 20, 20, 0, wxALIGN_CENTER|wxALL, 5 ); | |
157 | ||
158 | wxButton *item8 = new wxButton( this, ID_STARTADVISE, wxT("StartAdvise"), wxDefaultPosition, wxDefaultSize, 0 ); | |
159 | item2->Add( item8, 0, wxGROW|wxALIGN_CENTER_VERTICAL|wxALL, 5 ); | |
160 | ||
161 | wxButton *item9 = new wxButton( this, ID_STOPADVISE, wxT("StopAdvise"), wxDefaultPosition, wxDefaultSize, 0 ); | |
162 | item2->Add( item9, 0, wxGROW|wxALIGN_CENTER_VERTICAL|wxALL, 5 ); | |
163 | ||
164 | item2->Add( 20, 20, 0, wxALIGN_CENTER|wxALL, 5 ); | |
165 | ||
166 | item2->Add( 20, 20, 0, wxALIGN_CENTER|wxALL, 5 ); | |
167 | ||
168 | wxButton *item10 = new wxButton( this, ID_EXECUTE, wxT("Execute"), wxDefaultPosition, wxDefaultSize, 0 ); | |
169 | item2->Add( item10, 0, wxGROW|wxALIGN_CENTER_VERTICAL|wxALL, 5 ); | |
170 | ||
171 | item2->Add( 20, 20, 0, wxALIGN_CENTER|wxALL, 5 ); | |
172 | ||
173 | item2->Add( 20, 20, 0, wxALIGN_CENTER|wxALL, 5 ); | |
174 | ||
175 | item2->Add( 20, 20, 0, wxALIGN_CENTER|wxALL, 5 ); | |
176 | ||
177 | wxButton *item11 = new wxButton( this, ID_POKE, wxT("Poke"), wxDefaultPosition, wxDefaultSize, 0 ); | |
178 | item2->Add( item11, 0, wxGROW|wxALIGN_CENTER_VERTICAL|wxALL, 5 ); | |
179 | ||
180 | item2->Add( 20, 20, 0, wxALIGN_CENTER|wxALL, 5 ); | |
181 | ||
182 | item2->Add( 20, 20, 0, wxALIGN_CENTER|wxALL, 5 ); | |
183 | ||
184 | item2->Add( 20, 20, 0, wxALIGN_CENTER|wxALL, 5 ); | |
185 | ||
186 | wxButton *item12 = new wxButton( this, ID_REQUEST, wxT("Request"), wxDefaultPosition, wxDefaultSize, 0 ); | |
187 | item2->Add( item12, 0, wxGROW|wxALIGN_CENTER_VERTICAL|wxALL, 5 ); | |
188 | ||
189 | item2->Add( 20, 20, 0, wxALIGN_CENTER|wxALL, 5 ); | |
190 | ||
191 | item1->Add( item2, 1, wxALIGN_CENTER|wxALL, 5 ); | |
192 | ||
193 | item0->Add( item1, 0, wxGROW|wxALIGN_CENTER_VERTICAL|wxALL, 5 ); | |
194 | ||
195 | wxStaticBox *item14 = new wxStaticBox( this, -1, wxT("Client log") ); | |
196 | wxStaticBoxSizer *item13 = new wxStaticBoxSizer( item14, wxVERTICAL ); | |
197 | ||
198 | wxTextCtrl *item15 = new wxTextCtrl( this, ID_LOG, wxEmptyString, wxDefaultPosition, wxSize(500,140), wxTE_MULTILINE ); | |
199 | item13->Add( item15, 1, wxGROW|wxALIGN_CENTER_VERTICAL|wxALL, 5 ); | |
200 | ||
201 | item0->Add( item13, 0, wxGROW|wxALIGN_CENTER_VERTICAL|wxALL, 5 ); | |
202 | ||
203 | this->SetSizer( item0 ); | |
204 | item0->SetSizeHints( this ); | |
205 | ||
206 | // status | |
207 | m_client = NULL; | |
208 | GetServername()->SetSelection(0); | |
209 | GetHostname()->SetSelection(0); | |
210 | GetTopic()->SetSelection(0); | |
211 | wxLogTextCtrl *logWindow = new wxLogTextCtrl(GetLog()); | |
212 | delete wxLog::SetActiveTarget(logWindow); | |
213 | wxLogMessage(_T("Click on Connect to connect to the server")); | |
214 | EnableControls(); | |
215 | } | |
216 | ||
217 | void MyFrame::EnableControls() | |
218 | { | |
219 | GetStart()->Enable(m_client == NULL); | |
220 | GetServername()->Enable(m_client == NULL); | |
221 | GetHostname()->Enable(m_client == NULL); | |
222 | GetTopic()->Enable(m_client == NULL); | |
223 | ||
224 | const bool isConnected = (m_client != NULL && m_client->IsConnected()); | |
225 | GetDisconnect()->Enable(m_client != NULL && isConnected); | |
226 | GetStartAdvise()->Enable(m_client != NULL && isConnected); | |
227 | GetStopAdvise()->Enable(m_client != NULL && isConnected); | |
228 | GetExecute()->Enable(m_client != NULL && isConnected); | |
229 | GetPoke()->Enable(m_client != NULL && isConnected); | |
230 | GetRequest()->Enable(m_client != NULL && isConnected); | |
231 | } | |
232 | ||
233 | void MyFrame::OnClose(wxCloseEvent& event) | |
234 | { | |
235 | if (m_client) | |
236 | { | |
237 | delete m_client; | |
238 | m_client = NULL; | |
239 | } | |
240 | event.Skip(); | |
241 | } | |
242 | ||
243 | void MyFrame::OnExit(wxCommandEvent& WXUNUSED(event)) | |
244 | { | |
245 | Close(); | |
246 | } | |
247 | ||
248 | void MyFrame::OnStart(wxCommandEvent& WXUNUSED(event)) | |
249 | { | |
250 | // Connect to the client | |
251 | wxString servername = GetServername()->GetStringSelection(); | |
252 | wxString hostname = GetHostname()->GetStringSelection(); | |
253 | wxString topic = GetTopic()->GetStringSelection(); | |
254 | ||
255 | m_client = new MyClient; | |
256 | bool retval = m_client->Connect(hostname, servername, topic); | |
257 | ||
258 | wxLogMessage(_T("Client host=\"%s\" port=\"%s\" topic=\"%s\" %s"), | |
259 | hostname.c_str(), servername.c_str(), topic.c_str(), | |
260 | retval ? _T("connected") : _T("failed to connect")); | |
261 | ||
262 | if (!retval) | |
263 | { | |
264 | delete m_client; | |
265 | m_client = NULL; | |
266 | } | |
267 | EnableControls(); | |
268 | } | |
269 | ||
270 | void MyFrame::OnServername( wxCommandEvent& WXUNUSED(event) ) | |
271 | { | |
272 | if (GetServername()->GetStringSelection() == _T("...")) | |
273 | { | |
274 | wxString s = wxGetTextFromUser(_T("Specify the name of the server"), | |
275 | _T("Server Name"), wxEmptyString, this); | |
276 | if (!s.IsEmpty() && s != IPC_SERVICE) | |
277 | { | |
278 | GetServername()->Insert(s, 0); | |
279 | GetServername()->SetSelection(0); | |
280 | } | |
281 | } | |
282 | } | |
283 | ||
284 | void MyFrame::OnHostname( wxCommandEvent& WXUNUSED(event) ) | |
285 | { | |
286 | if (GetHostname()->GetStringSelection() == _T("...")) | |
287 | { | |
288 | wxString s = wxGetTextFromUser(_T("Specify the name of the host (ignored under DDE)"), | |
289 | _T("Host Name"), wxEmptyString, this); | |
290 | if (!s.IsEmpty() && s != IPC_HOST) | |
291 | { | |
292 | GetHostname()->Insert(s, 0); | |
293 | GetHostname()->SetSelection(0); | |
294 | } | |
295 | } | |
296 | } | |
297 | ||
298 | void MyFrame::OnTopic( wxCommandEvent& WXUNUSED(event) ) | |
299 | { | |
300 | if (GetTopic()->GetStringSelection() == _T("...")) | |
301 | { | |
302 | wxString s = wxGetTextFromUser(_T("Specify the name of the topic"), | |
303 | _T("Topic Name"), wxEmptyString, this); | |
304 | if (!s.IsEmpty() && s != IPC_TOPIC) | |
305 | { | |
306 | GetTopic()->Insert(s, 0); | |
307 | GetTopic()->SetSelection(0); | |
308 | } | |
309 | } | |
310 | } | |
311 | ||
312 | void MyFrame::OnDisconnect(wxCommandEvent& WXUNUSED(event)) | |
313 | { | |
314 | Disconnect(); | |
315 | } | |
316 | ||
317 | void MyFrame::Disconnect() | |
318 | { | |
319 | delete m_client; | |
320 | m_client = NULL; | |
321 | EnableControls(); | |
322 | } | |
323 | ||
324 | void MyFrame::OnStartAdvise(wxCommandEvent& WXUNUSED(event)) | |
325 | { | |
326 | m_client->GetConnection()->StartAdvise(_T("something")); | |
327 | } | |
328 | ||
329 | void MyFrame::OnStopAdvise(wxCommandEvent& WXUNUSED(event)) | |
330 | { | |
331 | m_client->GetConnection()->StopAdvise(_T("something")); | |
332 | } | |
333 | ||
334 | void MyFrame::OnExecute(wxCommandEvent& WXUNUSED(event)) | |
335 | { | |
336 | if (m_client->IsConnected()) | |
337 | { | |
338 | wxString s = _T("Date"); | |
339 | ||
340 | m_client->GetConnection()->Execute(s); | |
341 | m_client->GetConnection()->Execute((const char *)s.c_str(), s.length() + 1); | |
342 | char bytes[3]; | |
343 | bytes[0] = '1'; | |
344 | bytes[1] = '2'; | |
345 | bytes[2] = '3'; | |
346 | m_client->GetConnection()->Execute(bytes, WXSIZEOF(bytes)); | |
347 | } | |
348 | } | |
349 | ||
350 | void MyFrame::OnPoke(wxCommandEvent& WXUNUSED(event)) | |
351 | { | |
352 | if (m_client->IsConnected()) | |
353 | { | |
354 | wxString s = wxDateTime::Now().Format(); | |
355 | m_client->GetConnection()->Poke(_T("Date"), s); | |
356 | s = wxDateTime::Now().FormatTime() + _T(" ") + wxDateTime::Now().FormatDate(); | |
357 | m_client->GetConnection()->Poke(_T("Date"), (const char *)s.c_str(), s.length() + 1); | |
358 | char bytes[3]; | |
359 | bytes[0] = '1'; bytes[1] = '2'; bytes[2] = '3'; | |
360 | m_client->GetConnection()->Poke(_T("bytes[3]"), bytes, 3, wxIPC_PRIVATE); | |
361 | } | |
362 | } | |
363 | ||
364 | void MyFrame::OnRequest(wxCommandEvent& WXUNUSED(event)) | |
365 | { | |
366 | if (m_client->IsConnected()) | |
367 | { | |
368 | size_t size; | |
369 | m_client->GetConnection()->Request(_T("Date")); | |
370 | m_client->GetConnection()->Request(_T("Date+len"), &size); | |
371 | m_client->GetConnection()->Request(_T("bytes[3]"), &size, wxIPC_PRIVATE); | |
372 | } | |
373 | } | |
374 | ||
375 | // ---------------------------------------------------------------------------- | |
376 | // MyClient | |
377 | // ---------------------------------------------------------------------------- | |
378 | MyClient::MyClient() : wxClient() | |
379 | { | |
380 | m_connection = NULL; | |
381 | } | |
382 | ||
383 | bool MyClient::Connect(const wxString& sHost, const wxString& sService, const wxString& sTopic) | |
384 | { | |
385 | // suppress the log messages from MakeConnection() | |
386 | wxLogNull nolog; | |
387 | ||
388 | m_connection = (MyConnection *)MakeConnection(sHost, sService, sTopic); | |
389 | return m_connection != NULL; | |
390 | } | |
391 | ||
392 | wxConnectionBase *MyClient::OnMakeConnection() | |
393 | { | |
394 | return new MyConnection; | |
395 | } | |
396 | ||
397 | void MyClient::Disconnect() | |
398 | { | |
399 | if (m_connection) | |
400 | { | |
401 | m_connection->Disconnect(); | |
402 | delete m_connection; | |
403 | m_connection = NULL; | |
404 | wxGetApp().GetFrame()->EnableControls(); | |
405 | wxLogMessage(_T("Client disconnected from server")); | |
406 | } | |
407 | } | |
408 | ||
409 | MyClient::~MyClient() | |
410 | { | |
411 | Disconnect(); | |
412 | } | |
413 | ||
414 | // ---------------------------------------------------------------------------- | |
415 | // MyConnection | |
416 | // ---------------------------------------------------------------------------- | |
417 | ||
418 | bool MyConnection::OnAdvise(const wxString& topic, const wxString& item, const void *data, | |
419 | size_t size, wxIPCFormat format) | |
420 | { | |
421 | Log(_T("OnAdvise"), topic, item, data, size, format); | |
422 | return true; | |
423 | } | |
424 | ||
425 | bool MyConnection::OnDisconnect() | |
426 | { | |
427 | wxLogMessage(_T("OnDisconnect()")); | |
428 | wxGetApp().GetFrame()->Disconnect(); | |
429 | return true; | |
430 | } | |
431 | ||
432 | bool MyConnection::DoExecute(const void *data, size_t size, wxIPCFormat format) | |
433 | { | |
434 | Log(_T("Execute"), wxEmptyString, wxEmptyString, data, size, format); | |
435 | bool retval = wxConnection::DoExecute(data, size, format); | |
436 | if (!retval) | |
437 | wxLogMessage(_T("Execute failed!")); | |
438 | return retval; | |
439 | } | |
440 | ||
441 | const void *MyConnection::Request(const wxString& item, size_t *size, wxIPCFormat format) | |
442 | { | |
443 | const void *data = wxConnection::Request(item, size, format); | |
444 | Log(_T("Request"), wxEmptyString, item, data, size ? *size : wxNO_LEN, format); | |
445 | return data; | |
446 | } | |
447 | ||
448 | bool MyConnection::DoPoke(const wxString& item, const void *data, size_t size, wxIPCFormat format) | |
449 | { | |
450 | Log(_T("Poke"), wxEmptyString, item, data, size, format); | |
451 | return wxConnection::DoPoke(item, data, size, format); | |
452 | } |