Commit | Line | Data |
---|---|---|
3028581b GS |
1 | #ifndef H_PERLSOCK |
2 | #define H_PERLSOCK 1 | |
3 | ||
4 | #ifdef PERL_OBJECT | |
5 | #else | |
f157735d GS |
6 | #define PerlSock_htonl(x) htonl(x) |
7 | #define PerlSock_htons(x) htons(x) | |
8 | #define PerlSock_ntohl(x) ntohl(x) | |
9 | #define PerlSock_ntohs(x) ntohs(x) | |
10 | #define PerlSock_accept(s, a, l) accept(s, a, l) | |
11 | #define PerlSock_bind(s, n, l) bind(s, n, l) | |
12 | #define PerlSock_connect(s, n, l) connect(s, n, l) | |
13 | #define PerlSock_gethostbyaddr(a, l, t) gethostbyaddr(a, l, t) | |
14 | #define PerlSock_gethostbyname(n) gethostbyname(n) | |
3028581b | 15 | #define PerlSock_gethostent() gethostent() |
f157735d GS |
16 | #define PerlSock_gethostname(n, l) gethostname(n, l) |
17 | #define PerlSock_getpeername(s, n, l) getpeername(s, n, l) | |
18 | #define PerlSock_getprotobyname(n) getprotobyname(n) | |
19 | #define PerlSock_getprotobynumber(n) getprotobynumber(n) | |
3028581b | 20 | #define PerlSock_getprotoent() getprotoent() |
f157735d GS |
21 | #define PerlSock_getservbyname(n, p) getservbyname(n, p) |
22 | #define PerlSock_getservbyport(port, p) getservbyport(port, p) | |
3028581b | 23 | #define PerlSock_getservent() getservent() |
f157735d GS |
24 | #define PerlSock_getsockname(s, n, l) getsockname(s, n, l) |
25 | #define PerlSock_getsockopt(s, l, n, v, i) getsockopt(s, l, n, v, i) | |
26 | #define PerlSock_listen(s, b) listen(s, b) | |
27 | #define PerlSock_recvfrom(s, b, l, f, from, fromlen) recvfrom(s, b, l, f, from, fromlen) | |
28 | #define PerlSock_select(n, r, w, e, t) select(n, r, w, e, t) | |
29 | #define PerlSock_send(s, b, l, f) send(s, b, l, f) | |
30 | #define PerlSock_sendto(s, b, l, f, t, tlen) sendto(s, b, l, f, t, tlen) | |
31 | #define PerlSock_setsockopt(s, l, n, v, len) setsockopt(s, l, n, v, len) | |
32 | #define PerlSock_shutdown(s, h) shutdown(s, h) | |
33 | #define PerlSock_socket(a, t, p) socket(a, t, p) | |
34 | #define PerlSock_socketpair(a, t, p, f) socketpair(a, t, p, f) | |
3028581b GS |
35 | #endif /* PERL_OBJECT */ |
36 | ||
37 | #endif /* Include guard */ |