X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/70d26c3f4ffb24d50457d405c9595fd23f9e5b7c..69199aad025095def4b42214f7b44829397caf52:/samples/ipc/client.cpp diff --git a/samples/ipc/client.cpp b/samples/ipc/client.cpp index 616ef99d80..09ec3059fa 100644 --- a/samples/ipc/client.cpp +++ b/samples/ipc/client.cpp @@ -2,219 +2,478 @@ // Name: client.cpp // Purpose: DDE sample: client // Author: Julian Smart -// Modified by: +// Modified by: Jurgen Doornik // Created: 25/01/99 // RCS-ID: $Id$ // Copyright: (c) Julian Smart // Licence: wxWindows licence ///////////////////////////////////////////////////////////////////////////// +// ============================================================================ +// declarations +// ============================================================================ + +// ---------------------------------------------------------------------------- +// headers +// ---------------------------------------------------------------------------- + // For compilers that support precompilation, includes "wx.h". #include "wx/wxprec.h" #ifdef __BORLANDC__ -#pragma hdrstop + #pragma hdrstop #endif #ifndef WX_PRECOMP -#include "wx/wx.h" + #include "wx/wx.h" #endif // Settings common to both executables: determines whether // we're using TCP/IP or real DDE. +#include "ipcsetup.h" -#include "ddesetup.h" - -#if defined(__WXGTK__) || defined(__WXMOTIF__) +#if defined(__WXGTK__) || defined(__WXX11__) || defined(__WXMOTIF__) || defined(__WXMAC__) #include "mondrian.xpm" #endif +#include "wx/datetime.h" #include "client.h" -MyFrame *frame = NULL; +// ---------------------------------------------------------------------------- +// wxWin macros +// ---------------------------------------------------------------------------- IMPLEMENT_APP(MyApp) -char ipc_buffer[4000]; -wxListBox *the_list = NULL; +BEGIN_EVENT_TABLE(MyFrame, wxFrame) + EVT_MENU(wxID_EXIT, MyFrame::OnExit) + EVT_CLOSE( MyFrame::OnClose ) + EVT_BUTTON( ID_START, MyFrame::OnStart ) + EVT_CHOICE( ID_SERVERNAME, MyFrame::OnServername ) + EVT_CHOICE( ID_HOSTNAME, MyFrame::OnHostname ) + EVT_CHOICE( ID_TOPIC, MyFrame::OnTopic ) + EVT_BUTTON( ID_DISCONNECT, MyFrame::OnDisconnect ) + EVT_BUTTON( ID_STARTADVISE, MyFrame::OnStartAdvise ) + EVT_BUTTON( ID_STOPADVISE, MyFrame::OnStopAdvise ) + EVT_BUTTON( ID_POKE, MyFrame::OnPoke ) + EVT_BUTTON( ID_EXECUTE, MyFrame::OnExecute ) + EVT_BUTTON( ID_REQUEST, MyFrame::OnRequest ) +END_EVENT_TABLE() + +// ---------------------------------------------------------------------------- +// globals +// ---------------------------------------------------------------------------- -MyConnection *the_connection = NULL; -MyClient *my_client ; +// ============================================================================ +// implementation +// ============================================================================ + +// ---------------------------------------------------------------------------- +// MyApp +// ---------------------------------------------------------------------------- // The `main program' equivalent, creating the windows and returning the // main frame bool MyApp::OnInit() { - // Create the main frame window - frame = new MyFrame(NULL, "Client", wxPoint(400, 0), wxSize(400, 300)); + // Create the main frame window + m_frame = new MyFrame(NULL, _T("Client")); + m_frame->Show(true); + + return true; +} + +int MyApp::OnExit() +{ - // Give it an icon - frame->SetIcon(wxICON(mondrian)); + return 0; +} - // Make a menubar - wxMenu *file_menu = new wxMenu; +// Define my frame constructor +MyFrame::MyFrame(wxFrame *frame, const wxString& title) + : wxFrame(frame, wxID_ANY, title, wxDefaultPosition, wxSize(400, 300)) +{ + // Give it an icon + SetIcon(wxICON(mondrian)); - file_menu->Append(CLIENT_EXECUTE, "Execute"); - file_menu->Append(CLIENT_REQUEST, "Request"); - file_menu->Append(CLIENT_POKE, "Poke"); - file_menu->Append(CLIENT_QUIT, "Quit"); + // Make a menubar + wxMenu *file_menu = new wxMenu; - wxMenuBar *menu_bar = new wxMenuBar; + file_menu->Append(wxID_EXIT, _T("&Quit\tCtrl-Q")); - menu_bar->Append(file_menu, "File"); + wxMenuBar *menu_bar = new wxMenuBar; - // Associate the menu bar with the frame - frame->SetMenuBar(menu_bar); + menu_bar->Append(file_menu, _T("&File")); - // Make a panel - frame->panel = new wxPanel(frame, -1, wxPoint(0, 0), wxSize(400, 250)); - the_list = new wxListBox(frame->panel, CLIENT_LISTBOX, wxPoint(5, 5), wxSize(150, 120)); - the_list->Append("Apple"); - the_list->Append("Pear"); - the_list->Append("Orange"); - the_list->Append("Banana"); - the_list->Append("Fruit"); + // Associate the menu bar with the frame + SetMenuBar(menu_bar); - frame->panel->Fit(); - frame->Fit(); + // set a dialog background + SetBackgroundColour(wxSystemSettings::GetColour(wxSYS_COLOUR_BTNFACE)); - wxString server = "4242"; + // add the controls to the frame + wxString strs4[] = + { + IPC_SERVICE, _T("...") + }; + wxString strs5[] = + { + IPC_HOST, _T("...") + }; + wxString strs6[] = + { + IPC_TOPIC, _T("...") + }; -#if wxUSE_DDE_FOR_SAMPLE - wxString hostName = wxGetHostName(); -#else - wxString hostName = "localhost"; -#endif + wxBoxSizer *item0 = new wxBoxSizer( wxVERTICAL ); - if (argc > 1) - server = argv[1]; - if (argc > 2) - hostName = argv[2]; - - // Create a new client - my_client = new MyClient; - the_connection = (MyConnection *)my_client->MakeConnection(hostName, server, "IPC TEST"); - - if (!the_connection) - { - wxMessageBox("Failed to make connection to server", "Client Demo Error"); -#ifdef __WXMSW__ -// extern void wxPrintDDEError(); -// wxPrintDDEError(); -#endif - return FALSE; - } - if (!the_connection->StartAdvise("Item")) - wxMessageBox("StartAdvise failed", "Client Demo Error"); + wxBoxSizer *item1 = new wxBoxSizer( wxHORIZONTAL ); + + wxGridSizer *item2 = new wxGridSizer( 4, 0, 0 ); + + wxButton *item3 = new wxButton( this, ID_START, wxT("Connect to server"), wxDefaultPosition, wxDefaultSize, 0 ); + item2->Add( item3, 0, wxGROW|wxALIGN_CENTER_VERTICAL|wxALL, 5 ); + + wxChoice *item5 = new wxChoice( this, ID_HOSTNAME, wxDefaultPosition, wxSize(100,-1), 2, strs5, 0 ); + item2->Add( item5, 0, wxALIGN_CENTER|wxALL, 5 ); + + wxChoice *item4 = new wxChoice( this, ID_SERVERNAME, wxDefaultPosition, wxSize(100,-1), 2, strs4, 0 ); + item2->Add( item4, 0, wxGROW|wxALIGN_CENTER_VERTICAL|wxALL, 5 ); + + wxChoice *item6 = new wxChoice( this, ID_TOPIC, wxDefaultPosition, wxSize(100,-1), 2, strs6, 0 ); + item2->Add( item6, 0, wxALIGN_CENTER|wxALL, 5 ); + + wxButton *item7 = new wxButton( this, ID_DISCONNECT, wxT("Disconnect "), wxDefaultPosition, wxDefaultSize, 0 ); + item2->Add( item7, 0, wxGROW|wxALIGN_CENTER_VERTICAL|wxALL, 5 ); + + item2->Add( 20, 20, 0, wxALIGN_CENTER|wxALL, 5 ); + + item2->Add( 20, 20, 0, wxALIGN_CENTER|wxALL, 5 ); + + item2->Add( 20, 20, 0, wxALIGN_CENTER|wxALL, 5 ); + + wxButton *item8 = new wxButton( this, ID_STARTADVISE, wxT("StartAdvise"), wxDefaultPosition, wxDefaultSize, 0 ); + item2->Add( item8, 0, wxGROW|wxALIGN_CENTER_VERTICAL|wxALL, 5 ); + + wxButton *item9 = new wxButton( this, ID_STOPADVISE, wxT("StopAdvise"), wxDefaultPosition, wxDefaultSize, 0 ); + item2->Add( item9, 0, wxGROW|wxALIGN_CENTER_VERTICAL|wxALL, 5 ); + + item2->Add( 20, 20, 0, wxALIGN_CENTER|wxALL, 5 ); + + item2->Add( 20, 20, 0, wxALIGN_CENTER|wxALL, 5 ); + + wxButton *item10 = new wxButton( this, ID_EXECUTE, wxT("Execute"), wxDefaultPosition, wxDefaultSize, 0 ); + item2->Add( item10, 0, wxGROW|wxALIGN_CENTER_VERTICAL|wxALL, 5 ); + + item2->Add( 20, 20, 0, wxALIGN_CENTER|wxALL, 5 ); + + item2->Add( 20, 20, 0, wxALIGN_CENTER|wxALL, 5 ); + + item2->Add( 20, 20, 0, wxALIGN_CENTER|wxALL, 5 ); + + wxButton *item11 = new wxButton( this, ID_POKE, wxT("Poke"), wxDefaultPosition, wxDefaultSize, 0 ); + item2->Add( item11, 0, wxGROW|wxALIGN_CENTER_VERTICAL|wxALL, 5 ); + + item2->Add( 20, 20, 0, wxALIGN_CENTER|wxALL, 5 ); + + item2->Add( 20, 20, 0, wxALIGN_CENTER|wxALL, 5 ); + + item2->Add( 20, 20, 0, wxALIGN_CENTER|wxALL, 5 ); + + wxButton *item12 = new wxButton( this, ID_REQUEST, wxT("Request"), wxDefaultPosition, wxDefaultSize, 0 ); + item2->Add( item12, 0, wxGROW|wxALIGN_CENTER_VERTICAL|wxALL, 5 ); + + item2->Add( 20, 20, 0, wxALIGN_CENTER|wxALL, 5 ); + + item1->Add( item2, 1, wxALIGN_CENTER|wxALL, 5 ); + + item0->Add( item1, 0, wxGROW|wxALIGN_CENTER_VERTICAL|wxALL, 5 ); - frame->Show(TRUE); + wxStaticBox *item14 = new wxStaticBox( this, -1, wxT("Client log") ); + wxStaticBoxSizer *item13 = new wxStaticBoxSizer( item14, wxVERTICAL ); - return TRUE; + wxTextCtrl *item15 = new wxTextCtrl( this, ID_LOG, wxEmptyString, wxDefaultPosition, wxSize(500,140), wxTE_MULTILINE ); + item13->Add( item15, 1, wxGROW|wxALIGN_CENTER_VERTICAL|wxALL, 5 ); + + item0->Add( item13, 0, wxGROW|wxALIGN_CENTER_VERTICAL|wxALL, 5 ); + + this->SetSizer( item0 ); + item0->SetSizeHints( this ); + + // status + m_client = NULL; + GetServername()->SetSelection(0); + GetHostname()->SetSelection(0); + GetTopic()->SetSelection(0); + wxLogTextCtrl *logWindow = new wxLogTextCtrl(GetLog()); + delete wxLog::SetActiveTarget(logWindow); + wxLogMessage(_T("Click on Connect to connect to the server")); + EnableControls(); } -int MyApp::OnExit() +void MyFrame::EnableControls() { - if (my_client) - delete my_client ; + GetStart()->Enable(m_client == NULL); + GetServername()->Enable(m_client == NULL); + GetHostname()->Enable(m_client == NULL); + GetTopic()->Enable(m_client == NULL); + + const bool isConnected = (m_client != NULL && m_client->IsConnected()); + GetDisconnect()->Enable(m_client != NULL && isConnected); + GetStartAdvise()->Enable(m_client != NULL && isConnected); + GetStopAdvise()->Enable(m_client != NULL && isConnected); + GetExecute()->Enable(m_client != NULL && isConnected); + GetPoke()->Enable(m_client != NULL && isConnected); + GetRequest()->Enable(m_client != NULL && isConnected); +} - return 0; +void MyFrame::OnClose(wxCloseEvent& event) +{ + if (m_client) + { + delete m_client; + m_client = NULL; + } + event.Skip(); } -BEGIN_EVENT_TABLE(MyFrame, wxFrame) - EVT_MENU(CLIENT_QUIT, MyFrame::OnExit) - EVT_MENU(CLIENT_EXECUTE, MyFrame::OnExecute) - EVT_MENU(CLIENT_POKE, MyFrame::OnPoke) - EVT_MENU(CLIENT_REQUEST, MyFrame::OnRequest) - EVT_CLOSE(MyFrame::OnCloseWindow) -END_EVENT_TABLE() +void MyFrame::OnExit(wxCommandEvent& WXUNUSED(event)) +{ + Close(); +} -// Define my frame constructor -MyFrame::MyFrame(wxFrame *frame, const wxString& title, const wxPoint& pos, const wxSize& size): - wxFrame(frame, -1, title, pos, size) +void MyFrame::OnStart(wxCommandEvent& WXUNUSED(event)) { - panel = NULL; + // Connect to the client + wxString servername = GetServername()->GetStringSelection(); + wxString hostname = GetHostname()->GetStringSelection(); + wxString topic = GetTopic()->GetStringSelection(); + + m_client = new MyClient; + bool retval = m_client->Connect(hostname, servername, topic); + + wxLogMessage(_T("Client host=\"%s\" port=\"%s\" topic=\"%s\" %s"), + hostname.c_str(), servername.c_str(), topic.c_str(), + retval ? _T("connected") : _T("failed to connect")); + + if (!retval) + { + delete m_client; + m_client = NULL; + } + EnableControls(); } -void MyFrame::OnExecute(wxCommandEvent& event) +void MyFrame::OnServername( wxCommandEvent& WXUNUSED(event) ) { - if (the_connection) - if (!the_connection->Execute("Hello from the client!")) - wxMessageBox("Execute failed", "Client Demo Error"); + if (GetServername()->GetStringSelection() == _T("...")) + { + wxString s = wxGetTextFromUser(_T("Specify the name of the server"), + _T("Server Name"), wxEmptyString, this); + if (!s.IsEmpty() && s != IPC_SERVICE) + { + GetServername()->Insert(s, 0); + GetServername()->SetSelection(0); + } + } } -void MyFrame::OnPoke(wxCommandEvent& event) +void MyFrame::OnHostname( wxCommandEvent& WXUNUSED(event) ) { - if (the_connection) - if (!the_connection->Poke("An item", "Some data to poke at the server!")) - wxMessageBox("Poke failed", "Client Demo Error"); + if (GetHostname()->GetStringSelection() == _T("...")) + { + wxString s = wxGetTextFromUser(_T("Specify the name of the host (ignored under DDE)"), + _T("Host Name"), wxEmptyString, this); + if (!s.IsEmpty() && s != IPC_HOST) + { + GetHostname()->Insert(s, 0); + GetHostname()->SetSelection(0); + } + } } -void MyFrame::OnRequest(wxCommandEvent& event) +void MyFrame::OnTopic( wxCommandEvent& WXUNUSED(event) ) { - if (the_connection) - { - char *data = the_connection->Request("An item"); - if (data) - wxMessageBox(data, "Client: Request", wxOK); - else - wxMessageBox("Request failed", "Client Demo Error"); - } + if (GetTopic()->GetStringSelection() == _T("...")) + { + wxString s = wxGetTextFromUser(_T("Specify the name of the topic"), + _T("Topic Name"), wxEmptyString, this); + if (!s.IsEmpty() && s != IPC_TOPIC) + { + GetTopic()->Insert(s, 0); + GetTopic()->SetSelection(0); + } + } } -void MyFrame::OnExit(wxCommandEvent& event) +void MyFrame::OnDisconnect(wxCommandEvent& WXUNUSED(event)) { - if (the_connection) - the_connection->Disconnect(); + Disconnect(); +} - this->Destroy(); +void MyFrame::Disconnect() +{ + delete m_client; + m_client = NULL; + EnableControls(); } -// Define the behaviour for the frame closing -void MyFrame::OnCloseWindow(wxCloseEvent& event) +void MyFrame::OnStartAdvise(wxCommandEvent& WXUNUSED(event)) { - if (the_connection) - { - the_connection->Disconnect(); - } - this->Destroy(); + m_client->GetConnection()->StartAdvise(_T("something")); } -MyClient::MyClient(void) +void MyFrame::OnStopAdvise(wxCommandEvent& WXUNUSED(event)) { + m_client->GetConnection()->StopAdvise(_T("something")); } -wxConnectionBase *MyClient::OnMakeConnection(void) +void MyFrame::OnExecute(wxCommandEvent& WXUNUSED(event)) { - return new MyConnection; + if (m_client->IsConnected()) + { + wxString s = _T("Date"); + + m_client->GetConnection()->Execute((wxChar *)s.c_str()); + m_client->GetConnection()->Execute((wxChar *)s.c_str(), (s.Length() + 1) * sizeof(wxChar)); +#if wxUSE_DDE_FOR_IPC + wxLogMessage(_T("DDE Execute can only be used to send text strings, not arbitrary data.\nThe type argument will be ignored, text truncated, converted to Unicode and null terminated.")); +#endif + char bytes[3]; + bytes[0] = '1'; bytes[1] = '2'; bytes[2] = '3'; + m_client->GetConnection()->Execute((wxChar *)bytes, 3, wxIPC_PRIVATE); + } } -MyConnection::MyConnection(void):wxConnection(ipc_buffer, 3999) +void MyFrame::OnPoke(wxCommandEvent& WXUNUSED(event)) { + if (m_client->IsConnected()) + { + wxString s = wxDateTime::Now().Format(); + m_client->GetConnection()->Poke(_T("Date"), (wxChar *)s.c_str()); + s = wxDateTime::Now().FormatTime() + _T(" ") + wxDateTime::Now().FormatDate(); + m_client->GetConnection()->Poke(_T("Date"), (wxChar *)s.c_str(), (s.Length() + 1) * sizeof(wxChar)); + char bytes[3]; + bytes[0] = '1'; bytes[1] = '2'; bytes[2] = '3'; + m_client->GetConnection()->Poke(_T("bytes[3]"), (wxChar *)bytes, 3, wxIPC_PRIVATE); + } } -MyConnection::~MyConnection(void) +void MyFrame::OnRequest(wxCommandEvent& WXUNUSED(event)) { - the_connection = NULL; + if (m_client->IsConnected()) + { + int size; + m_client->GetConnection()->Request(_T("Date")); + m_client->GetConnection()->Request(_T("Date+len"), &size); + m_client->GetConnection()->Request(_T("bytes[3]"), &size, wxIPC_PRIVATE); + } } -bool MyConnection::OnAdvise(const wxString& topic, const wxString& item, char *data, int size, wxIPCFormat format) +// ---------------------------------------------------------------------------- +// MyClient +// ---------------------------------------------------------------------------- +MyClient::MyClient() : wxClient() { - if (the_list) - { - int n = the_list->FindString(data); - if (n > -1) - the_list->SetSelection(n); - } - return TRUE; + m_connection = NULL; +} + +bool MyClient::Connect(const wxString& sHost, const wxString& sService, const wxString& sTopic) +{ + // suppress the log messages from MakeConnection() + wxLogNull nolog; + + m_connection = (MyConnection *)MakeConnection(sHost, sService, sTopic); + return m_connection != NULL; +} + +wxConnectionBase *MyClient::OnMakeConnection() +{ + return new MyConnection; +} + +void MyClient::Disconnect() +{ + if (m_connection) + { + m_connection->Disconnect(); + delete m_connection; + m_connection = NULL; + wxGetApp().GetFrame()->EnableControls(); + wxLogMessage(_T("Client disconnected from server")); + } +} + +MyClient::~MyClient() +{ + Disconnect(); +} + +// ---------------------------------------------------------------------------- +// MyConnection +// ---------------------------------------------------------------------------- + +void MyConnection::Log(const wxString& command, const wxString& topic, + const wxString& item, wxChar *data, int size, wxIPCFormat format) +{ + wxString s; + if (topic.IsEmpty() && item.IsEmpty()) + s.Printf(_T("%s("), command.c_str()); + else if (topic.IsEmpty()) + s.Printf(_T("%s(item=\"%s\","), command.c_str(), item.c_str()); + else if (item.IsEmpty()) + s.Printf(_T("%s(topic=\"%s\","), command.c_str(), topic.c_str()); + else + s.Printf(_T("%s(topic=\"%s\",item=\"%s\","), command.c_str(), topic.c_str(), item.c_str()); + + if (format == wxIPC_TEXT || format == wxIPC_UNICODETEXT) + wxLogMessage(_T("%s\"%s\",%d)"), s.c_str(), data, size); + else if (format == wxIPC_PRIVATE) + { + if (size == 3) + { + char *bytes = (char *)data; + wxLogMessage(_T("%s'%c%c%c',%d)"), s.c_str(), bytes[0], bytes[1], bytes[2], size); + } + else + wxLogMessage(_T("%s...,%d)"), s.c_str(), size); + } + else if (format == wxIPC_INVALID) + wxLogMessage(_T("%s[invalid data],%d)"), s.c_str(), size); +} + +bool MyConnection::OnAdvise(const wxString& topic, const wxString& item, wxChar *data, + int size, wxIPCFormat format) +{ + Log(_T("OnAdvise"), topic, item, data, size, format); + return true; } bool MyConnection::OnDisconnect() { - frame->Destroy(); + wxLogMessage(_T("OnDisconnect()")); + wxGetApp().GetFrame()->Disconnect(); + return true; +} - the_connection = NULL; - delete this; +bool MyConnection::Execute(const wxChar *data, int size, wxIPCFormat format) +{ + Log(_T("Execute"), wxEmptyString, wxEmptyString, (wxChar *)data, size, format); + bool retval = wxConnection::Execute(data, size, format); + if (!retval) + wxLogMessage(_T("Execute failed!")); + return retval; +} - return TRUE; +wxChar *MyConnection::Request(const wxString& item, int *size, wxIPCFormat format) +{ + wxChar *data = wxConnection::Request(item, size, format); + Log(_T("Request"), wxEmptyString, item, data, size ? *size : -1, format); + return data; } +bool MyConnection::Poke(const wxString& item, wxChar *data, int size, wxIPCFormat format) +{ + Log(_T("Poke"), wxEmptyString, item, data, size, format); + return wxConnection::Poke(item, data, size, format); +}