Amebis/wxWidgets
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fixing/Testing sockets on OpenVMS

Browse Source 
git-svn-id: https://svn.wxwidgets.org/svn/wx/wxWidgets/trunk@58032 c3d73ce0-8a6f-49c7-b76d-6d57e0e08775
This commit is contained in:
Jouk Jansen
2009-01-12 09:06:36 +00:00
parent 0e1381f2fc
commit 66034aba2e
5 changed files with 124 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
descrip.mms
View File

@@ -2,7 +2,7 @@
# *
# Make file for VMS *
# Author : J.Jansen (joukj@hrem.nano.tudelft.nl) *
# Date : 23 November 2007 *
# Date : 12 January 2009 *
# *
#*****************************************************************************
.first
@@ -87,6 +87,8 @@ gtk : [.include.wx]setup.h
$(MMS)$(MMSQUALIFIERS)/macro=(__WXGTK__=1)
set default [-.richedit]
# $(MMS)$(MMSQUALIFIERS)/macro=(__WXGTK__=1)
set default [-.socket]
$(MMS)$(MMSQUALIFIERS)/macro=(__WXGTK__=1)
set default [-.xrc]
$(MMS)$(MMSQUALIFIERS)/macro=(__WXGTK__=1)
set default [--]

4
samples/sockets/baseclient.cpp
View File

@@ -72,7 +72,7 @@ WX_DECLARE_LIST(ThreadWorker, TList);
WX_DECLARE_LIST(EventWorker, EList);
class Client : public wxApp {
DECLARE_EVENT_TABLE();
DECLARE_EVENT_TABLE()
public:
void RemoveEventWorker(EventWorker* p_worker);
private:
@@ -141,7 +141,7 @@ private:
class EventWorker : public wxEvtHandler
{
DECLARE_EVENT_TABLE();
DECLARE_EVENT_TABLE()
public:
EventWorker(const wxString& p_host, char* p_buf, int p_size);
void Run();

4
samples/sockets/baseserver.cpp
View File

@@ -101,7 +101,7 @@ WX_DECLARE_LIST(EventWorker, EList);
//and list of two type worker classes that serve clients
class Server : public wxApp
{
DECLARE_EVENT_TABLE();
DECLARE_EVENT_TABLE()
public:
Server() : m_maxConnections(-1) {}
~Server() {}
@@ -198,7 +198,7 @@ private:
void DoWrite();
void DoRead();
DECLARE_EVENT_TABLE();
DECLARE_EVENT_TABLE()
};
/******************* Implementation ******************/

114
samples/sockets/descrip.mms Normal file
View File

@@ -0,0 +1,114 @@
#*****************************************************************************
# *
# Make file for VMS *
# Author : J.Jansen (joukj@hrem.nano.tudelft.nl) *
# Date : 12 January 2009 *
# *
#*****************************************************************************
.first
define wx [--.include.wx]
.ifdef __WXMOTIF__
CXX_DEFINE = /define=(__WXMOTIF__=1)/name=(as_is,short)\
/assume=(nostdnew,noglobal_array_new)
.else
.ifdef __WXGTK__
CXX_DEFINE = /define=(__WXGTK__=1)/float=ieee/name=(as_is,short)/ieee=denorm\
/assume=(nostdnew,noglobal_array_new)
.else
.ifdef __WXGTK2__
CXX_DEFINE = /define=(__WXGTK__=1,VMS_GTK2=1)/float=ieee/name=(as_is,short)/ieee=denorm\
/assume=(nostdnew,noglobal_array_new)
.else
.ifdef __WXX11__
CXX_DEFINE = /define=(__WXX11__=1,__WXUNIVERSAL__==1)/float=ieee\
/name=(as_is,short)/assume=(nostdnew,noglobal_array_new)
.else
CXX_DEFINE =
.endif
.endif
.endif
.endif
.suffixes : .cpp
.cpp.obj :
cxx $(CXXFLAGS)$(CXX_DEFINE) $(MMS$TARGET_NAME).cpp
all :
.ifdef __WXMOTIF__
$(MMS)$(MMSQUALIFIERS) baseclient.exe
$(MMS)$(MMSQUALIFIERS) baseserver.exe
$(MMS)$(MMSQUALIFIERS) client.exe
$(MMS)$(MMSQUALIFIERS) server.exe
.else
.ifdef __WXGTK__
$(MMS)$(MMSQUALIFIERS) baseclient_gtk.exe
$(MMS)$(MMSQUALIFIERS) baseserver_gtk.exe
$(MMS)$(MMSQUALIFIERS) client_gtk.exe
$(MMS)$(MMSQUALIFIERS) server_gtk.exe
.else
.ifdef __WXGTK2__
$(MMS)$(MMSQUALIFIERS) baseclient_gtk2.exe
$(MMS)$(MMSQUALIFIERS) baseserver_gtk2.exe
$(MMS)$(MMSQUALIFIERS) client_gtk2.exe
$(MMS)$(MMSQUALIFIERS) server_gtk2.exe
.else
.ifdef __WXX11__
$(MMS)$(MMSQUALIFIERS) baseclient_x11.exe
$(MMS)$(MMSQUALIFIERS) baseserver_x11.exe
$(MMS)$(MMSQUALIFIERS) client_x11.exe
$(MMS)$(MMSQUALIFIERS) server_x11.exe
.endif
.endif
.endif
.endif
.ifdef __WXMOTIF__
baseclient.exe : baseclient.obj
cxxlink baseclient,[--.lib]vms/opt
baseserver.exe : baseserver.obj
cxxlink baseserver,[--.lib]vms/opt
client.exe : client.obj
cxxlink client,[--.lib]vms/opt
server.exe : server.obj
cxxlink server,[--.lib]vms/opt
.else
.ifdef __WXGTK__
baseclient_gtk.exe : baseclient.obj
cxxlink/exe=baseclient_gtk.exe baseclient,[--.lib]vms_gtk/opt
baseserver_gtk.exe : baseserver.obj
cxxlink/exe=baseserver_gtk.exe baseserver,[--.lib]vms_gtk/opt
client_gtk.exe : client.obj
cxxlink/exe=client_gtk client,[--.lib]vms_gtk/opt
server_gtk.exe : server.obj
cxxlink/exe=server_gtk.exe server,[--.lib]vms_gtk/opt
.else
.ifdef __WXGTK2__
baseclient_gtk2.exe : baseclient.obj
cxxlink/exe=baseclient_gtk2.exe baseclient,[--.lib]vms_gtk2/opt
baseserver_gtk2.exe : baseserver.obj
cxxlink/exe=baseserver_gtk2.exe baseserver,[--.lib]vms_gtk2/opt
client_gtk2.exe : client.obj
cxxlink/exe=client_gtk2 client,[--.lib]vms_gtk2/opt
server_gtk2.exe : server.obj
cxxlink/exe=server_gtk2.exe server,[--.lib]vms_gtk2/opt
.else
.ifdef __WXX11__
baseclient_x11.exe : baseclient.obj
cxxlink/exe=baseclient_x11.exe baseclient,[--.lib]vms_x11/opt
baseserver_x11.exe : baseserver.obj
cxxlink/exe=baseserver_x11.exe baseserver,[--.lib]vms_x11/opt
client_x11.exe : client.obj
cxxlink/exe=client_x11 client,[--.lib]vms_x11/opt
server_x11.exe : server.obj
cxxlink/exe=server_x11.exe server,[--.lib]vms_x11/opt
.endif
.endif
.endif
.endif
baseclient.obj : baseclient.cpp
baseserver.obj : baseserver.cpp
client.obj : client.cpp
server.obj : server.cpp

4
src/common/socket.cpp
View File

@@ -57,10 +57,12 @@
// this should cover all the current Unix systems (Windows never sends any
// signals anyhow) but if we find one that has neither we should explicitly
// ignore SIGPIPE for it
// OpenVMS has neither MSG_NOSIGNAL nor SO_NOSIGPIPE. However the socket sample
// seems to work. Not sure if problems will show up on OpenVMS using sockets.
#ifdef MSG_NOSIGNAL
#define wxSOCKET_MSG_NOSIGNAL MSG_NOSIGNAL
#else // MSG_NOSIGNAL not available (BSD including OS X)
#if defined(__UNIX__) && !defined(SO_NOSIGPIPE)
#if defined(__UNIX__) && !defined(SO_NOSIGPIPE) && !defined( __VMS )
#error "Writing to socket could generate unhandled SIGPIPE."
#error "Please post information about your system to wx-dev."
#endif