Include wx/filefn.h to fix PCH-less compilation.

[wxWidgets.git] / samples / sockets / server.cpp

diff --git a/samples/sockets/server.cpp b/samples/sockets/server.cpp
index 4904c662fc829abee027d2d8e8069aa32e4f9e3f..a85ef5deac1b318690bfd394d3a152f9398b8081 100644 (file)
--- a/samples/sockets/server.cpp
+++ b/samples/sockets/server.cpp
@@ -17,11 +17,6 @@
 // headers
 // --------------------------------------------------------------------------
 
 // headers
 // --------------------------------------------------------------------------
 

-#if defined(__GNUG__) && !defined(__APPLE__)
-#  pragma implementation "server.cpp"
-#  pragma interface "server.cpp"
-#endif
-

 // For compilers that support precompilation, includes "wx/wx.h".
 #include "wx/wxprec.h"
 
 // For compilers that support precompilation, includes "wx/wx.h".
 #include "wx/wxprec.h"
 


@@ -36,14 +31,20 @@
 
 #include "wx/socket.h"
 
 
 #include "wx/socket.h"
 

+// this example is currently written to use only IP or only IPv6 sockets, it
+// should be extended to allow using either in the future
+#if wxUSE_IPV6
+    typedef wxIPV6address IPaddress;
+#else
+    typedef wxIPV4address IPaddress;
+#endif
+

 // --------------------------------------------------------------------------
 // resources
 // --------------------------------------------------------------------------
 
 // the application icon
 // --------------------------------------------------------------------------
 // resources
 // --------------------------------------------------------------------------
 
 // the application icon

-#if defined(__WXGTK__) || defined(__WXX11__) || defined(__WXMOTIF__) || defined(__WXMAC__)
-#  include "mondrian.xpm"
-#endif
+#include "mondrian.xpm"

 
 // --------------------------------------------------------------------------
 // classes
 
 // --------------------------------------------------------------------------
 // classes


@@ -64,6 +65,7 @@ public:
   ~MyFrame();
 
   // event handlers (these functions should _not_ be virtual)
   ~MyFrame();
 
   // event handlers (these functions should _not_ be virtual)

+  void OnUDPTest(wxCommandEvent& event);

   void OnQuit(wxCommandEvent& event);
   void OnAbout(wxCommandEvent& event);
   void OnServerEvent(wxSocketEvent& event);
   void OnQuit(wxCommandEvent& event);
   void OnAbout(wxCommandEvent& event);
   void OnServerEvent(wxSocketEvent& event);


@@ -88,6 +90,24 @@ private:
   DECLARE_EVENT_TABLE()
 };
 
   DECLARE_EVENT_TABLE()
 };
 

+// simple helper class to log start and end of each test
+class TestLogger
+{
+public:
+    TestLogger(const wxString& name) : m_name(name)
+    {
+        wxLogMessage("=== %s begins ===", m_name);
+    }
+
+    ~TestLogger()
+    {
+        wxLogMessage("=== %s ends ===", m_name);
+    }
+
+private:
+    const wxString m_name;
+};
+

 // --------------------------------------------------------------------------
 // constants
 // --------------------------------------------------------------------------
 // --------------------------------------------------------------------------
 // constants
 // --------------------------------------------------------------------------


@@ -96,11 +116,12 @@ private:
 enum
 {
   // menu items
 enum
 {
   // menu items

-  SERVER_QUIT = 1000,
-  SERVER_ABOUT,
+  SERVER_UDPTEST = 10,
+  SERVER_QUIT = wxID_EXIT,
+  SERVER_ABOUT = wxID_ABOUT,

 
   // id for sockets
 
   // id for sockets

-  SERVER_ID,
+  SERVER_ID = 100,

   SOCKET_ID
 };
 
   SOCKET_ID
 };
 


@@ -111,6 +132,7 @@ enum
 BEGIN_EVENT_TABLE(MyFrame, wxFrame)
   EVT_MENU(SERVER_QUIT,  MyFrame::OnQuit)
   EVT_MENU(SERVER_ABOUT, MyFrame::OnAbout)
 BEGIN_EVENT_TABLE(MyFrame, wxFrame)
   EVT_MENU(SERVER_QUIT,  MyFrame::OnQuit)
   EVT_MENU(SERVER_ABOUT, MyFrame::OnAbout)

+  EVT_MENU(SERVER_UDPTEST, MyFrame::OnUDPTest)

   EVT_SOCKET(SERVER_ID,  MyFrame::OnServerEvent)
   EVT_SOCKET(SOCKET_ID,  MyFrame::OnSocketEvent)
 END_EVENT_TABLE()
   EVT_SOCKET(SERVER_ID,  MyFrame::OnServerEvent)
   EVT_SOCKET(SOCKET_ID,  MyFrame::OnSocketEvent)
 END_EVENT_TABLE()


@@ -128,6 +150,9 @@ IMPLEMENT_APP(MyApp)
 
 bool MyApp::OnInit()
 {
 
 bool MyApp::OnInit()
 {

+  if ( !wxApp::OnInit() )
+      return false;
+

   // Create the main application window
   MyFrame *frame = new MyFrame();
 
   // Create the main application window
   MyFrame *frame = new MyFrame();
 


@@ -154,6 +179,8 @@ MyFrame::MyFrame() : wxFrame((wxFrame *)NULL, wxID_ANY,
 
   // Make menus
   m_menuFile = new wxMenu();
 
   // Make menus
   m_menuFile = new wxMenu();

+  m_menuFile->Append(SERVER_UDPTEST, "&UDP test\tCtrl-U");
+  m_menuFile->AppendSeparator();

   m_menuFile->Append(SERVER_ABOUT, _("&About...\tCtrl-A"), _("Show about dialog"));
   m_menuFile->AppendSeparator();
   m_menuFile->Append(SERVER_QUIT, _("E&xit\tAlt-X"), _("Quit server"));
   m_menuFile->Append(SERVER_ABOUT, _("&About...\tCtrl-A"), _("Show about dialog"));
   m_menuFile->AppendSeparator();
   m_menuFile->Append(SERVER_QUIT, _("E&xit\tAlt-X"), _("Quit server"));


@@ -173,23 +200,33 @@ MyFrame::MyFrame() : wxFrame((wxFrame *)NULL, wxID_ANY,
                            _("Welcome to wxSocket demo: Server\n"),
                            wxDefaultPosition, wxDefaultSize,
                            wxTE_MULTILINE | wxTE_READONLY);
                            _("Welcome to wxSocket demo: Server\n"),
                            wxDefaultPosition, wxDefaultSize,
                            wxTE_MULTILINE | wxTE_READONLY);

+  delete wxLog::SetActiveTarget(new wxLogTextCtrl(m_text));

 
   // Create the address - defaults to localhost:0 initially
 
   // Create the address - defaults to localhost:0 initially

-  wxIPV4address addr;
+  IPaddress addr;

   addr.Service(3000);
 
   addr.Service(3000);
 

+  wxLogMessage("Creating server at %s:%u", addr.IPAddress(), addr.Service());
+

   // Create the socket
   m_server = new wxSocketServer(addr);
 
   // We use Ok() here to see if the server is really listening
   if (! m_server->Ok())
   {
   // Create the socket
   m_server = new wxSocketServer(addr);
 
   // We use Ok() here to see if the server is really listening
   if (! m_server->Ok())
   {

-    m_text->AppendText(_("Could not listen at the specified port !\n\n"));
+    wxLogMessage("Could not listen at the specified port !");

     return;
   }
     return;
   }

+
+  IPaddress addrReal;
+  if ( !m_server->GetLocal(addrReal) )
+  {
+    wxLogMessage("ERROR: couldn't get the address we bound to");
+  }

   else
   {
   else
   {

-    m_text->AppendText(_("Server listening.\n\n"));
+    wxLogMessage("Server listening at %s:%u",
+                 addrReal.IPAddress(), addrReal.Service());

   }
 
   // Setup the event handler and subscribe to connection events
   }
 
   // Setup the event handler and subscribe to connection events


@@ -223,12 +260,45 @@ void MyFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
                wxOK | wxICON_INFORMATION, this);
 }
 
                wxOK | wxICON_INFORMATION, this);
 }
 

-void MyFrame::Test1(wxSocketBase *sock)
+void MyFrame::OnUDPTest(wxCommandEvent& WXUNUSED(event))

 {
 {

-  unsigned char len;
-  char *buf;
+    TestLogger logtest("UDP test");
+
+    IPaddress addr;
+    addr.Service(3000);
+    wxDatagramSocket sock(addr);
+
+    char buf[1024];
+    size_t n = sock.RecvFrom(addr, buf, sizeof(buf)).LastCount();
+    if ( !n )
+    {
+        wxLogMessage("ERROR: failed to receive data");
+        return;
+    }

 
 

-  m_text->AppendText(_("Test 1 begins\n"));
+    wxLogMessage("Received \"%s\" from %s:%u.",
+                 wxString::From8BitData(buf, n),
+                 addr.IPAddress(), addr.Service());
+
+    for ( size_t i = 0; i < n; i++ )
+    {
+        char& c = buf[i];
+        if ( (c >= 'A' && c <= 'M') || (c >= 'a' && c <= 'm') )
+            c += 13;
+        else if ( (c >= 'N' && c <= 'Z') || (c >= 'n' && c <= 'z') )
+            c -= 13;
+    }
+
+    if ( sock.SendTo(addr, buf, n).LastCount() != n )
+    {
+        wxLogMessage("ERROR: failed to send data");
+        return;
+    }
+}
+
+void MyFrame::Test1(wxSocketBase *sock)
+{
+  TestLogger logtest("Test 1");

 
   // Receive data from socket and send it back. We will first
   // get a byte with the buffer size, so we can specify the
 
   // Receive data from socket and send it back. We will first
   // get a byte with the buffer size, so we can specify the


@@ -239,54 +309,45 @@ void MyFrame::Test1(wxSocketBase *sock)
   sock->SetFlags(wxSOCKET_WAITALL);
 
   // Read the size
   sock->SetFlags(wxSOCKET_WAITALL);
 
   // Read the size

+  unsigned char len;

   sock->Read(&len, 1);
   sock->Read(&len, 1);

-  buf = new char[len];
+  wxCharBuffer buf(len);

 
   // Read the data
 
   // Read the data

-  sock->Read(buf, len);
-  m_text->AppendText(_("Got the data, sending it back\n"));
+  sock->Read(buf.data(), len);
+  wxLogMessage("Got the data, sending it back");

 
   // Write it back
   sock->Write(buf, len);
 
   // Write it back
   sock->Write(buf, len);

-  delete[] buf;
-
-  m_text->AppendText(_("Test 1 ends\n\n"));

 }
 
 void MyFrame::Test2(wxSocketBase *sock)
 {
 }
 
 void MyFrame::Test2(wxSocketBase *sock)
 {

-#define MAX_MSG_SIZE 10000
-
-  wxString s;
-  wxChar *buf = new wxChar[MAX_MSG_SIZE];
-  wxUint32 len;
+  char buf[4096];

 
 

-  m_text->AppendText(_("Test 2 begins\n"));
+  TestLogger logtest("Test 2");

 
   // We don't need to set flags because ReadMsg and WriteMsg
   // are not affected by them anyway.
 
   // Read the message
 
   // We don't need to set flags because ReadMsg and WriteMsg
   // are not affected by them anyway.
 
   // Read the message

-  len = sock->ReadMsg(buf, MAX_MSG_SIZE * sizeof(wxChar)).LastCount();
-  s.Printf(_("Client says: %s\n"), buf);
-  m_text->AppendText(s);
-  m_text->AppendText(_("Sending the data back\n"));
+  wxUint32 len = sock->ReadMsg(buf, sizeof(buf)).LastCount();
+  if ( !len )
+  {
+      wxLogError("Failed to read message.");
+      return;
+  }
+
+  wxLogMessage("Got \"%s\" from client.", wxString::FromUTF8(buf, len));
+  wxLogMessage("Sending the data back");

 
   // Write it back
   sock->WriteMsg(buf, len);
 
   // Write it back
   sock->WriteMsg(buf, len);

-  delete[] buf;
-
-  m_text->AppendText(_("Test 2 ends\n\n"));
-
-#undef MAX_MSG_SIZE

 }
 
 void MyFrame::Test3(wxSocketBase *sock)
 {
 }
 
 void MyFrame::Test3(wxSocketBase *sock)
 {

-  unsigned char len;
-  char *buf;
-
-  m_text->AppendText(_("Test 3 begins\n"));
+  TestLogger logtest("Test 3");

 
   // This test is similar to the first one, but the len is
   // expressed in kbytes - this tests large data transfers.
 
   // This test is similar to the first one, but the len is
   // expressed in kbytes - this tests large data transfers.


@@ -294,18 +355,16 @@ void MyFrame::Test3(wxSocketBase *sock)
   sock->SetFlags(wxSOCKET_WAITALL);
 
   // Read the size
   sock->SetFlags(wxSOCKET_WAITALL);
 
   // Read the size

+  unsigned char len;

   sock->Read(&len, 1);
   sock->Read(&len, 1);

-  buf = new char[len * 1024];
+  wxCharBuffer buf(len*1024);

 
   // Read the data
 
   // Read the data

-  sock->Read(buf, len * 1024);
-  m_text->AppendText(_("Got the data, sending it back\n"));
+  sock->Read(buf.data(), len * 1024);
+  wxLogMessage("Got the data, sending it back");

 
   // Write it back
   sock->Write(buf, len * 1024);
 
   // Write it back
   sock->Write(buf, len * 1024);

-  delete[] buf;
-
-  m_text->AppendText(_("Test 3 ends\n\n"));

 }
 
 void MyFrame::OnServerEvent(wxSocketEvent& event)
 }
 
 void MyFrame::OnServerEvent(wxSocketEvent& event)


@@ -330,11 +389,20 @@ void MyFrame::OnServerEvent(wxSocketEvent& event)
 
   if (sock)
   {
 
   if (sock)
   {

-    m_text->AppendText(_("New client connection accepted\n\n"));
+    IPaddress addr;
+    if ( !sock->GetPeer(addr) )
+    {
+      wxLogMessage("New connection from unknown client accepted.");
+    }
+    else
+    {
+      wxLogMessage("New client connection from %s:%u accepted",
+                   addr.IPAddress(), addr.Service());
+    }

   }
   else
   {
   }
   else
   {

-    m_text->AppendText(_("Error: couldn't accept a new connection\n\n"));
+    wxLogMessage("Error: couldn't accept a new connection");

     return;
   }
 
     return;
   }
 


@@ -380,7 +448,7 @@ void MyFrame::OnSocketEvent(wxSocketEvent& event)
         case 0xCE: Test2(sock); break;
         case 0xDE: Test3(sock); break;
         default:
         case 0xCE: Test2(sock); break;
         case 0xDE: Test3(sock); break;
         default:

-          m_text->AppendText(_("Unknown test id received from client\n\n"));
+          wxLogMessage("Unknown test id received from client");

       }
 
       // Enable input events again.
       }
 
       // Enable input events again.


@@ -400,7 +468,7 @@ void MyFrame::OnSocketEvent(wxSocketEvent& event)
       // middle of a test or something. Destroy() takes care of all
       // this for us.
 
       // middle of a test or something. Destroy() takes care of all
       // this for us.
 

-      m_text->AppendText(_("Deleting socket.\n\n"));
+      wxLogMessage("Deleting socket.");

       sock->Destroy();
       break;
     }
       sock->Destroy();
       break;
     }