From 5e6ceed141a18daaf99eaaee42d61f37b0b14c7d Mon Sep 17 00:00:00 2001
From: akiyoshi <akiyoshi@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Thu, 9 Dec 2004 08:15:24 +0000
Subject: Port socket library to VMS.

git-svn-id: http://svn.ruby-lang.org/repos/ruby/branches/ruby_1_8@7525 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 ext/socket/getaddrinfo.c | 7 ++++++-
 ext/socket/socket.c      | 6 +++++-
 2 files changed, 11 insertions(+), 2 deletions(-)

(limited to 'ext/socket')

diff --git a/ext/socket/getaddrinfo.c b/ext/socket/getaddrinfo.c
index 14bedb2e9..514598232 100644
--- a/ext/socket/getaddrinfo.c
+++ b/ext/socket/getaddrinfo.c
@@ -40,7 +40,7 @@
 
 #include "config.h"
 #include <sys/types.h>
-#ifndef _WIN32
+#if !defined(__WIN32) && !defined(__VMS)
 #include <sys/param.h>
 #if defined(__BEOS__)
 # include <net/socket.h>
@@ -62,6 +62,11 @@
 #include <resolv.h>
 #endif
 #include <unistd.h>
+#elif defined(__VMS )
+#include <socket.h>
+#include <inet.h>
+#include <in.h>
+#include <netdb.h>
 #else
 #include <winsock2.h>
 #include <io.h>
diff --git a/ext/socket/socket.c b/ext/socket/socket.c
index 975c0525e..c2f5dfdbb 100644
--- a/ext/socket/socket.c
+++ b/ext/socket/socket.c
@@ -64,6 +64,10 @@
 #endif
 #include "sockport.h"
 
+#if defined(__vms)
+#include <tcp.h>
+#endif
+
 static int do_not_reverse_lookup = 0;
 
 VALUE rb_cBasicSocket;
@@ -1856,7 +1860,7 @@ static VALUE
 sock_s_socketpair(klass, domain, type, protocol)
     VALUE klass, domain, type, protocol;
 {
-#if !defined(_WIN32) && !defined(__BEOS__) && !defined(__EMX__) && !defined(__QNXNTO__)
+#if !defined(_WIN32) && !defined(__BEOS__) && !defined(__EMX__) && !defined(__QNXNTO__) && !defined(__VMS)
     int d, t, sp[2];
 
     setup_domain_and_type(domain, &d, type, &t);
-- 
cgit