PR lto/83954
[official-gcc.git] / gcc / ada / gsocket.h
blob8b85854be8a5d5959f54eca3ff52ed8c53c3be25
1 /****************************************************************************
2 * *
3 * GNAT COMPILER COMPONENTS *
4 * *
5 * G S O C K E T *
6 * *
7 * C Header File *
8 * *
9 * Copyright (C) 2004-2018, Free Software Foundation, Inc. *
10 * *
11 * GNAT is free software; you can redistribute it and/or modify it under *
12 * terms of the GNU General Public License as published by the Free Soft- *
13 * ware Foundation; either version 3, or (at your option) any later ver- *
14 * sion. GNAT is distributed in the hope that it will be useful, but WITH- *
15 * OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY *
16 * or FITNESS FOR A PARTICULAR PURPOSE. *
17 * *
18 * As a special exception under Section 7 of GPL version 3, you are granted *
19 * additional permissions described in the GCC Runtime Library Exception, *
20 * version 3.1, as published by the Free Software Foundation. *
21 * *
22 * You should have received a copy of the GNU General Public License and *
23 * a copy of the GCC Runtime Library Exception along with this program; *
24 * see the files COPYING3 and COPYING.RUNTIME respectively. If not, see *
25 * <http://www.gnu.org/licenses/>. *
26 * *
27 * GNAT was originally developed by the GNAT team at New York University. *
28 * Extensive contributions were provided by Ada Core Technologies Inc. *
29 * *
30 ****************************************************************************/
32 #if defined(VTHREADS) || defined(__PikeOS__) || defined(__DJGPP__)
34 /* Sockets not supported on these platforms. */
35 #undef HAVE_SOCKETS
37 #else
39 #define HAVE_SOCKETS
41 #ifndef _XOPEN_SOURCE_EXTENDED
42 #define _XOPEN_SOURCE_EXTENDED 1
43 /* For HP-UX */
44 #endif
46 #ifndef BSD_COMP
47 #define BSD_COMP 1
48 /* For Solaris */
49 #endif
51 #ifndef _ALL_SOURCE
52 #define _ALL_SOURCE 1
53 /* For AIX */
54 #endif
56 /** No system header may be included prior to this point since on some targets
57 ** we need to redefine FD_SETSIZE.
58 **/
60 /* Target-specific includes and definitions */
62 #if defined(__vxworks)
63 #include <vxWorks.h>
64 #include <ioLib.h>
65 #include <hostLib.h>
66 #define SHUT_RD 0
67 #define SHUT_WR 1
68 #define SHUT_RDWR 2
70 #elif defined (WINNT)
71 #define FD_SETSIZE 1024
73 #ifdef __MINGW32__
74 #include <winsock2.h>
75 #include <ws2tcpip.h>
77 #undef EACCES
78 #define EACCES WSAEACCES
79 #undef EADDRINUSE
80 #define EADDRINUSE WSAEADDRINUSE
81 #undef EADDRNOTAVAIL
82 #define EADDRNOTAVAIL WSAEADDRNOTAVAIL
83 #undef EAFNOSUPPORT
84 #define EAFNOSUPPORT WSAEAFNOSUPPORT
85 #undef EALREADY
86 #define EALREADY WSAEALREADY
87 #undef EBADF
88 #define EBADF WSAEBADF
89 #undef ECONNABORTED
90 #define ECONNABORTED WSAECONNABORTED
91 #undef ECONNREFUSED
92 #define ECONNREFUSED WSAECONNREFUSED
93 #undef ECONNRESET
94 #define ECONNRESET WSAECONNRESET
95 #undef EDESTADDRREQ
96 #define EDESTADDRREQ WSAEDESTADDRREQ
97 #undef EFAULT
98 #define EFAULT WSAEFAULT
99 #undef EHOSTDOWN
100 #define EHOSTDOWN WSAEHOSTDOWN
101 #undef EHOSTUNREACH
102 #define EHOSTUNREACH WSAEHOSTUNREACH
103 #undef EINPROGRESS
104 #define EINPROGRESS WSAEINPROGRESS
105 #undef EINTR
106 #define EINTR WSAEINTR
107 #undef EINVAL
108 #define EINVAL WSAEINVAL
109 #undef EIO
110 #define EIO WSAEDISCON
111 #undef EISCONN
112 #define EISCONN WSAEISCONN
113 #undef ELOOP
114 #define ELOOP WSAELOOP
115 #undef EMFILE
116 #define EMFILE WSAEMFILE
117 #undef EMSGSIZE
118 #define EMSGSIZE WSAEMSGSIZE
119 #undef ENAMETOOLONG
120 #define ENAMETOOLONG WSAENAMETOOLONG
121 #undef ENETDOWN
122 #define ENETDOWN WSAENETDOWN
123 #undef ENETRESET
124 #define ENETRESET WSAENETRESET
125 #undef ENETUNREACH
126 #define ENETUNREACH WSAENETUNREACH
127 #undef ENOBUFS
128 #define ENOBUFS WSAENOBUFS
129 #undef ENOPROTOOPT
130 #define ENOPROTOOPT WSAENOPROTOOPT
131 #undef ENOTCONN
132 #define ENOTCONN WSAENOTCONN
133 #undef ENOTSOCK
134 #define ENOTSOCK WSAENOTSOCK
135 #undef EOPNOTSUPP
136 #define EOPNOTSUPP WSAEOPNOTSUPP
137 #undef EPFNOSUPPORT
138 #define EPFNOSUPPORT WSAEPFNOSUPPORT
139 #undef EPROTONOSUPPORT
140 #define EPROTONOSUPPORT WSAEPROTONOSUPPORT
141 #undef EPROTOTYPE
142 #define EPROTOTYPE WSAEPROTOTYPE
143 #undef ESHUTDOWN
144 #define ESHUTDOWN WSAESHUTDOWN
145 #undef ESOCKTNOSUPPORT
146 #define ESOCKTNOSUPPORT WSAESOCKTNOSUPPORT
147 #undef ETIMEDOUT
148 #define ETIMEDOUT WSAETIMEDOUT
149 #undef ETOOMANYREFS
150 #define ETOOMANYREFS WSAETOOMANYREFS
151 #undef EWOULDBLOCK
152 #define EWOULDBLOCK WSAEWOULDBLOCK
154 #define SHUT_RD SD_RECEIVE
155 #define SHUT_WR SD_SEND
156 #define SHUT_RDWR SD_BOTH
158 #endif
160 #include <windows.h>
162 #elif defined(VMS)
163 /* Allow a large number of fds for select. */
164 #define FD_SETSIZE 4096
165 #ifndef IN_RTS
166 /* These DEC C headers are not available when building with GCC. Order is
167 important. */
168 #include <time.h>
169 #include <tcp.h>
170 #include <in.h>
171 #include <ioctl.h>
172 #include <netdb.h>
173 #endif
175 #endif
177 #include <limits.h>
178 #include <errno.h>
180 #if defined (__vxworks) && ! defined (__RTP__)
181 #include <sys/times.h>
182 #else
183 #include <sys/time.h>
184 #endif
186 #if defined(__rtems__)
187 #include <unistd.h>
188 /* Required, for read(), write(), and close() */
189 #endif
192 * RTEMS has these .h files but not until you have built and installed RTEMS.
193 * When building a C/C++ toolset, you also build the newlib C library, so the
194 * build procedure for an RTEMS GNAT toolset requires that you build a C/C++
195 * toolset, then build and install RTEMS with --enable-multilib, and finally
196 * build the Ada part of the toolset.
198 #if !(defined (VMS) || defined (__MINGW32__))
199 #include <sys/socket.h>
200 #include <netinet/in.h>
201 #include <netinet/tcp.h>
202 #include <sys/ioctl.h>
203 #include <netdb.h>
204 #include <unistd.h>
205 #endif
207 #ifdef __ANDROID__
208 #include <unistd.h>
209 #include <sys/select.h>
210 #endif
212 #if defined (_AIX) || defined (__FreeBSD__) || defined (__hpux__) || \
213 defined (_WIN32) || defined (__APPLE__) || defined (__ANDROID__) || \
214 defined (__DragonFly__) || defined (__NetBSD__) || defined (__OpenBSD__)
215 # define HAVE_THREAD_SAFE_GETxxxBYyyy 1
217 #elif defined (__linux__) || defined (__GLIBC__) || \
218 (defined (__sun__) && !defined (__vxworks)) || \
219 defined (__rtems__)
220 # define HAVE_GETxxxBYyyy_R 1
221 #endif
224 * Properties of the unerlying NetDB library:
225 * Need_Netdb_Buffer __gnat_getXXXbyYYY expects a caller-supplied buffer
226 * Need_Netdb_Lock __gnat_getXXXbyYYY expects the caller to ensure
227 * mutual exclusion
229 * See "Handling of gethostbyname, gethostbyaddr, getservbyname and
230 * getservbyport" in socket.c for details.
233 #if defined (HAVE_GETxxxBYyyy_R)
234 # define Need_Netdb_Buffer 1
235 # define Need_Netdb_Lock 0
237 #else
238 # define Need_Netdb_Buffer 0
239 # if !defined (HAVE_THREAD_SAFE_GETxxxBYyyy)
240 # define Need_Netdb_Lock 1
241 # else
242 # define Need_Netdb_Lock 0
243 # endif
244 #endif
246 #if defined (__FreeBSD__) || defined (__vxworks) || defined(__rtems__) \
247 || defined (__DragonFly__) || defined (__NetBSD__) || defined (__OpenBSD__)
248 # define Has_Sockaddr_Len 1
249 #else
250 # define Has_Sockaddr_Len 0
251 #endif
253 #if !(defined (__vxworks) || defined (_WIN32) || defined (__hpux__) || defined (VMS))
254 # define HAVE_INET_PTON
255 #endif
257 #endif /* defined(VTHREADS) */