summaryrefslogtreecommitdiffstats
path: root/gcc/ada/3asoccon.ads
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/3asoccon.ads')
-rw-r--r--gcc/ada/3asoccon.ads201
1 files changed, 123 insertions, 78 deletions
diff --git a/gcc/ada/3asoccon.ads b/gcc/ada/3asoccon.ads
index 0703268d164..ef3536e4bbc 100644
--- a/gcc/ada/3asoccon.ads
+++ b/gcc/ada/3asoccon.ads
@@ -6,7 +6,7 @@
-- --
-- S p e c --
-- --
--- Copyright (C) 2001 Ada Core Technologies, Inc. --
+-- Copyright (C) 2000-2003 Free Software Foundation, Inc. --
-- --
-- GNAT is free software; you can redistribute it and/or modify it under --
-- terms of the GNU General Public License as published by the Free Soft- --
@@ -26,88 +26,133 @@
-- however invalidate any other reasons why the executable file might be --
-- covered by the GNU Public License. --
-- --
--- GNAT is maintained by Ada Core Technologies Inc (http://www.gnat.com). --
+-- GNAT was originally developed by the GNAT team at New York University. --
+-- Extensive contributions were provided by Ada Core Technologies Inc. --
-- --
------------------------------------------------------------------------------
+-- This package provides target dependent definitions of constant for use
+-- by the GNAT.Sockets package (g-socket.ads). This package should not be
+-- directly with'ed by an applications program.
+
-- This is the version for OSF
package GNAT.Sockets.Constants is
- -- Families
-
- AF_INET : constant := 2;
- AF_INET6 : constant := 26;
-
- -- Modes
-
- SOCK_STREAM : constant := 1;
- SOCK_DGRAM : constant := 2;
-
- -- Socket Errors
-
- EBADF : constant := 9;
- ENOTSOCK : constant := 38;
- ENOTCONN : constant := 57;
- ENOBUFS : constant := 55;
- EOPNOTSUPP : constant := 45;
- EFAULT : constant := 14;
- EWOULDBLOCK : constant := 35;
- EADDRNOTAVAIL : constant := 49;
- EMSGSIZE : constant := 40;
- EADDRINUSE : constant := 48;
- EINVAL : constant := 22;
- EACCES : constant := 13;
- EAFNOSUPPORT : constant := 47;
- EISCONN : constant := 56;
- ETIMEDOUT : constant := 60;
- ECONNREFUSED : constant := 61;
- ENETUNREACH : constant := 51;
- EALREADY : constant := 37;
- EINPROGRESS : constant := 36;
- ENOPROTOOPT : constant := 42;
- EPROTONOSUPPORT : constant := 43;
- EINTR : constant := 4;
- EIO : constant := 5;
- ESOCKTNOSUPPORT : constant := 44;
-
- -- Host Errors
-
- HOST_NOT_FOUND : constant := 1;
- TRY_AGAIN : constant := 2;
- NO_ADDRESS : constant := 4;
- NO_RECOVERY : constant := 3;
-
- -- Control Flags
-
- FIONBIO : constant := -2147195266;
- FIONREAD : constant := 1074030207;
-
- -- Shutdown Modes
-
- SHUT_RD : constant := 0;
- SHUT_WR : constant := 1;
- SHUT_RDWR : constant := 2;
-
- -- Protocol Levels
-
- SOL_SOCKET : constant := 65535;
- IPPROTO_IP : constant := 0;
- IPPROTO_UDP : constant := 17;
- IPPROTO_TCP : constant := 6;
-
- -- Socket Options
-
- TCP_NODELAY : constant := 1;
- SO_SNDBUF : constant := 4097;
- SO_RCVBUF : constant := 4098;
- SO_REUSEADDR : constant := 4;
- SO_KEEPALIVE : constant := 8;
- SO_LINGER : constant := 128;
- SO_ERROR : constant := 4103;
- SO_BROADCAST : constant := 32;
- IP_ADD_MEMBERSHIP : constant := 12;
- IP_DROP_MEMBERSHIP : constant := 13;
- IP_MULTICAST_TTL : constant := 10;
- IP_MULTICAST_LOOP : constant := 11;
+ --------------
+ -- Families --
+ --------------
+
+ AF_INET : constant := 2; -- IPv4 address family
+ AF_INET6 : constant := 26; -- IPv6 address family
+
+ -----------
+ -- Modes --
+ -----------
+
+ SOCK_STREAM : constant := 1; -- Stream socket
+ SOCK_DGRAM : constant := 2; -- Datagram socket
+
+ -------------------
+ -- Socket errors --
+ -------------------
+
+ EACCES : constant := 13; -- Permission denied
+ EADDRINUSE : constant := 48; -- Address already in use
+ EADDRNOTAVAIL : constant := 49; -- Cannot assign address
+ EAFNOSUPPORT : constant := 47; -- Addr family not supported
+ EALREADY : constant := 37; -- Operation in progress
+ EBADF : constant := 9; -- Bad file descriptor
+ ECONNABORTED : constant := 53; -- Connection aborted
+ ECONNREFUSED : constant := 61; -- Connection refused
+ ECONNRESET : constant := 54; -- Connection reset by peer
+ EDESTADDRREQ : constant := 39; -- Destination addr required
+ EFAULT : constant := 14; -- Bad address
+ EHOSTDOWN : constant := 64; -- Host is down
+ EHOSTUNREACH : constant := 65; -- No route to host
+ EINPROGRESS : constant := 36; -- Operation now in progress
+ EINTR : constant := 4; -- Interrupted system call
+ EINVAL : constant := 22; -- Invalid argument
+ EIO : constant := 5; -- Input output error
+ EISCONN : constant := 56; -- Socket already connected
+ ELOOP : constant := 62; -- Too many symbolic lynks
+ EMFILE : constant := 24; -- Too many open files
+ EMSGSIZE : constant := 40; -- Message too long
+ ENAMETOOLONG : constant := 63; -- Name too long
+ ENETDOWN : constant := 50; -- Network is down
+ ENETRESET : constant := 52; -- Disconn. on network reset
+ ENETUNREACH : constant := 51; -- Network is unreachable
+ ENOBUFS : constant := 55; -- No buffer space available
+ ENOPROTOOPT : constant := 42; -- Protocol not available
+ ENOTCONN : constant := 57; -- Socket not connected
+ ENOTSOCK : constant := 38; -- Operation on non socket
+ EOPNOTSUPP : constant := 45; -- Operation not supported
+ EPFNOSUPPORT : constant := 46; -- Unknown protocol family
+ EPROTONOSUPPORT : constant := 43; -- Unknown protocol
+ EPROTOTYPE : constant := 41; -- Unknown protocol type
+ ESHUTDOWN : constant := 58; -- Cannot send once shutdown
+ ESOCKTNOSUPPORT : constant := 44; -- Socket type not supported
+ ETIMEDOUT : constant := 60; -- Connection timed out
+ ETOOMANYREFS : constant := 59; -- Too many references
+ EWOULDBLOCK : constant := 35; -- Operation would block
+
+ -----------------
+ -- Host errors --
+ -----------------
+
+ HOST_NOT_FOUND : constant := 1; -- Unknown host
+ TRY_AGAIN : constant := 2; -- Host name lookup failure
+ NO_DATA : constant := 4; -- No data record for name
+ NO_RECOVERY : constant := 3; -- Non recoverable errors
+
+ -------------------
+ -- Control flags --
+ -------------------
+
+ FIONBIO : constant := -2147195266; -- Set/clear non-blocking io
+ FIONREAD : constant := 1074030207; -- How many bytes to read
+
+ --------------------
+ -- Shutdown modes --
+ --------------------
+
+ SHUT_RD : constant := 0; -- No more recv
+ SHUT_WR : constant := 1; -- No more send
+ SHUT_RDWR : constant := 2; -- No more recv/send
+
+ ---------------------
+ -- Protocol levels --
+ ---------------------
+
+ SOL_SOCKET : constant := 65535; -- Options for socket level
+ IPPROTO_IP : constant := 0; -- Dummy protocol for IP
+ IPPROTO_UDP : constant := 17; -- UDP
+ IPPROTO_TCP : constant := 6; -- TCP
+
+ -------------------
+ -- Request flags --
+ -------------------
+
+ MSG_OOB : constant := 1; -- Process out-of-band data
+ MSG_PEEK : constant := 2; -- Peek at incoming data
+ MSG_EOR : constant := 8; -- Send end of record
+ MSG_WAITALL : constant := 64; -- Wait for full reception
+
+ --------------------
+ -- Socket options --
+ --------------------
+
+ TCP_NODELAY : constant := 1; -- Do not coalesce packets
+ SO_SNDBUF : constant := 4097; -- Set/get send buffer size
+ SO_RCVBUF : constant := 4098; -- Set/get recv buffer size
+ SO_REUSEADDR : constant := 4; -- Bind reuse local address
+ SO_KEEPALIVE : constant := 8; -- Enable keep-alive msgs
+ SO_LINGER : constant := 128; -- Defer close to flush data
+ SO_ERROR : constant := 4103; -- Get/clear error status
+ SO_BROADCAST : constant := 32; -- Can send broadcast msgs
+ IP_ADD_MEMBERSHIP : constant := 12; -- Join a multicast group
+ IP_DROP_MEMBERSHIP : constant := 13; -- Leave a multicast group
+ IP_MULTICAST_TTL : constant := 10; -- Set/get multicast TTL
+ IP_MULTICAST_LOOP : constant := 11; -- Set/get mcast loopback
+
end GNAT.Sockets.Constants;
OpenPOWER on IntegriCloud