]> git.saurik.com Git - wxWidgets.git/blame_incremental - samples/ipc/server.cpp
reSWIGged
[wxWidgets.git] / samples / ipc / server.cpp
... / ...
CommitLineData
1/////////////////////////////////////////////////////////////////////////////
2// Name: server.cpp
3// Purpose: IPC sample: server
4// Author: Julian Smart
5// Modified by:
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 "ddesetup.h"
34
35#if defined(__WXGTK__) || defined(__WXX11__) || defined(__WXMOTIF__) || defined(__WXMAC__)
36 #include "mondrian.xpm"
37#endif
38
39#include "server.h"
40
41// ----------------------------------------------------------------------------
42// wxWin macros
43// ----------------------------------------------------------------------------
44
45IMPLEMENT_APP(MyApp)
46
47BEGIN_EVENT_TABLE(MyFrame, wxFrame)
48 EVT_MENU (SERVER_EXIT, MyFrame::OnExit)
49 EVT_LISTBOX(SERVER_LISTBOX, MyFrame::OnListBoxClick)
50END_EVENT_TABLE()
51
52BEGIN_EVENT_TABLE(IPCDialogBox, wxDialog)
53 EVT_BUTTON(SERVER_QUIT_BUTTON, IPCDialogBox::OnQuit)
54END_EVENT_TABLE()
55
56// ----------------------------------------------------------------------------
57// global variables
58// ----------------------------------------------------------------------------
59
60MyConnection *the_connection = NULL;
61
62// ============================================================================
63// implementation
64// ============================================================================
65
66// ----------------------------------------------------------------------------
67// MyApp
68// ----------------------------------------------------------------------------
69
70bool MyApp::OnInit()
71{
72 // Create the main frame window
73 (new MyFrame(NULL, _T("Server")))->Show(TRUE);
74
75 // service name (DDE classes) or port number (TCP/IP based classes)
76 wxString service = IPC_SERVICE;
77
78 if (argc > 1)
79 service = argv[1];
80
81 // Create a new server
82 m_server = new MyServer;
83 m_server->Create(service);
84
85 return TRUE;
86}
87
88int MyApp::OnExit()
89{
90 delete m_server;
91
92 return 0;
93}
94
95// ----------------------------------------------------------------------------
96// MyFrame
97// ----------------------------------------------------------------------------
98
99// Define my frame constructor
100MyFrame::MyFrame(wxFrame *frame, const wxString& title)
101 : wxFrame(frame, -1, title, wxDefaultPosition, wxSize(350, 250))
102{
103 CreateStatusBar();
104
105 // Give it an icon
106 SetIcon(wxICON(mondrian));
107
108 // Make a menubar
109 wxMenu *file_menu = new wxMenu;
110
111 file_menu->Append(SERVER_EXIT, _T("&Quit\tCtrl-Q"));
112
113 wxMenuBar *menu_bar = new wxMenuBar;
114
115 menu_bar->Append(file_menu, _T("&File"));
116
117 // Associate the menu bar with the frame
118 SetMenuBar(menu_bar);
119
120 // Make a listbox
121 wxListBox *list = new wxListBox(this, SERVER_LISTBOX, wxPoint(5, 5));
122 list->Append(_T("Apple"));
123 list->Append(_T("Pear"));
124 list->Append(_T("Orange"));
125 list->Append(_T("Banana"));
126 list->Append(_T("Fruit"));
127}
128
129// Set the client process's listbox to this item
130void MyFrame::OnListBoxClick(wxCommandEvent& WXUNUSED(event))
131{
132 wxListBox* listBox = (wxListBox*) FindWindow(SERVER_LISTBOX);
133 if (listBox)
134 {
135 wxString value = listBox->GetStringSelection();
136
137 /* Because the_connection only holds one connection, in this sample only
138 one connection can receive advise messages */
139 if (the_connection)
140 {
141 the_connection->Advise(IPC_ADVISE_NAME, (wxChar*)value.c_str());
142 }
143 }
144}
145
146void MyFrame::OnExit(wxCommandEvent& WXUNUSED(event))
147{
148 Close(TRUE);
149}
150
151// ----------------------------------------------------------------------------
152// IPCDialogBox
153// ----------------------------------------------------------------------------
154
155IPCDialogBox::IPCDialogBox(wxWindow *parent, const wxString& title,
156 const wxPoint& pos, const wxSize& size,
157 MyConnection *connection)
158 : wxDialog(parent, -1, title, pos, size)
159{
160 m_connection = connection;
161 (void)new wxButton(this, SERVER_QUIT_BUTTON, _T("Quit this connection"),
162 wxPoint(5, 5));
163 Fit();
164}
165
166IPCDialogBox::~IPCDialogBox( )
167{
168 // wxWindows exit code destroys dialog before destroying the connection in
169 // OnExit, so make sure connection won't try to delete the dialog later.
170 if (m_connection)
171 m_connection->dialog = NULL;
172}
173
174void IPCDialogBox::OnQuit(wxCommandEvent& WXUNUSED(event))
175{
176 m_connection->Disconnect();
177 delete m_connection;
178}
179
180// ----------------------------------------------------------------------------
181// MyServer
182// ----------------------------------------------------------------------------
183
184wxConnectionBase *MyServer::OnAcceptConnection(const wxString& topic)
185{
186 if ( topic == IPC_TOPIC )
187 return new MyConnection();
188
189 // unknown topic
190 return NULL;
191}
192
193// ----------------------------------------------------------------------------
194// MyConnection
195// ----------------------------------------------------------------------------
196
197MyConnection::MyConnection()
198 : wxConnection()
199{
200 dialog = new IPCDialogBox(wxTheApp->GetTopWindow(), _T("Connection"),
201 wxPoint(100, 100), wxSize(500, 500), this);
202 dialog->Show(TRUE);
203 the_connection = this;
204}
205
206MyConnection::~MyConnection()
207{
208 if (the_connection)
209 {
210 if (dialog)
211 {
212 dialog->m_connection = NULL;
213 dialog->Destroy();
214 }
215 the_connection = NULL;
216 }
217}
218
219bool MyConnection::OnExecute(const wxString& WXUNUSED(topic),
220 wxChar *data,
221 int WXUNUSED(size),
222 wxIPCFormat WXUNUSED(format))
223{
224 wxLogStatus(wxT("Execute command: %s"), data);
225 return TRUE;
226}
227
228bool MyConnection::OnPoke(const wxString& WXUNUSED(topic),
229 const wxString& item,
230 wxChar *data,
231 int WXUNUSED(size),
232 wxIPCFormat WXUNUSED(format))
233{
234 wxLogStatus(wxT("Poke command: %s = %s"), item.c_str(), data);
235 return TRUE;
236}
237
238wxChar *MyConnection::OnRequest(const wxString& WXUNUSED(topic),
239 const wxString& WXUNUSED(item),
240 int * WXUNUSED(size),
241 wxIPCFormat WXUNUSED(format))
242{
243 return _T("Here, have your data, client!");
244}
245
246bool MyConnection::OnStartAdvise(const wxString& WXUNUSED(topic),
247 const wxString& WXUNUSED(item))
248{
249 return TRUE;
250}
251