Add some new files for interface additions

[wxWidgets.git] / src / common / sckipc.cpp

diff --git a/src/common/sckipc.cpp b/src/common/sckipc.cpp
index 4532de83a86e227316aa1f76921f187e22ebaa95..3fea37e1ece57ee211fdb76dfeac8efb01cff32b 100644 (file)
--- a/src/common/sckipc.cpp
+++ b/src/common/sckipc.cpp
@@ -1,14 +1,26 @@
 /////////////////////////////////////////////////////////////////////////////
 // Name:        sckipc.cpp
 // Purpose:     Interprocess communication implementation (wxSocket version)
 /////////////////////////////////////////////////////////////////////////////
 // Name:        sckipc.cpp
 // Purpose:     Interprocess communication implementation (wxSocket version)

-// Author:      Julian Smart, Guilhem Lavaux
+// Author:      Julian Smart

 // Modified by: Guilhem Lavaux (big rewrite) May 1997, 1998
 // Modified by: Guilhem Lavaux (big rewrite) May 1997, 1998

+//              Guillermo Rodriguez (updated for wxSocket v2) Jan 2000
+//                                  (callbacks deprecated)    Mar 2000

 // Created:     1993
 // RCS-ID:      $Id$
 // Created:     1993
 // RCS-ID:      $Id$

-// Copyright:   (c) Julian Smart 1993, Guilhem Lavaux 1997, 1998
+// Copyright:   (c) Julian Smart 1993
+//              (c) Guilhem Lavaux 1997, 1998
+//              (c) 2000 Guillermo Rodriguez <guille@iies.es>

 // Licence:     wxWindows license
 /////////////////////////////////////////////////////////////////////////////
 
 // Licence:     wxWindows license
 /////////////////////////////////////////////////////////////////////////////
 

+// ==========================================================================
+// declarations
+// ==========================================================================
+
+// --------------------------------------------------------------------------
+// headers
+// --------------------------------------------------------------------------
+

 #ifdef __GNUG__
 #pragma implementation "sckipc.h"
 #endif
 #ifdef __GNUG__
 #pragma implementation "sckipc.h"
 #endif


@@ -21,28 +33,33 @@
 #endif
 
 #ifndef WX_PRECOMP
 #endif
 
 #ifndef WX_PRECOMP

+#include "wx/defs.h"

 #endif
 
 #endif
 

+#if wxUSE_SOCKETS && wxUSE_IPC && wxUSE_STREAMS
+

 #include <stdlib.h>
 #include <stdio.h>
 
 #include "wx/socket.h"
 #include "wx/sckipc.h"
 #include <stdlib.h>
 #include <stdio.h>
 
 #include "wx/socket.h"
 #include "wx/sckipc.h"

+#include "wx/module.h"
+#include "wx/event.h"
+#include "wx/log.h"

 
 #ifdef __BORLANDC__
 #pragma hdrstop
 #endif
 
 
 #ifdef __BORLANDC__
 #pragma hdrstop
 #endif
 

-#if !USE_SHARED_LIBRARY
-IMPLEMENT_DYNAMIC_CLASS(wxTCPServer, wxServerBase)
-IMPLEMENT_DYNAMIC_CLASS(wxTCPClient, wxClientBase)
-IMPLEMENT_DYNAMIC_CLASS(wxTCPConnection, wxConnectionBase)
-#endif
+// --------------------------------------------------------------------------
+// macros and constants
+// --------------------------------------------------------------------------

 
 // It seems to be already defined somewhere in the Xt includes.
 #ifndef __XT__
 // Message codes
 
 // It seems to be already defined somewhere in the Xt includes.
 #ifndef __XT__
 // Message codes

-enum {
+enum
+{

   IPC_EXECUTE = 1,
   IPC_REQUEST,
   IPC_POKE,
   IPC_EXECUTE = 1,
   IPC_REQUEST,
   IPC_POKE,


@@ -57,23 +74,50 @@ enum {
 };
 #endif
 
 };
 #endif
 

-void Server_OnRequest(wxSocketServer& server,
-                     wxSocketBase::wxRequestEvent evt,
-                     char *cdata);
-void Client_OnRequest(wxSocketBase& sock,
-                     wxSocketBase::wxRequestEvent evt,
-                     char *cdata);

 
 

-// ---------------------------------------------------------------------------
+// All sockets will be created with the following flags
+#define SCKIPC_FLAGS (wxSOCKET_WAITALL)
+
+// --------------------------------------------------------------------------
+// wxTCPEventHandler stuff (private class)
+// --------------------------------------------------------------------------
+
+class wxTCPEventHandler : public wxEvtHandler
+{
+public:
+  wxTCPEventHandler() : wxEvtHandler() {};
+
+  void Client_OnRequest(wxSocketEvent& event);
+  void Server_OnRequest(wxSocketEvent& event);
+
+  DECLARE_EVENT_TABLE()
+};
+
+enum
+{
+  _CLIENT_ONREQUEST_ID = 1000,
+  _SERVER_ONREQUEST_ID
+};
+
+static wxTCPEventHandler *gs_handler = NULL;
+
+// ==========================================================================
+// implementation
+// ==========================================================================
+
+IMPLEMENT_DYNAMIC_CLASS(wxTCPServer, wxServerBase)
+IMPLEMENT_DYNAMIC_CLASS(wxTCPClient, wxClientBase)
+IMPLEMENT_CLASS(wxTCPConnection, wxConnectionBase)
+
+// --------------------------------------------------------------------------

 // wxTCPClient
 // wxTCPClient

-// ---------------------------------------------------------------------------
+// --------------------------------------------------------------------------

 
 

-wxTCPClient::wxTCPClient (void)
-  : wxClientBase()
+wxTCPClient::wxTCPClient () : wxClientBase()

 {
 }
 
 {
 }
 

-wxTCPClient::~wxTCPClient (void)
+wxTCPClient::~wxTCPClient ()

 {
 }
 
 {
 }
 


@@ -88,167 +132,210 @@ wxConnectionBase *wxTCPClient::MakeConnection (const wxString& host,
                                                const wxString& server_name,
                                                const wxString& topic)
 {
                                                const wxString& server_name,
                                                const wxString& topic)
 {

-  wxIPV4address addr;
-  wxSocketHandler *hsock = &wxSocketHandler::Master();
-  wxSocketClient *client = hsock->CreateClient();
+  wxSocketClient *client = new wxSocketClient(SCKIPC_FLAGS);

   wxSocketStream *stream = new wxSocketStream(*client);
   wxSocketStream *stream = new wxSocketStream(*client);

-  wxDataStream data_s(*stream);
-  
-  client->SetNotify(wxSocketBase::REQ_READ | wxSocketBase::REQ_LOST);
+  wxDataInputStream *data_is = new wxDataInputStream(*stream);
+  wxDataOutputStream *data_os = new wxDataOutputStream(*stream);
+
+  wxIPV4address addr;

   addr.Service(server_name);
   addr.Hostname(host);
 
   addr.Service(server_name);
   addr.Hostname(host);
 

-  if (!client->Connect(addr)) {
-    delete client;
-    return NULL;
-  }
-  client->Notify(FALSE);
-
-  // Send topic name, and enquire whether this has succeeded
-  unsigned char msg;
-  
-  data_s.Write8(IPC_CONNECT);
-  data_s.WriteString(topic);
+  if (client->Connect(addr))
+  {
+    unsigned char msg;

   
   

-  msg = data_s.Read8();
+    // Send topic name, and enquire whether this has succeeded
+    data_os->Write8(IPC_CONNECT);
+    data_os->WriteString(topic);

   
   

-  // OK! Confirmation.
-  if (msg == IPC_CONNECT) {
-    wxTCPConnection *connection = (wxTCPConnection *)OnMakeConnection ();
-    if (connection) {
-      if (!connection->IsKindOf(CLASSINFO(wxTCPConnection))) {
-        delete connection;
-        return NULL;
+    msg = data_is->Read8();
+
+    // OK! Confirmation.
+    if (msg == IPC_CONNECT)
+    {
+      wxTCPConnection *connection = (wxTCPConnection *)OnMakeConnection ();
+
+      if (connection)
+      {
+        if (connection->IsKindOf(CLASSINFO(wxTCPConnection)))
+        {
+          connection->m_topic = topic;
+          connection->m_sock  = client;
+          connection->m_sockstrm = stream;
+          connection->m_codeci = data_is;
+          connection->m_codeco = data_os;
+          client->SetEventHandler(*gs_handler, _CLIENT_ONREQUEST_ID);
+          client->SetClientData(connection);
+          client->SetNotify(wxSOCKET_INPUT_FLAG | wxSOCKET_LOST_FLAG);
+          client->Notify(TRUE);
+          return connection;
+        }
+        else
+        {
+          delete connection;
+          // and fall through to delete everything else
+        }

       }
       }

-      connection->m_topic = topic;
-      client->Callback(Client_OnRequest);
-      client->CallbackData((char *)connection);
-      client->Notify(TRUE);
-      return connection;
-    } else {
-      delete client;
-      return NULL;

     }
     }

-  } else {
-    delete client;
-    return NULL;

   }
   }

+
+  // Something went wrong, delete everything
+  delete data_is;
+  delete data_os;
+  delete stream;
+  client->Destroy();
+

   return NULL;
 }
 
 wxConnectionBase *wxTCPClient::OnMakeConnection()
 {
   return NULL;
 }
 
 wxConnectionBase *wxTCPClient::OnMakeConnection()
 {

-  return new wxTCPConnection;
+  return new wxTCPConnection();

 }
 
 }
 

-// ---------------------------------------------------------------------------
+// --------------------------------------------------------------------------

 // wxTCPServer
 // wxTCPServer

-// ---------------------------------------------------------------------------
+// --------------------------------------------------------------------------

 
 

-wxTCPServer::wxTCPServer (void)
-  : wxServerBase()
+wxTCPServer::wxTCPServer () : wxServerBase()

 {
 {

+  m_server = NULL;

 }
 
 }
 

-bool wxTCPServer::Create(const wxString& server_name)
+bool wxTCPServer::Create(const wxString& serverName)

 {
 {

+  // Destroy previous server, if any
+  if (m_server)
+  {
+    m_server->SetClientData(NULL);
+    m_server->Destroy();
+    m_server = NULL;
+  }
+
+  // wxIPV4address defaults to INADDR_ANY:0

   wxIPV4address addr;
   wxIPV4address addr;

-  wxSocketHandler *hsock = &wxSocketHandler::Master();
-  wxSocketServer *server;
+  addr.Service(serverName);

 
 

-  addr.Service(server_name);
+  // Create a socket listening on the specified port
+  m_server = new wxSocketServer(addr, SCKIPC_FLAGS);

 
 

-  // Create a socket listening on specified port
-  server = hsock->CreateServer(addr);
-  server->Callback((wxSocketBase::wxSockCbk)Server_OnRequest);
-  server->SetNotify(wxSocketBase::REQ_ACCEPT);
+  if (!m_server->Ok())
+  {
+    m_server->Destroy();
+    m_server = NULL;

 
 

-  server->CallbackData((char *)this);
+    return FALSE;
+  }
+
+  m_server->SetEventHandler(*gs_handler, _SERVER_ONREQUEST_ID);
+  m_server->SetClientData(this);
+  m_server->SetNotify(wxSOCKET_CONNECTION_FLAG);
+  m_server->Notify(TRUE);

 
   return TRUE;
 }
 
 
   return TRUE;
 }
 

-wxTCPServer::~wxTCPServer (void)
+wxTCPServer::~wxTCPServer()

 {
 {

+  if (m_server)
+  {
+    m_server->SetClientData(NULL);
+    m_server->Destroy();
+  }

 }
 
 }
 

-wxConnectionBase *wxTCPServer::OnAcceptConnection(const wxString& topic)
+wxConnectionBase *wxTCPServer::OnAcceptConnection( const wxString& WXUNUSED(topic) )

 {
   return new wxTCPConnection();
 }
 
 {
   return new wxTCPConnection();
 }
 

-// ---------------------------------------------------------------------------
+// --------------------------------------------------------------------------

 // wxTCPConnection
 // wxTCPConnection

-// ---------------------------------------------------------------------------
+// --------------------------------------------------------------------------
+
+wxTCPConnection::wxTCPConnection () : wxConnectionBase()
+{
+  m_sock     = NULL;
+  m_sockstrm = NULL;
+  m_codeci   = NULL;
+  m_codeco   = NULL;
+}

 
 

-wxTCPConnection::wxTCPConnection (void)
-  : wxConnectionBase(),
-    m_sock(NULL), m_sockstrm(NULL), m_codec(NULL)
+wxTCPConnection::wxTCPConnection(char * WXUNUSED(buffer), int WXUNUSED(size))

 {
 }
 
 {
 }
 

-wxTCPConnection::~wxTCPConnection (void)
+wxTCPConnection::~wxTCPConnection ()

 {
 {

-  wxDELETE(m_sock);
-  wxDELETE(m_codec);
+  wxDELETE(m_codeci);
+  wxDELETE(m_codeco);

   wxDELETE(m_sockstrm);
   wxDELETE(m_sockstrm);

+
+  if (m_sock)
+  {
+    m_sock->SetClientData(NULL);
+    m_sock->Destroy();
+  }

 }
 
 }
 

-void wxTCPConnection::Compress(bool on)
+void wxTCPConnection::Compress(bool WXUNUSED(on))

 {
   // Use wxLZWStream
 }
 
 // Calls that CLIENT can make.
 {
   // Use wxLZWStream
 }
 
 // Calls that CLIENT can make.

-bool wxTCPConnection::Disconnect (void)
+bool wxTCPConnection::Disconnect ()

 {
   // Send the the disconnect message to the peer.
 {
   // Send the the disconnect message to the peer.

-  m_codec->Write8(IPC_DISCONNECT);
+  m_codeco->Write8(IPC_DISCONNECT);
+  m_sock->Notify(FALSE);

   m_sock->Close();
 
   return TRUE;
 }
 
   m_sock->Close();
 
   return TRUE;
 }
 

-bool wxTCPConnection::Execute (char *data, int size, wxDataFormat format)
+bool wxTCPConnection::Execute(const wxChar *data, int size, wxIPCFormat format)

 {
   if (!m_sock->IsConnected())
     return FALSE;
 
   // Prepare EXECUTE message
 {
   if (!m_sock->IsConnected())
     return FALSE;
 
   // Prepare EXECUTE message

-  m_codec->Write8(IPC_EXECUTE);
-  m_codec->Write8(format);
+  m_codeco->Write8(IPC_EXECUTE);
+  m_codeco->Write8(format);
+

   if (size < 0)
   if (size < 0)

-    m_codec->WriteString(data);
-  else {
-    m_codec->Write32(size);
-    m_codec->Write(data, size);
-  }
+    size = wxStrlen(data) + 1;    // includes final NUL
+
+  m_codeco->Write32(size);
+  m_sockstrm->Write(data, size);

 
   return TRUE;
 }
 
 
   return TRUE;
 }
 

-char *wxTCPConnection::Request (const wxString& item, int *size, wxDataFormat format)
+char *wxTCPConnection::Request (const wxString& item, int *size, wxIPCFormat format)

 {
   if (!m_sock->IsConnected())
     return NULL;
 
 {
   if (!m_sock->IsConnected())
     return NULL;
 

-  m_codec->Write8(IPC_REQUEST);
-  m_codec->WriteString(item);
-  m_codec->Write8(format);
+  m_codeco->Write8(IPC_REQUEST);
+  m_codeco->WriteString(item);
+  m_codeco->Write8(format);

 
   // If Unpack doesn't initialize it.
   int ret;
 
 
   // If Unpack doesn't initialize it.
   int ret;
 

-  ret = m_codec->Read8();
+  ret = m_codeci->Read8();

   if (ret == IPC_FAIL)
     return NULL;
   if (ret == IPC_FAIL)
     return NULL;

-  else {
+  else
+  {

     size_t s;
     char *data = NULL;
 
     size_t s;
     char *data = NULL;
 

-    s = m_codec->Read32();
+    s = m_codeci->Read32();

     data = new char[s];
     data = new char[s];

-    m_codec->Read(data, s);
+    m_sockstrm->Read(data, s);

 
     if (size)
       *size = s;
 
     if (size)
       *size = s;


@@ -256,20 +343,20 @@ char *wxTCPConnection::Request (const wxString& item, int *size, wxDataFormat fo
   }
 }
 
   }
 }
 

-bool wxTCPConnection::Poke (const wxString& item, char *data, int size, wxDataFormat format)
+bool wxTCPConnection::Poke (const wxString& item, wxChar *data, int size, wxIPCFormat format)

 {
   if (!m_sock->IsConnected())
     return FALSE;
 
 {
   if (!m_sock->IsConnected())
     return FALSE;
 

-  m_codec->Write8(IPC_POKE);
-  m_codec->WriteString(item);
-  m_codec->Write8(format);
+  m_codeco->Write8(IPC_POKE);
+  m_codeco->WriteString(item);
+  m_codeco->Write8(format);
+

   if (size < 0)
   if (size < 0)

-    m_codec->WriteString(data);
-  else {
-    m_codec->Write32(size);
-    m_codec->Write(data, size);
-  }
+    size = wxStrlen(data) + 1;    // includes final NUL
+
+  m_codeco->Write32(size);
+  m_sockstrm->Write(data, size);

 
   return TRUE;
 }
 
   return TRUE;
 }


@@ -281,10 +368,10 @@ bool wxTCPConnection::StartAdvise (const wxString& item)
   if (!m_sock->IsConnected())
     return FALSE;
 
   if (!m_sock->IsConnected())
     return FALSE;
 

-  m_codec->Write8(IPC_ADVISE_START);
-  m_codec->WriteString(item);
+  m_codeco->Write8(IPC_ADVISE_START);
+  m_codeco->WriteString(item);

 
 

-  ret = m_codec->Read8();
+  ret = m_codeci->Read8();

 
   if (ret != IPC_FAIL)
     return TRUE;
 
   if (ret != IPC_FAIL)
     return TRUE;


@@ -299,10 +386,10 @@ bool wxTCPConnection::StopAdvise (const wxString& item)
   if (!m_sock->IsConnected())
     return FALSE;
 
   if (!m_sock->IsConnected())
     return FALSE;
 

-  m_codec->Write8(IPC_ADVISE_STOP);
-  m_codec->WriteString(item);
+  m_codeco->Write8(IPC_ADVISE_STOP);
+  m_codeco->WriteString(item);

 
 

-  msg = m_codec->Read8();
+  msg = m_codeci->Read8();

 
   if (msg != IPC_FAIL)
     return TRUE;
 
   if (msg != IPC_FAIL)
     return TRUE;


@@ -312,108 +399,135 @@ bool wxTCPConnection::StopAdvise (const wxString& item)
 
 // Calls that SERVER can make
 bool wxTCPConnection::Advise (const wxString& item,
 
 // Calls that SERVER can make
 bool wxTCPConnection::Advise (const wxString& item,

-                              char *data, int size, wxDataFormat format)
+                              wxChar *data, int size, wxIPCFormat format)

 {
   if (!m_sock->IsConnected())
     return FALSE;
 
 {
   if (!m_sock->IsConnected())
     return FALSE;
 

-  m_codec->Write8(IPC_ADVISE);
-  m_codec->WriteString(item);
-  m_codec->Write8(format);
+  m_codeco->Write8(IPC_ADVISE);
+  m_codeco->WriteString(item);
+  m_codeco->Write8(format);
+

   if (size < 0)
   if (size < 0)

-    m_codec->WriteString(data);
-  else {
-    m_codec->Write32(size);
-    m_codec->Write(data, size);
-  }
+    size = wxStrlen(data) + 1;    // includes final NUL
+
+  m_codeco->Write32(size);
+  m_sockstrm->Write(data, size);

 
   return TRUE;
 }
 
 
   return TRUE;
 }
 

-void Client_OnRequest(wxSocketBase& sock, wxSocketBase::wxRequestEvent evt,
-                     char *cdata)
+// --------------------------------------------------------------------------
+// wxTCPEventHandler (private class)
+// --------------------------------------------------------------------------
+
+BEGIN_EVENT_TABLE(wxTCPEventHandler, wxEvtHandler)
+  EVT_SOCKET(_CLIENT_ONREQUEST_ID, wxTCPEventHandler::Client_OnRequest)
+  EVT_SOCKET(_SERVER_ONREQUEST_ID, wxTCPEventHandler::Server_OnRequest)
+END_EVENT_TABLE()
+
+void wxTCPEventHandler::Client_OnRequest(wxSocketEvent &event)

 {
 {

+  wxSocketBase *sock = event.GetSocket();
+  wxSocketNotify evt = event.GetSocketEvent();
+  wxTCPConnection *connection = (wxTCPConnection *)(sock->GetClientData());
+
+  // This socket is being deleted; skip this event
+  if (!connection)
+    return;
+

   int msg = 0;
   int msg = 0;

-  wxTCPConnection *connection = (wxTCPConnection *)cdata;
-  wxDataStream *codec;
+  wxDataInputStream *codeci;
+  wxDataOutputStream *codeco; 
+  wxSocketStream *sockstrm;

   wxString topic_name = connection->m_topic;
   wxString item;
 
   wxString topic_name = connection->m_topic;
   wxString item;
 

-  // The socket handler signals us that we lost the connection: destroy all.
-  if (evt == wxSocketBase::EVT_LOST) {
-    sock.Close();
+  // We lost the connection: destroy everything
+  if (evt == wxSOCKET_LOST)
+  {
+    sock->Notify(FALSE);
+    sock->Close();

     connection->OnDisconnect();
     return;
   }
 
   // Receive message number.
     connection->OnDisconnect();
     return;
   }
 
   // Receive message number.

-  codec = connection->m_codec;
-  msg = codec->Read8();
-
-  switch (msg) {
-  case IPC_EXECUTE: {
+  codeci = connection->m_codeci;
+  codeco = connection->m_codeco;
+  sockstrm = connection->m_sockstrm;
+  msg = codeci->Read8();
+
+  switch (msg)
+  {
+  case IPC_EXECUTE:
+  {

     char *data;
     size_t size; 
     char *data;
     size_t size; 

-    wxDataFormat format;
+    wxIPCFormat format;

     
     

-    format = (wxDataFormat)codec->Read8();
-    size = codec->Read32();
+    format = (wxIPCFormat)codeci->Read8();
+    size = codeci->Read32();

     data = new char[size];
     data = new char[size];

-    codec->Read(data, size);
+    sockstrm->Read(data, size);

 
     connection->OnExecute (topic_name, data, size, format);
 
     delete [] data;
     break;
   }
 
     connection->OnExecute (topic_name, data, size, format);
 
     delete [] data;
     break;
   }

-  case IPC_ADVISE: {
+  case IPC_ADVISE:
+  {

     char *data;
     size_t size;
     char *data;
     size_t size;

-    wxDataFormat format;
+    wxIPCFormat format;

 
 

-    item = codec->ReadString();
-    format = (wxDataFormat)codec->Read8();
-    size = codec->Read32();
+    item = codeci->ReadString();
+    format = (wxIPCFormat)codeci->Read8();
+    size = codeci->Read32();

     data = new char[size];
     data = new char[size];

-    codec->Read(data, size);
+    sockstrm->Read(data, size);

     
     connection->OnAdvise (topic_name, item, data, size, format);
 
     delete [] data;
     break;
   }
     
     connection->OnAdvise (topic_name, item, data, size, format);
 
     delete [] data;
     break;
   }

-  case IPC_ADVISE_START: {
-    item = codec->ReadString();
+  case IPC_ADVISE_START:
+  {
+    item = codeci->ReadString();

 
     bool ok = connection->OnStartAdvise (topic_name, item);
     if (ok)
 
     bool ok = connection->OnStartAdvise (topic_name, item);
     if (ok)

-      codec->Write8(IPC_ADVISE_START);
+      codeco->Write8(IPC_ADVISE_START);

     else
     else

-      codec->Write8(IPC_FAIL);
+      codeco->Write8(IPC_FAIL);

 
     break;
   }
 
     break;
   }

-  case IPC_ADVISE_STOP: {
-    item = codec->ReadString();
+  case IPC_ADVISE_STOP:
+  {
+    item = codeci->ReadString();

 
     bool ok = connection->OnStopAdvise (topic_name, item);
     if (ok)
 
     bool ok = connection->OnStopAdvise (topic_name, item);
     if (ok)

-      codec->Write8(IPC_ADVISE_STOP);
+      codeco->Write8(IPC_ADVISE_STOP);

     else
     else

-      codec->Write8(IPC_FAIL);
+      codeco->Write8(IPC_FAIL);

 
     break;
   }
 
     break;
   }

-  case IPC_POKE: {
-    wxDataFormat format;
+  case IPC_POKE:
+  {
+    wxIPCFormat format;

     size_t size;
     size_t size;

-    char *data;
+    wxChar *data;

 
 

-    item = codec->ReadString();
-    format = (wxDataFormat)codec->Read8();
-    size = codec->Read32();
-    data = new char[size];
-    codec->Read(data, size);
+    item = codeci->ReadString();
+    format = (wxIPCFormat)codeci->Read8();
+    size = codeci->Read32();
+    data = new wxChar[size];
+    sockstrm->Read(data, size);

     
     connection->OnPoke (topic_name, item, data, size, format);
 
     
     connection->OnPoke (topic_name, item, data, size, format);
 


@@ -421,87 +535,128 @@ void Client_OnRequest(wxSocketBase& sock, wxSocketBase::wxRequestEvent evt,
 
     break;
   }
 
     break;
   }

-  case IPC_REQUEST: {
-    wxDataFormat format;
+  case IPC_REQUEST:
+  {
+    wxIPCFormat format;

 
 

-    item = codec->ReadString();
-    format = (wxDataFormat)codec->Read8();
+    item = codeci->ReadString();
+    format = (wxIPCFormat)codeci->Read8();

 
     int user_size = -1;
     char *user_data = connection->OnRequest (topic_name, item, &user_size, format);
 
 
     int user_size = -1;
     char *user_data = connection->OnRequest (topic_name, item, &user_size, format);
 

-    if (user_data) {
-      codec->Write8(IPC_REQUEST_REPLY);
-      if (user_size != -1) {
-        codec->Write32(user_size);
-        codec->Write(user_data, user_size);
-      } else
-        codec->WriteString(user_data);
-    } else
-      codec->Write8(IPC_FAIL);
+    if (user_data)
+    {
+      codeco->Write8(IPC_REQUEST_REPLY);
+
+      if (user_size == -1)
+        user_size = strlen(user_data) + 1;      // includes final NUL
+
+      codeco->Write32(user_size);
+      sockstrm->Write(user_data, user_size);
+    }
+    else
+      codeco->Write8(IPC_FAIL);

 
     break;
   }
 
     break;
   }

-  case IPC_DISCONNECT: {
-    sock.Close();
+  case IPC_DISCONNECT:
+  {
+    sock->Notify(FALSE);
+    sock->Close();

     connection->OnDisconnect();
     break;
   }
   default:
     connection->OnDisconnect();
     break;
   }
   default:

-    codec->Write8(IPC_FAIL);
+    codeco->Write8(IPC_FAIL);

     break;
   }
 }
 
     break;
   }
 }
 

-void Server_OnRequest(wxSocketServer& server,
-                     wxSocketBase::wxRequestEvent evt, char *cdata)
+void wxTCPEventHandler::Server_OnRequest(wxSocketEvent &event)

 {
 {

-  wxTCPServer *ipcserv = (wxTCPServer *)cdata;
-  wxSocketStream *stream;
-  wxDataStream *codec;
+  wxSocketServer *server = (wxSocketServer *) event.GetSocket();
+  wxTCPServer *ipcserv = (wxTCPServer *) server->GetClientData();

 
 

-  if (evt != wxSocketBase::EVT_ACCEPT)
+  // This socket is being deleted; skip this event
+  if (!ipcserv)

     return;
 
     return;
 

-  /* Accept the connection, getting a new socket */
-  wxSocketBase *sock = server.Accept();
-  sock->Notify(FALSE);
-  sock->SetNotify(wxSocketBase::REQ_READ | wxSocketBase::REQ_LOST);
-
-  stream = new wxSocketStream(*sock);
-  codec = new wxDataStream(*stream);
+  if (event.GetSocketEvent() != wxSOCKET_CONNECTION)
+    return;

 
 

+  // Accept the connection, getting a new socket
+  wxSocketBase *sock = server->Accept();

   if (!sock->Ok())
   if (!sock->Ok())

+  {
+    sock->Destroy();

     return;
     return;

+  }
+
+  wxSocketStream *stream     = new wxSocketStream(*sock);
+  wxDataInputStream *codeci  = new wxDataInputStream(*stream);
+  wxDataOutputStream *codeco = new wxDataOutputStream(*stream);

 
   int msg;
 
   int msg;

-  msg = codec->Read8();
+  msg = codeci->Read8();

 
 

-  if (msg == IPC_CONNECT) {
+  if (msg == IPC_CONNECT)
+  {

     wxString topic_name;
     wxString topic_name;

-    topic_name = codec->ReadString();
+    topic_name = codeci->ReadString();

 
 

-    /* Register new socket with the notifier */

     wxTCPConnection *new_connection =
          (wxTCPConnection *)ipcserv->OnAcceptConnection (topic_name);
     wxTCPConnection *new_connection =
          (wxTCPConnection *)ipcserv->OnAcceptConnection (topic_name);

-    if (new_connection) {
-      if (!new_connection->IsKindOf(CLASSINFO(wxTCPConnection))) {
-        delete new_connection;
-        codec->Write8(IPC_FAIL);
+
+    if (new_connection)
+    {
+      if (new_connection->IsKindOf(CLASSINFO(wxTCPConnection)))
+      {
+        // Acknowledge success
+        codeco->Write8(IPC_CONNECT);
+        new_connection->m_topic = topic_name;
+        new_connection->m_sock = sock;      
+        new_connection->m_sockstrm = stream;
+        new_connection->m_codeci = codeci;
+        new_connection->m_codeco = codeco;
+        sock->SetEventHandler(*gs_handler, _CLIENT_ONREQUEST_ID);
+        sock->SetClientData(new_connection);
+        sock->SetNotify(wxSOCKET_INPUT_FLAG | wxSOCKET_LOST_FLAG);
+        sock->Notify(TRUE);

         return;
       }
         return;
       }

-      // Acknowledge success
-      codec->Write8(IPC_CONNECT);
-      
-      new_connection->m_topic = topic_name;
-      new_connection->m_sockstrm = stream;
-      new_connection->m_codec = codec;
-      sock->Callback(Client_OnRequest);
-      sock->CallbackData((char *)new_connection);
-      sock->Notify(TRUE);
-    } else {
-      // Send failure message
-      codec->Write8(IPC_FAIL);
+      else
+      {
+        delete new_connection;
+        // and fall through to delete everything else
+      }

     }
   }
     }
   }

+
+  // Something went wrong, send failure message and delete everything
+  codeco->Write8(IPC_FAIL);
+
+  delete codeco;
+  delete codeci;
+  delete stream;
+  sock->Destroy();

 }
 }

+
+// --------------------------------------------------------------------------
+// wxTCPEventHandlerModule (private class)
+// --------------------------------------------------------------------------
+
+class WXDLLEXPORT wxTCPEventHandlerModule: public wxModule
+{
+  DECLARE_DYNAMIC_CLASS(wxTCPEventHandlerModule)
+
+public:
+  bool OnInit() { gs_handler = new wxTCPEventHandler(); return TRUE; }
+  void OnExit() { wxDELETE(gs_handler); }
+};
+
+IMPLEMENT_DYNAMIC_CLASS(wxTCPEventHandlerModule, wxModule)
+
+
+#endif
+    // wxUSE_SOCKETS && wxUSE_IPC