]> git.saurik.com Git - wxWidgets.git/blame - samples/ipc/client.cpp
eliminate possibility of configure enabling gnomeprint with GTK3
[wxWidgets.git] / samples / ipc / client.cpp
CommitLineData
7921cf2b
JS
1/////////////////////////////////////////////////////////////////////////////
2// Name: client.cpp
3// Purpose: DDE sample: client
4// Author: Julian Smart
9d860992 5// Modified by: Jurgen Doornik
7921cf2b
JS
6// Created: 25/01/99
7// RCS-ID: $Id$
8// Copyright: (c) Julian Smart
9// Licence: wxWindows licence
10/////////////////////////////////////////////////////////////////////////////
11
4b89c618
VZ
12// ============================================================================
13// declarations
14// ============================================================================
15
16// ----------------------------------------------------------------------------
17// headers
18// ----------------------------------------------------------------------------
19
7921cf2b
JS
20// For compilers that support precompilation, includes "wx.h".
21#include "wx/wxprec.h"
22
23#ifdef __BORLANDC__
4b89c618 24 #pragma hdrstop
7921cf2b
JS
25#endif
26
27#ifndef WX_PRECOMP
4b89c618 28 #include "wx/wx.h"
7921cf2b
JS
29#endif
30
31// Settings common to both executables: determines whether
32// we're using TCP/IP or real DDE.
9d860992 33#include "ipcsetup.h"
7921cf2b 34
9d860992 35#include "wx/datetime.h"
7921cf2b
JS
36#include "client.h"
37
e7092398 38#ifndef wxHAS_IMAGES_IN_RESOURCES
3cb332c1
VZ
39 #include "../sample.xpm"
40#endif
41
4b89c618
VZ
42// ----------------------------------------------------------------------------
43// wxWin macros
44// ----------------------------------------------------------------------------
7921cf2b
JS
45
46IMPLEMENT_APP(MyApp)
47
4b89c618 48BEGIN_EVENT_TABLE(MyFrame, wxFrame)
9d860992
JS
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 )
4b89c618
VZ
61END_EVENT_TABLE()
62
63// ----------------------------------------------------------------------------
64// globals
65// ----------------------------------------------------------------------------
66
4b89c618
VZ
67// ============================================================================
68// implementation
69// ============================================================================
70
71// ----------------------------------------------------------------------------
72// MyApp
73// ----------------------------------------------------------------------------
74
7921cf2b
JS
75// The `main program' equivalent, creating the windows and returning the
76// main frame
77bool MyApp::OnInit()
78{
45e6e6f8
VZ
79 if ( !wxApp::OnInit() )
80 return false;
81
4b89c618 82 // Create the main frame window
9a83f860 83 m_frame = new MyFrame(NULL, wxT("Client"));
9d860992 84 m_frame->Show(true);
b178e0c7 85
b62ca03d 86 return true;
7921cf2b
JS
87}
88
89int MyApp::OnExit()
90{
2f6c54eb 91
7921cf2b
JS
92 return 0;
93}
94
7921cf2b 95// Define my frame constructor
4b89c618 96MyFrame::MyFrame(wxFrame *frame, const wxString& title)
9d860992 97 : wxFrame(frame, wxID_ANY, title, wxDefaultPosition, wxSize(400, 300))
7921cf2b 98{
4b89c618 99 // Give it an icon
3cb332c1 100 SetIcon(wxICON(sample));
4b89c618
VZ
101
102 // Make a menubar
103 wxMenu *file_menu = new wxMenu;
104
9a83f860 105 file_menu->Append(wxID_EXIT, wxT("&Quit\tCtrl-Q"));
4b89c618
VZ
106
107 wxMenuBar *menu_bar = new wxMenuBar;
108
9a83f860 109 menu_bar->Append(file_menu, wxT("&File"));
4b89c618
VZ
110
111 // Associate the menu bar with the frame
112 SetMenuBar(menu_bar);
113
9d860992
JS
114 // set a dialog background
115 SetBackgroundColour(wxSystemSettings::GetColour(wxSYS_COLOUR_BTNFACE));
116
117 // add the controls to the frame
81ba6107 118 wxString strs4[] =
9d860992 119 {
9a83f860 120 IPC_SERVICE, wxT("...")
9d860992 121 };
81ba6107 122 wxString strs5[] =
9d860992 123 {
9a83f860 124 IPC_HOST, wxT("...")
9d860992 125 };
81ba6107 126 wxString strs6[] =
9d860992 127 {
9a83f860 128 IPC_TOPIC, wxT("...")
9d860992
JS
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
81ba6107 198 wxTextCtrl *item15 = new wxTextCtrl( this, ID_LOG, wxEmptyString, wxDefaultPosition, wxSize(500,140), wxTE_MULTILINE );
9d860992
JS
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);
9a83f860 213 wxLogMessage(wxT("Click on Connect to connect to the server"));
81ba6107 214 EnableControls();
9d860992
JS
215}
216
81ba6107 217void MyFrame::EnableControls()
9d860992
JS
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);
b21348b4 223
5e530f02 224 const bool isConnected = (m_client != NULL && m_client->IsConnected());
b21348b4
VZ
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);
9d860992
JS
231}
232
233void MyFrame::OnClose(wxCloseEvent& event)
234{
6e91bf4d
VZ
235 wxDELETE(m_client);
236
9d860992
JS
237 event.Skip();
238}
239
240void MyFrame::OnExit(wxCommandEvent& WXUNUSED(event))
241{
242 Close();
243}
244
245void MyFrame::OnStart(wxCommandEvent& WXUNUSED(event))
246{
247 // Connect to the client
248 wxString servername = GetServername()->GetStringSelection();
249 wxString hostname = GetHostname()->GetStringSelection();
250 wxString topic = GetTopic()->GetStringSelection();
251
252 m_client = new MyClient;
253 bool retval = m_client->Connect(hostname, servername, topic);
254
9a83f860 255 wxLogMessage(wxT("Client host=\"%s\" port=\"%s\" topic=\"%s\" %s"),
9d860992 256 hostname.c_str(), servername.c_str(), topic.c_str(),
9a83f860 257 retval ? wxT("connected") : wxT("failed to connect"));
9d860992
JS
258
259 if (!retval)
260 {
5276b0a5 261 wxDELETE(m_client);
9d860992 262 }
5e530f02 263 EnableControls();
9d860992
JS
264}
265
266void MyFrame::OnServername( wxCommandEvent& WXUNUSED(event) )
267{
9a83f860 268 if (GetServername()->GetStringSelection() == wxT("..."))
9d860992 269 {
9a83f860
VZ
270 wxString s = wxGetTextFromUser(wxT("Specify the name of the server"),
271 wxT("Server Name"), wxEmptyString, this);
9d860992
JS
272 if (!s.IsEmpty() && s != IPC_SERVICE)
273 {
274 GetServername()->Insert(s, 0);
275 GetServername()->SetSelection(0);
276 }
277 }
278}
279
280void MyFrame::OnHostname( wxCommandEvent& WXUNUSED(event) )
281{
9a83f860 282 if (GetHostname()->GetStringSelection() == wxT("..."))
9d860992 283 {
9a83f860
VZ
284 wxString s = wxGetTextFromUser(wxT("Specify the name of the host (ignored under DDE)"),
285 wxT("Host Name"), wxEmptyString, this);
9d860992
JS
286 if (!s.IsEmpty() && s != IPC_HOST)
287 {
288 GetHostname()->Insert(s, 0);
289 GetHostname()->SetSelection(0);
290 }
291 }
292}
293
294void MyFrame::OnTopic( wxCommandEvent& WXUNUSED(event) )
295{
9a83f860 296 if (GetTopic()->GetStringSelection() == wxT("..."))
9d860992 297 {
9a83f860
VZ
298 wxString s = wxGetTextFromUser(wxT("Specify the name of the topic"),
299 wxT("Topic Name"), wxEmptyString, this);
9d860992
JS
300 if (!s.IsEmpty() && s != IPC_TOPIC)
301 {
302 GetTopic()->Insert(s, 0);
303 GetTopic()->SetSelection(0);
304 }
305 }
306}
307
308void MyFrame::OnDisconnect(wxCommandEvent& WXUNUSED(event))
309{
81ba6107 310 Disconnect();
9d860992
JS
311}
312
313void MyFrame::Disconnect()
314{
5276b0a5 315 wxDELETE(m_client);
5e530f02 316 EnableControls();
9d860992
JS
317}
318
319void MyFrame::OnStartAdvise(wxCommandEvent& WXUNUSED(event))
320{
9a83f860 321 m_client->GetConnection()->StartAdvise(wxT("something"));
9d860992
JS
322}
323
324void MyFrame::OnStopAdvise(wxCommandEvent& WXUNUSED(event))
325{
9a83f860 326 m_client->GetConnection()->StopAdvise(wxT("something"));
7921cf2b
JS
327}
328
87728739 329void MyFrame::OnExecute(wxCommandEvent& WXUNUSED(event))
7921cf2b 330{
9d860992
JS
331 if (m_client->IsConnected())
332 {
9a83f860 333 wxString s = wxT("Date");
9d860992 334
50c549b9
VZ
335 m_client->GetConnection()->Execute(s);
336 m_client->GetConnection()->Execute((const char *)s.c_str(), s.length() + 1);
9d860992 337 char bytes[3];
521d3436
VZ
338 bytes[0] = '1';
339 bytes[1] = '2';
340 bytes[2] = '3';
341 m_client->GetConnection()->Execute(bytes, WXSIZEOF(bytes));
9d860992 342 }
7921cf2b
JS
343}
344
87728739 345void MyFrame::OnPoke(wxCommandEvent& WXUNUSED(event))
7921cf2b 346{
9d860992
JS
347 if (m_client->IsConnected())
348 {
349 wxString s = wxDateTime::Now().Format();
9a83f860
VZ
350 m_client->GetConnection()->Poke(wxT("Date"), s);
351 s = wxDateTime::Now().FormatTime() + wxT(" ") + wxDateTime::Now().FormatDate();
352 m_client->GetConnection()->Poke(wxT("Date"), (const char *)s.c_str(), s.length() + 1);
9d860992
JS
353 char bytes[3];
354 bytes[0] = '1'; bytes[1] = '2'; bytes[2] = '3';
9a83f860 355 m_client->GetConnection()->Poke(wxT("bytes[3]"), bytes, 3, wxIPC_PRIVATE);
9d860992 356 }
7921cf2b
JS
357}
358
87728739 359void MyFrame::OnRequest(wxCommandEvent& WXUNUSED(event))
7921cf2b 360{
9d860992 361 if (m_client->IsConnected())
4b89c618 362 {
50c549b9 363 size_t size;
9a83f860
VZ
364 m_client->GetConnection()->Request(wxT("Date"));
365 m_client->GetConnection()->Request(wxT("Date+len"), &size);
366 m_client->GetConnection()->Request(wxT("bytes[3]"), &size, wxIPC_PRIVATE);
4b89c618 367 }
7921cf2b
JS
368}
369
9d860992
JS
370// ----------------------------------------------------------------------------
371// MyClient
372// ----------------------------------------------------------------------------
373MyClient::MyClient() : wxClient()
7921cf2b 374{
9d860992
JS
375 m_connection = NULL;
376}
377
378bool MyClient::Connect(const wxString& sHost, const wxString& sService, const wxString& sTopic)
379{
380 // suppress the log messages from MakeConnection()
381 wxLogNull nolog;
81ba6107 382
9d860992
JS
383 m_connection = (MyConnection *)MakeConnection(sHost, sService, sTopic);
384 return m_connection != NULL;
7921cf2b
JS
385}
386
4b89c618 387wxConnectionBase *MyClient::OnMakeConnection()
7921cf2b 388{
4b89c618 389 return new MyConnection;
7921cf2b
JS
390}
391
9d860992
JS
392void MyClient::Disconnect()
393{
394 if (m_connection)
395 {
396 m_connection->Disconnect();
5276b0a5 397 wxDELETE(m_connection);
5e530f02 398 wxGetApp().GetFrame()->EnableControls();
9a83f860 399 wxLogMessage(wxT("Client disconnected from server"));
9d860992
JS
400 }
401}
402
403MyClient::~MyClient()
404{
405 Disconnect();
406}
407
408// ----------------------------------------------------------------------------
409// MyConnection
410// ----------------------------------------------------------------------------
411
50c549b9
VZ
412bool MyConnection::OnAdvise(const wxString& topic, const wxString& item, const void *data,
413 size_t size, wxIPCFormat format)
9d860992 414{
9a83f860 415 Log(wxT("OnAdvise"), topic, item, data, size, format);
b62ca03d 416 return true;
7921cf2b
JS
417}
418
419bool MyConnection::OnDisconnect()
420{
9a83f860 421 wxLogMessage(wxT("OnDisconnect()"));
9d860992
JS
422 wxGetApp().GetFrame()->Disconnect();
423 return true;
424}
425
50c549b9 426bool MyConnection::DoExecute(const void *data, size_t size, wxIPCFormat format)
9d860992 427{
9a83f860 428 Log(wxT("Execute"), wxEmptyString, wxEmptyString, data, size, format);
50c549b9 429 bool retval = wxConnection::DoExecute(data, size, format);
9d860992 430 if (!retval)
43b2d5e7 431 {
9a83f860 432 wxLogMessage(wxT("Execute failed!"));
43b2d5e7 433 }
9d860992
JS
434 return retval;
435}
7921cf2b 436
50c549b9 437const void *MyConnection::Request(const wxString& item, size_t *size, wxIPCFormat format)
9d860992 438{
50c549b9 439 const void *data = wxConnection::Request(item, size, format);
9a83f860 440 Log(wxT("Request"), wxEmptyString, item, data, size ? *size : wxNO_LEN, format);
9d860992
JS
441 return data;
442}
443
50c549b9 444bool MyConnection::DoPoke(const wxString& item, const void *data, size_t size, wxIPCFormat format)
9d860992 445{
9a83f860 446 Log(wxT("Poke"), wxEmptyString, item, data, size, format);
50c549b9 447 return wxConnection::DoPoke(item, data, size, format);
7921cf2b 448}