wxWidgets/samples/dde/server.cpp
1999-01-27 10:01:14 +00:00

197 lines
4.6 KiB
C++

/////////////////////////////////////////////////////////////////////////////
// Name: server.cpp
// Purpose: DDE sample: server
// Author: Julian Smart
// Modified by:
// Created: 25/01/99
// RCS-ID: $Id$
// Copyright: (c) Julian Smart
// Licence: wxWindows licence
/////////////////////////////////////////////////////////////////////////////
// For compilers that support precompilation, includes "wx.h".
#include "wx/wxprec.h"
#ifdef __BORLANDC__
#pragma hdrstop
#endif
#ifndef WX_PRECOMP
#include "wx/wx.h"
#endif
// Settings common to both executables: determines whether
// we're using TCP/IP or real DDE.
#include "ddesetup.h"
#if defined(__WXGTK__) || defined(__WXMOTIF__)
#include "mondrian.xpm"
#endif
#include "server.h"
MyFrame *frame = NULL;
IMPLEMENT_APP(MyApp)
char ipc_buffer[4000];
MyConnection *the_connection = NULL;
MyServer *my_server ;
bool MyApp::OnInit()
{
// Create the main frame window
frame = new MyFrame(NULL, "Server", wxDefaultPosition, wxSize(400, 500));
frame->CreateStatusBar();
// Give it an icon
frame->SetIcon(wxICON(mondrian));
// Make a menubar
wxMenu *file_menu = new wxMenu;
file_menu->Append(SERVER_QUIT, "&Exit");
wxMenuBar *menu_bar = new wxMenuBar;
menu_bar->Append(file_menu, "&File");
// Associate the menu bar with the frame
frame->SetMenuBar(menu_bar);
// Make a panel
frame->panel = new wxPanel(frame, 0, 0, 400, 250);
wxListBox *list = new wxListBox(frame->panel, SERVER_LISTBOX,
wxPoint(5, 5), wxSize(150, 120));
list->Append("Apple");
list->Append("Pear");
list->Append("Orange");
list->Append("Banana");
list->Append("Fruit");
frame->panel->Fit();
frame->Fit();
wxString server_name = "4242";
if (argc > 1)
server_name = argv[1];
// Create a new server
my_server = new MyServer;
my_server->Create(server_name);
frame->Show(TRUE);
return TRUE;
}
BEGIN_EVENT_TABLE(MyFrame, wxFrame)
EVT_MENU(SERVER_QUIT, MyFrame::OnExit)
EVT_CLOSE(MyFrame::OnCloseWindow)
EVT_LISTBOX(SERVER_LISTBOX, MyFrame::OnListBoxClick)
END_EVENT_TABLE()
// Define my frame constructor
MyFrame::MyFrame(wxFrame *frame, const wxString& title, const wxPoint& pos, const wxSize& size):
wxFrame(frame, -1, title, pos, size)
{
panel = NULL;
}
void MyFrame::OnExit(wxCommandEvent& event)
{
if (my_server)
delete my_server;
this->Destroy();
}
// Set the client process's listbox to this item
void MyFrame::OnListBoxClick(wxCommandEvent& event)
{
wxListBox* listBox = (wxListBox*) panel->FindWindow(SERVER_LISTBOX);
if (listBox)
{
wxString value = listBox->GetStringSelection();
if (the_connection)
{
the_connection->Advise("Item", (char*) (const char*) value);
}
}
}
void MyFrame::OnCloseWindow(wxCloseEvent& event)
{
if (my_server)
delete my_server;
this->Destroy();
}
BEGIN_EVENT_TABLE(IPCDialogBox, wxDialog)
EVT_BUTTON(SERVER_QUIT_BUTTON, IPCDialogBox::OnQuit)
END_EVENT_TABLE()
IPCDialogBox::IPCDialogBox(wxFrame *parent, const wxString& title,
const wxPoint& pos, const wxSize& size, MyConnection *the_connection):
wxDialog(parent, -1, title, pos, size)
{
connection = the_connection;
(void)new wxButton(this, SERVER_QUIT_BUTTON, "Quit this connection", wxPoint(5, 5));
Fit();
}
void IPCDialogBox::OnQuit(wxCommandEvent& event)
{
connection->Disconnect();
delete connection;
}
wxConnectionBase *MyServer::OnAcceptConnection(const wxString& topic)
{
if (strcmp(topic, "STDIO") != 0 && strcmp(topic, "IPC TEST") == 0)
return new MyConnection(ipc_buffer, 4000);
else
return NULL;
}
MyConnection::MyConnection(char *buf, int size):wxConnection(buf, size)
{
dialog = new IPCDialogBox(frame, "Connection", wxPoint(100, 100), wxSize(500, 500), this);
dialog->Show(TRUE);
the_connection = this;
}
MyConnection::~MyConnection(void)
{
dialog->Destroy();
the_connection = NULL;
}
bool MyConnection::OnExecute(const wxString& topic, char *data, int size, wxIPCFormat format)
{
char buf[300];
sprintf(buf, "Execute command: %s", data);
frame->SetStatusText(buf);
return TRUE;
}
bool MyConnection::OnPoke(const wxString& topic, const wxString& item, char *data, int size, wxIPCFormat format)
{
char buf[300];
sprintf(buf, "Poke command: %s", data);
frame->SetStatusText(buf);
return TRUE;
}
char *MyConnection::OnRequest(const wxString& topic, const wxString& item, int *size, wxIPCFormat format)
{
return "Here, have your data, client!";
}
bool MyConnection::OnStartAdvise(const wxString& topic, const wxString& item)
{
return TRUE;
}