]> git.saurik.com Git - wxWidgets.git/blobdiff - src/common/sckipc.cpp
adding OnLaunched
[wxWidgets.git] / src / common / sckipc.cpp
index 285810133bfea73f25d9fcfcdd03c8e4a0c197e3..0b5b834536084fd5fbcd7a64d6e81e217b84da10 100644 (file)
@@ -6,6 +6,7 @@
 //              Guillermo Rodriguez (updated for wxSocket v2) Jan 2000
 //                                  (callbacks deprecated)    Mar 2000
 //              Vadim Zeitlin (added support for Unix sockets) Apr 2002
+//                            (use buffering, many fixes/cleanup) Oct 2008
 // Created:     1993
 // RCS-ID:      $Id$
 // Copyright:   (c) Julian Smart 1993
 // macros and constants
 // --------------------------------------------------------------------------
 
-// It seems to be already defined somewhere in the Xt includes.
-#ifndef __XT__
-// Message codes
-enum
+namespace
+{
+
+// Message codes (don't change them to avoid breaking the existing code using
+// wxIPC protocol!)
+enum IPCCode
 {
-  IPC_EXECUTE = 1,
-  IPC_REQUEST,
-  IPC_POKE,
-  IPC_ADVISE_START,
-  IPC_ADVISE_REQUEST,
-  IPC_ADVISE,
-  IPC_ADVISE_STOP,
-  IPC_REQUEST_REPLY,
-  IPC_FAIL,
-  IPC_CONNECT,
-  IPC_DISCONNECT
+    IPC_EXECUTE         = 1,
+    IPC_REQUEST         = 2,
+    IPC_POKE            = 3,
+    IPC_ADVISE_START    = 4,
+    IPC_ADVISE_REQUEST  = 5,
+    IPC_ADVISE          = 6,
+    IPC_ADVISE_STOP     = 7,
+    IPC_REQUEST_REPLY   = 8,
+    IPC_FAIL            = 9,
+    IPC_CONNECT         = 10,
+    IPC_DISCONNECT      = 11,
+    IPC_MAX
 };
-#endif
 
-// All sockets will be created with the following flags
-#define SCKIPC_FLAGS (wxSOCKET_WAITALL)
+} // anonymous namespace
 
 // headers needed for umask()
 #ifdef __UNIX_LIKE__
@@ -83,13 +85,14 @@ enum
 
 // get the address object for the given server name, the caller must delete it
 static wxSockAddress *
-GetAddressFromName(const wxString& serverName, const wxString& host = wxEmptyString)
+GetAddressFromName(const wxString& serverName,
+                   const wxString& host = wxEmptyString)
 {
     // we always use INET sockets under non-Unix systems
-#if defined(__UNIX__) && !defined(__WINDOWS__) && !defined(__WINE__) && (!defined(__WXMAC__) || defined(__DARWIN__))
+#if defined(__UNIX__) && !defined(__WINDOWS__) && !defined(__WINE__)
     // under Unix, if the server name looks like a path, create a AF_UNIX
     // socket instead of AF_INET one
-    if ( serverName.Find(_T('/')) != wxNOT_FOUND )
+    if ( serverName.Find(wxT('/')) != wxNOT_FOUND )
     {
         wxUNIXaddress *addr = new wxUNIXaddress;
         addr->Filename(serverName);
@@ -116,22 +119,232 @@ GetAddressFromName(const wxString& serverName, const wxString& host = wxEmptyStr
 class wxTCPEventHandler : public wxEvtHandler
 {
 public:
-  wxTCPEventHandler() : wxEvtHandler() {}
+    wxTCPEventHandler() : wxEvtHandler() { }
 
-  void Client_OnRequest(wxSocketEvent& event);
-  void Server_OnRequest(wxSocketEvent& event);
+    void Client_OnRequest(wxSocketEvent& event);
+    void Server_OnRequest(wxSocketEvent& event);
 
-  DECLARE_EVENT_TABLE()
-  DECLARE_NO_COPY_CLASS(wxTCPEventHandler)
+private:
+    void HandleDisconnect(wxTCPConnection *connection);
+
+    DECLARE_EVENT_TABLE()
+    wxDECLARE_NO_COPY_CLASS(wxTCPEventHandler);
 };
 
 enum
 {
-  _CLIENT_ONREQUEST_ID = 1000,
-  _SERVER_ONREQUEST_ID
+    _CLIENT_ONREQUEST_ID = 1000,
+    _SERVER_ONREQUEST_ID
+};
+
+// --------------------------------------------------------------------------
+// wxTCPEventHandlerModule (private class)
+// --------------------------------------------------------------------------
+
+class wxTCPEventHandlerModule : public wxModule
+{
+public:
+    wxTCPEventHandlerModule() : wxModule() { }
+
+    // get the global wxTCPEventHandler creating it if necessary
+    static wxTCPEventHandler& GetHandler()
+    {
+        if ( !ms_handler )
+            ms_handler = new wxTCPEventHandler;
+
+        return *ms_handler;
+    }
+
+    // as ms_handler is initialized on demand, don't do anything in OnInit()
+    virtual bool OnInit() { return true; }
+    virtual void OnExit() { wxDELETE(ms_handler); }
+
+private:
+    static wxTCPEventHandler *ms_handler;
+
+    DECLARE_DYNAMIC_CLASS(wxTCPEventHandlerModule)
+    wxDECLARE_NO_COPY_CLASS(wxTCPEventHandlerModule);
+};
+
+IMPLEMENT_DYNAMIC_CLASS(wxTCPEventHandlerModule, wxModule)
+
+wxTCPEventHandler *wxTCPEventHandlerModule::ms_handler = NULL;
+
+// --------------------------------------------------------------------------
+// wxIPCSocketStreams
+// --------------------------------------------------------------------------
+
+#define USE_BUFFER
+
+// this class contains the various (related) streams used by wxTCPConnection
+// and also provides a way to read from the socket stream directly
+//
+// for writing to the stream use the IPCOutput class below
+class wxIPCSocketStreams
+{
+public:
+    // ctor initializes all the streams on top of the given socket
+    //
+    // note that we use a bigger than default buffer size which matches the
+    // typical Ethernet MTU (minus TCP header overhead)
+    wxIPCSocketStreams(wxSocketBase& sock)
+        : m_socketStream(sock),
+#ifdef USE_BUFFER
+          m_bufferedOut(m_socketStream, 1448),
+#else
+          m_bufferedOut(m_socketStream),
+#endif
+          m_dataIn(m_socketStream),
+          m_dataOut(m_bufferedOut)
+    {
+    }
+
+    // expose the IO methods needed by IPC code (notice that writing is only
+    // done via IPCOutput)
+
+    // flush output
+    void Flush()
+    {
+#ifdef USE_BUFFER
+        m_bufferedOut.Sync();
+#endif
+    }
+
+    // simple wrappers around the functions with the same name in
+    // wxDataInputStream
+    wxUint8 Read8()
+    {
+        Flush();
+        return m_dataIn.Read8();
+    }
+
+    wxUint32 Read32()
+    {
+        Flush();
+        return m_dataIn.Read32();
+    }
+
+    wxString ReadString()
+    {
+        Flush();
+        return m_dataIn.ReadString();
+    }
+
+    // read arbitrary (size-prepended) data
+    //
+    // connection parameter is needed to call its GetBufferAtLeast() method
+    void *ReadData(wxConnectionBase *conn, size_t *size)
+    {
+        Flush();
+
+        wxCHECK_MSG( conn, NULL, "NULL connection parameter" );
+        wxCHECK_MSG( size, NULL, "NULL size parameter" );
+
+        *size = Read32();
+
+        void * const data = conn->GetBufferAtLeast(*size);
+        wxCHECK_MSG( data, NULL, "IPC buffer allocation failed" );
+
+        m_socketStream.Read(data, *size);
+
+        return data;
+    }
+
+    // same as above but for data preceded by the format
+    void *
+    ReadFormatData(wxConnectionBase *conn, wxIPCFormat *format, size_t *size)
+    {
+        wxCHECK_MSG( format, NULL, "NULL format parameter" );
+
+        *format = static_cast<wxIPCFormat>(Read8());
+
+        return ReadData(conn, size);
+    }
+
+
+    // these methods are only used by IPCOutput and not directly
+    wxDataOutputStream& GetDataOut() { return m_dataOut; }
+    wxOutputStream& GetUnformattedOut() { return m_bufferedOut; }
+
+private:
+    // this is the low-level underlying stream using the connection socket
+    wxSocketStream m_socketStream;
+
+    // the buffered stream is used to avoid writing all pieces of an IPC
+    // request to the socket one by one but to instead do it all at once when
+    // we're done with it
+#ifdef USE_BUFFER
+    wxBufferedOutputStream m_bufferedOut;
+#else
+    wxOutputStream& m_bufferedOut;
+#endif
+
+    // finally the data streams are used to be able to write typed data into
+    // the above streams easily
+    wxDataInputStream  m_dataIn;
+    wxDataOutputStream m_dataOut;
+
+    wxDECLARE_NO_COPY_CLASS(wxIPCSocketStreams);
+};
+
+namespace
+{
+
+// an object of this class should be instantiated on the stack to write to the
+// underlying socket stream
+//
+// this class is intentionally separated from wxIPCSocketStreams to ensure that
+// Flush() is always called
+class IPCOutput
+{
+public:
+    // construct an object associated with the given streams (which must have
+    // life time greater than ours as we keep a reference to it)
+    IPCOutput(wxIPCSocketStreams *streams)
+        : m_streams(*streams)
+    {
+        wxASSERT_MSG( streams, "NULL streams pointer" );
+    }
+
+    // dtor calls Flush() really sending the IPC data to the network
+    ~IPCOutput() { m_streams.Flush(); }
+
+
+    // write a byte
+    void Write8(wxUint8 i)
+    {
+        m_streams.GetDataOut().Write8(i);
+    }
+
+    // write the reply code and a string
+    void Write(IPCCode code, const wxString& str)
+    {
+        Write8(code);
+        m_streams.GetDataOut().WriteString(str);
+    }
+
+    // write the reply code, a string and a format in this order
+    void Write(IPCCode code, const wxString& str, wxIPCFormat format)
+    {
+        Write(code, str);
+        Write8(format);
+    }
+
+    // write arbitrary data
+    void WriteData(const void *data, size_t size)
+    {
+        m_streams.GetDataOut().Write32(size);
+        m_streams.GetUnformattedOut().Write(data, size);
+    }
+
+
+private:
+    wxIPCSocketStreams& m_streams;
+
+    wxDECLARE_NO_COPY_CLASS(IPCOutput);
 };
 
-static wxTCPEventHandler *gs_handler = NULL;
+} // anonymous namespace
 
 // ==========================================================================
 // implementation
@@ -145,172 +358,166 @@ IMPLEMENT_CLASS(wxTCPConnection, wxConnectionBase)
 // wxTCPClient
 // --------------------------------------------------------------------------
 
-wxTCPClient::wxTCPClient () : wxClientBase()
-{
-}
-
-wxTCPClient::~wxTCPClient ()
+wxTCPClient::wxTCPClient()
+           : wxClientBase()
 {
 }
 
 bool wxTCPClient::ValidHost(const wxString& host)
 {
-  wxIPV4address addr;
+    wxIPV4address addr;
 
-  return addr.Hostname(host);
+    return addr.Hostname(host);
 }
 
-wxConnectionBase *wxTCPClient::MakeConnection (const wxString& host,
-                                               const wxString& serverName,
-                                               const wxString& topic)
+wxConnectionBase *wxTCPClient::MakeConnection(const wxString& host,
+                                              const wxString& serverName,
+                                              const wxString& topic)
 {
-  wxSockAddress *addr = GetAddressFromName(serverName, host);
-  if ( !addr )
-      return NULL;
-
-  wxSocketClient *client = new wxSocketClient(SCKIPC_FLAGS);
-  wxSocketStream *stream = new wxSocketStream(*client);
-  wxDataInputStream *data_is = new wxDataInputStream(*stream);
-  wxDataOutputStream *data_os = new wxDataOutputStream(*stream);
-
-  bool ok = client->Connect(*addr);
-  delete addr;
-
-  if ( ok )
-  {
-    unsigned char msg;
+    wxSockAddress *addr = GetAddressFromName(serverName, host);
+    if ( !addr )
+        return NULL;
 
-    // Send topic name, and enquire whether this has succeeded
-    data_os->Write8(IPC_CONNECT);
-    data_os->WriteString(topic);
+    wxSocketClient * const client = new wxSocketClient(wxSOCKET_WAITALL);
+    wxIPCSocketStreams * const streams = new wxIPCSocketStreams(*client);
 
-    msg = data_is->Read8();
+    bool ok = client->Connect(*addr);
+    delete addr;
 
-    // OK! Confirmation.
-    if (msg == IPC_CONNECT)
+    if ( ok )
     {
-      wxTCPConnection *connection = (wxTCPConnection *)OnMakeConnection ();
+        // Send topic name, and enquire whether this has succeeded
+        IPCOutput(streams).Write(IPC_CONNECT, topic);
 
-      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
+        unsigned char msg = streams->Read8();
+
+        // OK! Confirmation.
+        if (msg == IPC_CONNECT)
         {
-          delete connection;
-          // and fall through to delete everything else
+            wxTCPConnection *
+                connection = (wxTCPConnection *)OnMakeConnection ();
+
+            if (connection)
+            {
+                if (wxDynamicCast(connection, wxTCPConnection))
+                {
+                    connection->m_topic = topic;
+                    connection->m_sock  = client;
+                    connection->m_streams = streams;
+                    client->SetEventHandler(wxTCPEventHandlerModule::GetHandler(),
+                                            _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
+                }
+            }
         }
-      }
     }
-  }
 
-  // Something went wrong, delete everything
-  delete data_is;
-  delete data_os;
-  delete stream;
-  client->Destroy();
+    // Something went wrong, delete everything
+    delete streams;
+    client->Destroy();
 
-  return NULL;
+    return NULL;
 }
 
 wxConnectionBase *wxTCPClient::OnMakeConnection()
 {
-  return new wxTCPConnection();
+    return new wxTCPConnection();
 }
 
 // --------------------------------------------------------------------------
 // wxTCPServer
 // --------------------------------------------------------------------------
 
-wxTCPServer::wxTCPServer () : wxServerBase()
+wxTCPServer::wxTCPServer()
+           : wxServerBase()
 {
-  m_server = NULL;
+    m_server = NULL;
 }
 
 bool wxTCPServer::Create(const wxString& serverName)
 {
-  // Destroy previous server, if any
-  if (m_server)
-  {
-    m_server->SetClientData(NULL);
-    m_server->Destroy();
-    m_server = NULL;
-  }
+    // Destroy previous server, if any
+    if (m_server)
+    {
+        m_server->SetClientData(NULL);
+        m_server->Destroy();
+        m_server = NULL;
+    }
 
-  wxSockAddress *addr = GetAddressFromName(serverName);
-  if ( !addr )
-      return false;
+    wxSockAddress *addr = GetAddressFromName(serverName);
+    if ( !addr )
+        return false;
 
 #ifdef __UNIX_LIKE__
-  mode_t umaskOld;
-  if ( addr->Type() == wxSockAddress::UNIX )
-  {
-      // ensure that the file doesn't exist as otherwise calling socket() would
-      // fail
-      int rc = remove(serverName.fn_str());
-      if ( rc < 0 && errno != ENOENT )
-      {
-          delete addr;
-
-          return false;
-      }
-
-      // also set the umask to prevent the others from reading our file
-      umaskOld = umask(077);
-  }
-  else
-  {
-      // unused anyhow but shut down the compiler warnings
-      umaskOld = 0;
-  }
+    mode_t umaskOld;
+    if ( addr->Type() == wxSockAddress::UNIX )
+    {
+        // ensure that the file doesn't exist as otherwise calling socket()
+        // would fail
+        int rc = remove(serverName.fn_str());
+        if ( rc < 0 && errno != ENOENT )
+        {
+            delete addr;
+
+            return false;
+        }
+
+        // also set the umask to prevent the others from reading our file
+        umaskOld = umask(077);
+    }
+    else
+    {
+        // unused anyhow but shut down the compiler warnings
+        umaskOld = 0;
+    }
 #endif // __UNIX_LIKE__
 
-  // Create a socket listening on the specified port
-  m_server = new wxSocketServer(*addr, SCKIPC_FLAGS);
+    // Create a socket listening on the specified port (reusing it to allow
+    // restarting the server listening on the same port as was used by the
+    // previous instance of this server)
+    m_server = new wxSocketServer(*addr, wxSOCKET_WAITALL | wxSOCKET_REUSEADDR);
 
 #ifdef __UNIX_LIKE__
-  if ( addr->Type() == wxSockAddress::UNIX )
-  {
-      // restore the umask
-      umask(umaskOld);
-
-      // save the file name to remove it later
-      m_filename = serverName;
-  }
+    if ( addr->Type() == wxSockAddress::UNIX )
+    {
+        // restore the umask
+        umask(umaskOld);
+
+        // save the file name to remove it later
+        m_filename = serverName;
+    }
 #endif // __UNIX_LIKE__
 
-  delete addr;
+    delete addr;
 
-  if (!m_server->Ok())
-  {
-    m_server->Destroy();
-    m_server = NULL;
+    if (!m_server->IsOk())
+    {
+        m_server->Destroy();
+        m_server = NULL;
 
-    return false;
-  }
+        return false;
+    }
 
-  m_server->SetEventHandler(*gs_handler, _SERVER_ONREQUEST_ID);
-  m_server->SetClientData(this);
-  m_server->SetNotify(wxSOCKET_CONNECTION_FLAG);
-  m_server->Notify(true);
+    m_server->SetEventHandler(wxTCPEventHandlerModule::GetHandler(),
+                              _SERVER_ONREQUEST_ID);
+    m_server->SetClientData(this);
+    m_server->SetNotify(wxSOCKET_CONNECTION_FLAG);
+    m_server->Notify(true);
 
-  return true;
+    return true;
 }
 
 wxTCPServer::~wxTCPServer()
 {
-    if (m_server)
+    if ( m_server )
     {
         m_server->SetClientData(NULL);
         m_server->Destroy();
@@ -321,189 +528,156 @@ wxTCPServer::~wxTCPServer()
     {
         if ( remove(m_filename.fn_str()) != 0 )
         {
-            wxLogDebug(_T("Stale AF_UNIX file '%s' left."), m_filename.c_str());
+            wxLogDebug(wxT("Stale AF_UNIX file '%s' left."), m_filename.c_str());
         }
     }
 #endif // __UNIX_LIKE__
 }
 
-wxConnectionBase *wxTCPServer::OnAcceptConnection( const wxString& WXUNUSED(topic) )
+wxConnectionBase *
+wxTCPServer::OnAcceptConnection(const wxString& WXUNUSED(topic))
 {
-  return new wxTCPConnection();
+    return new wxTCPConnection();
 }
 
 // --------------------------------------------------------------------------
 // wxTCPConnection
 // --------------------------------------------------------------------------
 
-wxTCPConnection::wxTCPConnection () : wxConnectionBase()
+void wxTCPConnection::Init()
 {
-  m_sock     = NULL;
-  m_sockstrm = NULL;
-  m_codeci   = NULL;
-  m_codeco   = NULL;
+    m_sock = NULL;
+    m_streams = NULL;
 }
 
-wxTCPConnection::wxTCPConnection(void *buffer, size_t size)
-       : wxConnectionBase(buffer, size)
+wxTCPConnection::~wxTCPConnection()
 {
-  m_sock     = NULL;
-  m_sockstrm = NULL;
-  m_codeci   = NULL;
-  m_codeco   = NULL;
-}
+    Disconnect();
 
-wxTCPConnection::~wxTCPConnection ()
-{
-  Disconnect();
-
-  if (m_sock)
-  {
-    m_sock->SetClientData(NULL);
-    m_sock->Destroy();
-  }
-
-  /* Delete after destroy */
-  wxDELETE(m_codeci);
-  wxDELETE(m_codeco);
-  wxDELETE(m_sockstrm);
+    if ( m_sock )
+    {
+        m_sock->SetClientData(NULL);
+        m_sock->Destroy();
+    }
+
+    delete m_streams;
 }
 
 void wxTCPConnection::Compress(bool WXUNUSED(on))
 {
-  // Use wxLZWStream
+    // TODO
 }
 
 // Calls that CLIENT can make.
-bool wxTCPConnection::Disconnect ()
+bool wxTCPConnection::Disconnect()
 {
-  if ( !GetConnected() )
-      return true;
-  // Send the the disconnect message to the peer.
-  m_codeco->Write8(IPC_DISCONNECT);
+    if ( !GetConnected() )
+        return true;
+
+    // Send the disconnect message to the peer.
+    IPCOutput(m_streams).Write8(IPC_DISCONNECT);
 
-  if ( m_sock )
-  {
-      m_sock->Notify(false);
-      m_sock->Close();
-  }
+    if ( m_sock )
+    {
+        m_sock->Notify(false);
+        m_sock->Close();
+    }
 
-  SetConnected(false);
+    SetConnected(false);
 
-  return true;
+    return true;
 }
 
-bool wxTCPConnection::DoExecute(const void *data, size_t size, wxIPCFormat format)
+bool wxTCPConnection::DoExecute(const void *data,
+                                size_t size,
+                                wxIPCFormat format)
 {
-  if (!m_sock->IsConnected())
-    return false;
+    if ( !m_sock->IsConnected() )
+        return false;
 
-  // Prepare EXECUTE message
-  m_codeco->Write8(IPC_EXECUTE);
-  m_codeco->Write8(format);
+    // Prepare EXECUTE message
+    IPCOutput out(m_streams);
+    out.Write8(IPC_EXECUTE);
+    out.Write8(format);
 
-  m_codeco->Write32(size);
-  m_sockstrm->Write(data, size);
+    out.WriteData(data, size);
 
-  return true;
+    return true;
 }
 
-const void *wxTCPConnection::Request (const wxString& item, size_t *size, wxIPCFormat format)
+const void *wxTCPConnection::Request(const wxString& item,
+                                     size_t *size,
+                                     wxIPCFormat format)
 {
-  if (!m_sock->IsConnected())
-    return NULL;
+    if ( !m_sock->IsConnected() )
+        return NULL;
 
-  m_codeco->Write8(IPC_REQUEST);
-  m_codeco->WriteString(item);
-  m_codeco->Write8(format);
+    IPCOutput(m_streams).Write(IPC_REQUEST, item, format);
 
-  // If Unpack doesn't initialize it.
-  int ret;
+    const int ret = m_streams->Read8();
+    if ( ret != IPC_REQUEST_REPLY )
+        return NULL;
 
-  ret = m_codeci->Read8();
-  if (ret == IPC_FAIL)
-    return NULL;
-  else
-  {
-    size_t s = m_codeci->Read32();
-
-    void *data = GetBufferAtLeast( s );
-    wxASSERT_MSG(data != NULL,
-                 _T("Buffer too small in wxTCPConnection::Request") );
-    m_sockstrm->Read(data, s);
-
-    if (size)
-      *size = s;
-    return data;
-  }
+    // ReadData() needs a non-NULL size pointer but the client code can call us
+    // with NULL pointer (this makes sense if it knows that it always works
+    // with NUL-terminated strings)
+    size_t sizeFallback;
+    return m_streams->ReadData(this, size ? size : &sizeFallback);
 }
 
-bool wxTCPConnection::DoPoke (const wxString& item, const void *data, size_t size, wxIPCFormat format)
+bool wxTCPConnection::DoPoke(const wxString& item,
+                             const void *data,
+                             size_t size,
+                             wxIPCFormat format)
 {
-  if (!m_sock->IsConnected())
-    return false;
-
-  m_codeco->Write8(IPC_POKE);
-  m_codeco->WriteString(item);
-  m_codeco->Write8(format);
+    if ( !m_sock->IsConnected() )
+        return false;
 
-  m_codeco->Write32(size);
-  m_sockstrm->Write(data, size);
+    IPCOutput out(m_streams);
+    out.Write(IPC_POKE, item, format);
+    out.WriteData(data, size);
 
-  return true;
+    return true;
 }
 
-bool wxTCPConnection::StartAdvise (const wxString& item)
+bool wxTCPConnection::StartAdvise(const wxString& item)
 {
-  int ret;
+    if ( !m_sock->IsConnected() )
+        return false;
 
-  if (!m_sock->IsConnected())
-    return false;
+    IPCOutput(m_streams).Write(IPC_ADVISE_START, item);
 
-  m_codeco->Write8(IPC_ADVISE_START);
-  m_codeco->WriteString(item);
+    const int ret = m_streams->Read8();
 
-  ret = m_codeci->Read8();
-
-  if (ret != IPC_FAIL)
-    return true;
-  else
-    return false;
+    return ret == IPC_ADVISE_START;
 }
 
 bool wxTCPConnection::StopAdvise (const wxString& item)
 {
-  int msg;
+    if ( !m_sock->IsConnected() )
+        return false;
 
-  if (!m_sock->IsConnected())
-    return false;
+    IPCOutput(m_streams).Write(IPC_ADVISE_STOP, item);
 
-  m_codeco->Write8(IPC_ADVISE_STOP);
-  m_codeco->WriteString(item);
+    const int ret = m_streams->Read8();
 
-  msg = m_codeci->Read8();
-
-  if (msg != IPC_FAIL)
-    return true;
-  else
-    return false;
+    return ret == IPC_ADVISE_STOP;
 }
 
 // Calls that SERVER can make
-bool wxTCPConnection::DoAdvise (const wxString& item,
-                                const void *data, size_t size, wxIPCFormat format)
+bool wxTCPConnection::DoAdvise(const wxString& item,
+                               const void *data,
+                               size_t size,
+                               wxIPCFormat format)
 {
-  if (!m_sock->IsConnected())
-    return false;
+    if ( !m_sock->IsConnected() )
+        return false;
 
-  m_codeco->Write8(IPC_ADVISE);
-  m_codeco->WriteString(item);
-  m_codeco->Write8(format);
+    IPCOutput out(m_streams);
+    out.Write(IPC_ADVISE, item, format);
+    out.WriteData(data, size);
 
-  m_codeco->Write32(size);
-  m_sockstrm->Write(data, size);
-
-  return true;
+    return true;
 }
 
 // --------------------------------------------------------------------------
@@ -511,258 +685,248 @@ bool wxTCPConnection::DoAdvise (const wxString& item,
 // --------------------------------------------------------------------------
 
 BEGIN_EVENT_TABLE(wxTCPEventHandler, wxEvtHandler)
-  EVT_SOCKET(_CLIENT_ONREQUEST_ID, wxTCPEventHandler::Client_OnRequest)
-  EVT_SOCKET(_SERVER_ONREQUEST_ID, wxTCPEventHandler::Server_OnRequest)
+    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)
+void wxTCPEventHandler::HandleDisconnect(wxTCPConnection *connection)
 {
-  wxSocketBase *sock = event.GetSocket();
-  if (!sock) {         /* No socket, no glory */
-    return ;
-  }
-  wxSocketNotify evt = event.GetSocketEvent();
-  wxTCPConnection *connection = (wxTCPConnection *)(sock->GetClientData());
-
-  // This socket is being deleted; skip this event
-  if (!connection)
-    return;
-
-  wxDataInputStream *codeci;
-  wxDataOutputStream *codeco;
-  wxSocketStream *sockstrm;
-  wxString topic_name = connection->m_topic;
-  wxString item;
-
-  // We lost the connection: destroy everything
-  if (evt == wxSOCKET_LOST)
-  {
-    sock->Notify(false);
-    sock->Close();
+    // connection was closed (either gracefully or not): destroy everything
+    connection->m_sock->Notify(false);
+    connection->m_sock->Close();
+
+    // don't leave references to this soon-to-be-dangling connection in the
+    // socket as it won't be destroyed immediately as its destruction will be
+    // delayed in case there are more events pending for it
+    connection->m_sock->SetClientData(NULL);
+
+    connection->SetConnected(false);
     connection->OnDisconnect();
-    return;
-  }
-
-  // Receive message number.
-  codeci = connection->m_codeci;
-  codeco = connection->m_codeco;
-  sockstrm = connection->m_sockstrm;
-  int msg = codeci->Read8();
-
-  switch (msg)
-  {
-  case IPC_EXECUTE:
-  {
-    void *data;
-    size_t size;
-    wxIPCFormat format;
-
-    format = (wxIPCFormat)codeci->Read8();
-    size = codeci->Read32();
-    
-    data = connection->GetBufferAtLeast( size );
-    wxASSERT_MSG(data != NULL,
-                 _T("Buffer too small in wxTCPEventHandler::Client_OnRequest") );
-    sockstrm->Read(data, size);
-
-    connection->OnExecute (topic_name, data, size, format);
-
-    break;
-  }
-  case IPC_ADVISE:
-  {
-    item = codeci->ReadString();
-    wxIPCFormat format = (wxIPCFormat)codeci->Read8();
-    size_t size = codeci->Read32();
-    void *data = connection->GetBufferAtLeast( size );
-    wxASSERT_MSG(data != NULL,
-                 _T("Buffer too small in wxTCPEventHandler::Client_OnRequest") );
-    sockstrm->Read(data, size);
-
-    connection->OnAdvise (topic_name, item, data, size, format);
-
-    break;
-  }
-  case IPC_ADVISE_START:
-  {
-    item = codeci->ReadString();
-
-    bool ok = connection->OnStartAdvise (topic_name, item);
-    if (ok)
-      codeco->Write8(IPC_ADVISE_START);
-    else
-      codeco->Write8(IPC_FAIL);
+}
 
-    break;
-  }
-  case IPC_ADVISE_STOP:
-  {
-    item = codeci->ReadString();
+void wxTCPEventHandler::Client_OnRequest(wxSocketEvent &event)
+{
+    wxSocketBase *sock = event.GetSocket();
+    if (!sock)
+        return;
 
-    bool ok = connection->OnStopAdvise (topic_name, item);
-    if (ok)
-      codeco->Write8(IPC_ADVISE_STOP);
-    else
-      codeco->Write8(IPC_FAIL);
-
-    break;
-  }
-  case IPC_POKE:
-  {
-    item = codeci->ReadString();
-    wxIPCFormat format = (wxIPCFormat)codeci->Read8();
-    size_t size = codeci->Read32();
-    void *data = connection->GetBufferAtLeast( size );
-    wxASSERT_MSG(data != NULL,
-                 _T("Buffer too small in wxTCPEventHandler::Client_OnRequest") );
-    sockstrm->Read(data, size);
-
-    connection->OnPoke (topic_name, item, data, size, format);
-
-    break;
-  }
-  case IPC_REQUEST:
-  {
-    wxIPCFormat format;
-
-    item = codeci->ReadString();
-    format = (wxIPCFormat)codeci->Read8();
-
-    size_t user_size = wxNO_LEN;
-    const void *user_data = connection->OnRequest (topic_name, item, &user_size, format);
-
-    if (user_data)
+    wxSocketNotify evt = event.GetSocketEvent();
+    wxTCPConnection * const
+        connection = static_cast<wxTCPConnection *>(sock->GetClientData());
+
+    // This socket is being deleted; skip this event
+    if (!connection)
+        return;
+
+    if ( evt == wxSOCKET_LOST )
+    {
+        HandleDisconnect(connection);
+        return;
+    }
+
+    // Receive message number.
+    wxIPCSocketStreams * const streams = connection->m_streams;
+
+    const wxString topic = connection->m_topic;
+    wxString item;
+
+    bool error = false;
+
+    const int msg = streams->Read8();
+    switch ( msg )
     {
-      codeco->Write8(IPC_REQUEST_REPLY);
+        case IPC_EXECUTE:
+            {
+                wxIPCFormat format;
+                size_t size wxDUMMY_INITIALIZE(0);
+                void * const
+                    data = streams->ReadFormatData(connection, &format, &size);
+                if ( data )
+                    connection->OnExecute(topic, data, size, format);
+                else
+                    error = true;
+            }
+            break;
 
-      if (user_size == wxNO_LEN)
-      {
-        switch (format)
-        {
-          case wxIPC_TEXT:
-          case wxIPC_UTF8TEXT:
-            user_size = strlen((const char *)user_data) + 1;  // includes final NUL
+        case IPC_ADVISE:
+            {
+                item = streams->ReadString();
+
+                wxIPCFormat format;
+                size_t size wxDUMMY_INITIALIZE(0);
+                void * const
+                    data = streams->ReadFormatData(connection, &format, &size);
+
+                if ( data )
+                    connection->OnAdvise(topic, item, data, size, format);
+                else
+                    error = true;
+            }
             break;
-          case wxIPC_UNICODETEXT:
-            user_size = (wcslen((const wchar_t *)user_data) + 1) * sizeof(wchar_t);  // includes final NUL
+
+        case IPC_ADVISE_START:
+            {
+                item = streams->ReadString();
+
+                IPCOutput(streams).Write8(connection->OnStartAdvise(topic, item)
+                                            ? IPC_ADVISE_START
+                                            : IPC_FAIL);
+            }
             break;
-          default:
-            user_size = 0;
-        }
-      }
 
-      codeco->Write32(user_size);
-      sockstrm->Write(user_data, user_size);
+        case IPC_ADVISE_STOP:
+            {
+                item = streams->ReadString();
+
+                IPCOutput(streams).Write8(connection->OnStopAdvise(topic, item)
+                                             ? IPC_ADVISE_STOP
+                                             : IPC_FAIL);
+            }
+            break;
+
+        case IPC_POKE:
+            {
+                item = streams->ReadString();
+                wxIPCFormat format = (wxIPCFormat)streams->Read8();
+
+                size_t size wxDUMMY_INITIALIZE(0);
+                void * const data = streams->ReadData(connection, &size);
+
+                if ( data )
+                    connection->OnPoke(topic, item, data, size, format);
+                else
+                    error = true;
+            }
+            break;
+
+        case IPC_REQUEST:
+            {
+                item = streams->ReadString();
+
+                wxIPCFormat format = (wxIPCFormat)streams->Read8();
+
+                size_t user_size = wxNO_LEN;
+                const void *user_data = connection->OnRequest(topic,
+                                                              item,
+                                                              &user_size,
+                                                              format);
+
+                if ( !user_data )
+                {
+                    IPCOutput(streams).Write8(IPC_FAIL);
+                    break;
+                }
+
+                IPCOutput out(streams);
+                out.Write8(IPC_REQUEST_REPLY);
+
+                if ( user_size == wxNO_LEN )
+                {
+                    switch ( format )
+                    {
+                        case wxIPC_TEXT:
+                        case wxIPC_UTF8TEXT:
+                            user_size = strlen((const char *)user_data) + 1;  // includes final NUL
+                            break;
+                        case wxIPC_UNICODETEXT:
+                            user_size = (wcslen((const wchar_t *)user_data) + 1) * sizeof(wchar_t);  // includes final NUL
+                            break;
+                        default:
+                            user_size = 0;
+                    }
+                }
+
+                out.WriteData(user_data, user_size);
+            }
+            break;
+
+        case IPC_DISCONNECT:
+            HandleDisconnect(connection);
+            break;
+
+        case IPC_FAIL:
+            wxLogDebug("Unexpected IPC_FAIL received");
+            error = true;
+            break;
+
+        default:
+            wxLogDebug("Unknown message code %d received.", msg);
+            error = true;
+            break;
     }
-    else
-      codeco->Write8(IPC_FAIL);
-
-    break;
-  }
-  case IPC_DISCONNECT:
-  {
-    sock->Notify(false);
-    sock->Close();
-    connection->SetConnected(false);
-    connection->OnDisconnect();
-    break;
-  }
-  default:
-    codeco->Write8(IPC_FAIL);
-    break;
-  }
+
+    if ( error )
+        IPCOutput(streams).Write8(IPC_FAIL);
 }
 
 void wxTCPEventHandler::Server_OnRequest(wxSocketEvent &event)
 {
-  wxSocketServer *server = (wxSocketServer *) event.GetSocket();
-  if (!server) {               /* No server, Then exit */
-         return ;
-  }
-  wxTCPServer *ipcserv = (wxTCPServer *) server->GetClientData();
-
-  // This socket is being deleted; skip this event
-  if (!ipcserv)
-    return;
-
-  if (event.GetSocketEvent() != wxSOCKET_CONNECTION)
-    return;
-
-  // Accept the connection, getting a new socket
-  wxSocketBase *sock = server->Accept();
-  if (!sock) {         /* No socket, no glory */
-         return ;
-  }
-  if (!sock->Ok())
-  {
-    sock->Destroy();
-    return;
-  }
-
-  wxSocketStream *stream     = new wxSocketStream(*sock);
-  wxDataInputStream *codeci  = new wxDataInputStream(*stream);
-  wxDataOutputStream *codeco = new wxDataOutputStream(*stream);
-
-  int msg;
-  msg = codeci->Read8();
+    wxSocketServer *server = (wxSocketServer *) event.GetSocket();
+    if (!server)
+        return;
+    wxTCPServer *ipcserv = (wxTCPServer *) server->GetClientData();
 
-  if (msg == IPC_CONNECT)
-  {
-    wxString topic_name;
-    topic_name = codeci->ReadString();
+    // This socket is being deleted; skip this event
+    if (!ipcserv)
+        return;
 
-    wxTCPConnection *new_connection =
-         (wxTCPConnection *)ipcserv->OnAcceptConnection (topic_name);
+    if (event.GetSocketEvent() != wxSOCKET_CONNECTION)
+        return;
 
-    if (new_connection)
+    // Accept the connection, getting a new socket
+    wxSocketBase *sock = server->Accept();
+    if (!sock)
+        return;
+    if (!sock->IsOk())
     {
-      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);
+        sock->Destroy();
         return;
-      }
-      else
-      {
-        delete new_connection;
-        // and fall through to delete everything else
-      }
     }
-  }
 
-  // Something went wrong, send failure message and delete everything
-  codeco->Write8(IPC_FAIL);
+    wxIPCSocketStreams *streams = new wxIPCSocketStreams(*sock);
 
-  delete codeco;
-  delete codeci;
-  delete stream;
-  sock->Destroy();
-}
-
-// --------------------------------------------------------------------------
-// wxTCPEventHandlerModule (private class)
-// --------------------------------------------------------------------------
-
-class wxTCPEventHandlerModule: public wxModule
-{
-  DECLARE_DYNAMIC_CLASS(wxTCPEventHandlerModule)
+    {
+        IPCOutput out(streams);
 
-public:
-  bool OnInit() { gs_handler = new wxTCPEventHandler(); return true; }
-  void OnExit() { wxDELETE(gs_handler); }
-};
+        const int msg = streams->Read8();
+        if ( msg == IPC_CONNECT )
+        {
+            const wxString topic = streams->ReadString();
+
+            wxTCPConnection *new_connection =
+                (wxTCPConnection *)ipcserv->OnAcceptConnection (topic);
+
+            if (new_connection)
+            {
+                if (wxDynamicCast(new_connection, wxTCPConnection))
+                {
+                    // Acknowledge success
+                    out.Write8(IPC_CONNECT);
+
+                    new_connection->m_sock = sock;
+                    new_connection->m_streams = streams;
+                    new_connection->m_topic = topic;
+                    sock->SetEventHandler(wxTCPEventHandlerModule::GetHandler(),
+                                          _CLIENT_ONREQUEST_ID);
+                    sock->SetClientData(new_connection);
+                    sock->SetNotify(wxSOCKET_INPUT_FLAG | wxSOCKET_LOST_FLAG);
+                    sock->Notify(true);
+                    return;
+                }
+                else
+                {
+                    delete new_connection;
+                    // and fall through to delete everything else
+                }
+            }
+        }
 
-IMPLEMENT_DYNAMIC_CLASS(wxTCPEventHandlerModule, wxModule)
+        // Something went wrong, send failure message and delete everything
+        out.Write8(IPC_FAIL);
+    } // IPCOutput object is destroyed here, before destroying stream
 
+    delete streams;
+    sock->Destroy();
+}
 
-#endif
-   // wxUSE_SOCKETS && wxUSE_IPC && wxUSE_STREAMS
+#endif // wxUSE_SOCKETS && wxUSE_IPC && wxUSE_STREAMS