#include "gsocket.h"
#endif
-#if defined(__BORLANDC__)
#include <windows.h>
-#endif
#include <winsock.h>
#ifdef __cplusplus
GSocketError _GSocket_Input_Timeout(GSocket *socket);
GSocketError _GSocket_Output_Timeout(GSocket *socket);
+GSocketError _GSocket_Connect_Timeout(GSocket *socket);
int _GSocket_Recv_Stream(GSocket *socket, char *buffer, int size);
int _GSocket_Recv_Dgram(GSocket *socket, char *buffer, int size);
int _GSocket_Send_Stream(GSocket *socket, const char *buffer, int size);
GSocketError _GAddress_translate_from(GAddress *address,
struct sockaddr *addr, int len);
-
-GSocketError _GAddress_translate_to(GAddress *address,
- struct sockaddr **addr, int *len);
-
+GSocketError _GAddress_translate_to (GAddress *address,
+ struct sockaddr **addr, int *len);
GSocketError _GAddress_Init_INET(GAddress *address);
GSocketError _GAddress_Init_UNIX(GAddress *address);
wxSocketNotify evt,
char *cdata);
+
+// All sockets will be created with the following flags
+
+#define SCKIPC_FLAGS wxSOCKET_NONE
+
// ---------------------------------------------------------------------------
// wxTCPClient
// ---------------------------------------------------------------------------
const wxString& server_name,
const wxString& topic)
{
- wxSocketClient *client = new wxSocketClient();
+ wxSocketClient *client = new wxSocketClient(SCKIPC_FLAGS);
wxSocketStream *stream = new wxSocketStream(*client);
wxDataInputStream *data_is = new wxDataInputStream(*stream);
wxDataOutputStream *data_os = new wxDataOutputStream(*stream);
bool wxTCPServer::Create(const wxString& server_name)
{
- wxIPV4address addr;
wxSocketServer *server;
- addr.LocalHost(); // GRG
+ // wxIPV4address defaults to INADDR_ANY:0
+ wxIPV4address addr;
addr.Service(server_name);
// Create a socket listening on specified port
- server = new wxSocketServer(addr);
+ server = new wxSocketServer(addr, SCKIPC_FLAGS);
server->Callback((wxSocketBase::wxSockCbk)Server_OnRequest);
server->CallbackData((char *)this);
server->SetNotify(wxSOCKET_CONNECTION_FLAG);
- server->Notify(TRUE); // GRG
+ server->Notify(TRUE);
return TRUE;
}
// Purpose: Socket handler classes
// Authors: Guilhem Lavaux, Guillermo Rodriguez Garcia
// Created: April 1997
-// Updated: September 1999
-// Copyright: (C) 1999, 1998, 1997, Guilhem Lavaux
-// (C) 1999, Guillermo Rodriguez Garcia
+// Copyright: (C) 1999-1997, Guilhem Lavaux
+// (C) 2000-1999, Guillermo Rodriguez Garcia
// RCS_ID: $Id$
// License: see wxWindows license
/////////////////////////////////////////////////////////////////////////////
// use wxPostEvent or not
#define EXPERIMENTAL_USE_POST 1
-
// --------------------------------------------------------------
// ClassInfos
// --------------------------------------------------------------
m_lcount = _Read(buffer, nbytes);
- // If in WAITALL mode, all bytes should have been read.
- if (m_flags & WAITALL)
+ // If in wxSOCKET_WAITALL mode, all bytes should have been read.
+ if (m_flags & wxSOCKET_WAITALL)
m_error = (m_lcount != nbytes);
else
m_error = (m_lcount == 0);
{
while (ret > 0 && nbytes > 0)
{
- if (!(m_flags & wxSOCKET_BLOCK) && !(WaitForRead()))
+ if (!(m_flags & wxSOCKET_BLOCK) && !WaitForRead())
break;
ret = GSocket_Read(m_socket, buffer, nbytes);
{
while (ret > 0 && nbytes > 0)
{
- if (!(m_flags & wxSOCKET_BLOCK) && !(WaitForWrite()))
+ if (!(m_flags & wxSOCKET_BLOCK) && !WaitForWrite())
break;
ret = GSocket_Write(m_socket, buffer, nbytes);
// wxSocketBase Wait functions
// --------------------------------------------------------------
-// GRG: I have completely rewritten this family of functions
-// so that they don't depend on event notifications; instead,
-// they poll the socket, using GSocket_Select(), to check for
-// the specified combination of event flags, until an event
-// occurs or until the timeout ellapses. The polling loop
-// calls PROCESS_EVENTS(), so this won't block the GUI.
-
-bool wxSocketBase::_Wait(long seconds, long milliseconds, wxSocketEventFlags flags)
+// These WaitXXX unctions do not depend on the event system any
+// longer; instead, they poll the socket, using GSocket_Select()
+// to check for the specified combination of event flags, until
+// an event occurs or until the timeout ellapses. The polling
+// loop calls PROCESS_EVENTS(), so this won't block the GUI.
+//
+// XXX: Should it honour the wxSOCKET_BLOCK flag ?
+//
+bool wxSocketBase::_Wait(long seconds, long milliseconds,
+ wxSocketEventFlags flags)
{
GSocketEventFlags result;
_wxSocketInternalTimer timer;
// because maybe the WaitXXX functions are not being used.
//
// Do this at least once (important if timeout == 0, when
- // we are just polling)
+ // we are just polling). Also, if just polling, do not yield.
//
while (state == -1)
{
// Wait more?
if ((timeout == 0) || (m_interrupt))
break;
-
- PROCESS_EVENTS();
+ else
+ PROCESS_EVENTS();
}
timer.Stop();
wxSocketEvent event(m_id);
wxSocketEventFlags flag = EventToNotify(req_evt);
- // fprintf(stderr, "%s: Entering OnRequest (evt %d)\n", (m_type == SOCK_CLIENT)? "client" : "server", req_evt);
+ // dbg("Entering OnRequest (evt %d)\n", req_evt);
- // NOTE: this duplicates some of the code in _Wait, (lost
- // connections and delayed connection establishment) but
- // this doesn't hurt. It has to be here because maybe the
- // WaitXXX are not being used, and it has to be in _Wait
- // as well because the event might be a bit delayed.
- //
switch (req_evt)
{
+ // This duplicates some code in _Wait(), but this doesn't
+ // hurt. It has to be here because we don't know whether
+ // WaitXXX will be used, and it has to be in _Wait as well
+ // because the event might be a bit delayed.
+ //
case wxSOCKET_CONNECTION :
m_establishing = FALSE;
m_connected = TRUE;
Close();
break;
- // If we are in the middle of a R/W operation, do not
- // propagate events to users.
- //
+ // If we are in the middle of a R/W operation, do not
+ // propagate events to users. Also, filter 'late' events
+ // which are no longer valid.
+ //
case wxSOCKET_INPUT:
- if (m_reading) return;
+ if (m_reading || !GSocket_Select(m_socket, GSOCK_INPUT_FLAG))
+ return;
+ else
+ break;
case wxSOCKET_OUTPUT:
- if (m_writing) return;
+ if (m_writing || !GSocket_Select(m_socket, GSOCK_OUTPUT_FLAG))
+ return;
+ else
+ break;
}
if (((m_neededreq & flag) == flag) && m_notify_state)
{
- // fprintf(stderr, "%s: Evt %d delivered\n", (m_type == SOCK_CLIENT)? "client" : "server", req_evt);
+ // dbg("Evt %d delivered\n", req_evt);
event.m_socket = this;
event.m_skevt = req_evt;
}
- // fprintf(stderr, "%s: Exiting OnRequest (evt %d)\n", (m_type == SOCK_CLIENT)? "client" : "server", req_evt);
+ // dbg("Exiting OnRequest (evt %d)\n", req_evt);
}
void wxSocketBase::OldOnNotify(wxSocketNotify WXUNUSED(evt))