| Commit | Line | Data |
|---|
| 3028581b |
1 | #ifndef H_PERLSOCK |
| 2 | #define H_PERLSOCK 1 |
| 3 | |
| 4 | #ifdef PERL_OBJECT |
| 5 | #else |
| f157735d |
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) |
| dc45a647 |
13 | |
| f157735d |
14 | #define PerlSock_gethostbyaddr(a, l, t) gethostbyaddr(a, l, t) |
| 15 | #define PerlSock_gethostbyname(n) gethostbyname(n) |
| dc45a647 |
16 | #define PerlSock_gethostent gethostent |
| 17 | #define PerlSock_endhostent endhostent |
| f157735d |
18 | #define PerlSock_gethostname(n, l) gethostname(n, l) |
| dc45a647 |
19 | |
| 20 | #define PerlSock_getnetbyaddr(n, t) getnetbyaddr(n, t) |
| 21 | #define PerlSock_getnetbyname(n) getnetbyname(n) |
| 22 | #define PerlSock_getnetent getnetent |
| 23 | #define PerlSock_endnetent endnetent |
| 24 | |
| f157735d |
25 | #define PerlSock_getpeername(s, n, l) getpeername(s, n, l) |
| dc45a647 |
26 | |
| f157735d |
27 | #define PerlSock_getprotobyname(n) getprotobyname(n) |
| 28 | #define PerlSock_getprotobynumber(n) getprotobynumber(n) |
| dc45a647 |
29 | #define PerlSock_getprotoent getprotoent |
| 30 | #define PerlSock_endprotoent endprotoent |
| 31 | |
| f157735d |
32 | #define PerlSock_getservbyname(n, p) getservbyname(n, p) |
| 33 | #define PerlSock_getservbyport(port, p) getservbyport(port, p) |
| dc45a647 |
34 | #define PerlSock_getservent getservent |
| 35 | #define PerlSock_endservent endservent |
| 36 | |
| f157735d |
37 | #define PerlSock_getsockname(s, n, l) getsockname(s, n, l) |
| 38 | #define PerlSock_getsockopt(s, l, n, v, i) getsockopt(s, l, n, v, i) |
| 39 | #define PerlSock_listen(s, b) listen(s, b) |
| 40 | #define PerlSock_recvfrom(s, b, l, f, from, fromlen) recvfrom(s, b, l, f, from, fromlen) |
| 41 | #define PerlSock_select(n, r, w, e, t) select(n, r, w, e, t) |
| 42 | #define PerlSock_send(s, b, l, f) send(s, b, l, f) |
| 43 | #define PerlSock_sendto(s, b, l, f, t, tlen) sendto(s, b, l, f, t, tlen) |
| 44 | #define PerlSock_setsockopt(s, l, n, v, len) setsockopt(s, l, n, v, len) |
| 45 | #define PerlSock_shutdown(s, h) shutdown(s, h) |
| 46 | #define PerlSock_socket(a, t, p) socket(a, t, p) |
| 47 | #define PerlSock_socketpair(a, t, p, f) socketpair(a, t, p, f) |
| 3028581b |
48 | #endif /* PERL_OBJECT */ |
| 49 | |
| 50 | #endif /* Include guard */ |
projects / p5sagit/p5-mst-13.2.git / blame