summaryrefslogtreecommitdiff
path: root/mcon/U/d_htonl.U
blob: 5e601b00411940a41547e9e912e7d3369e5b1ce9 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
?RCS: $Id$
?RCS:
?RCS: Copyright (c) 1991-1997, 2004-2006, Raphael Manfredi
?RCS:
?RCS: You may redistribute only under the terms of the Artistic License,
?RCS: as specified in the README file that comes with the distribution.
?RCS: You may reuse parts of this distribution only within the terms of
?RCS: that same Artistic License; a copy of which may be found at the root
?RCS: of the source tree for dist 4.0.
?RCS:
?RCS: $Log: d_htonl.U,v $
?RCS: Revision 3.0.1.2  1994/08/29  16:09:25  ram
?RCS: patch32: now properly handles htonl() and friends when macros (ADO)
?RCS:
?RCS: Revision 3.0.1.1  1994/05/06  14:45:00  ram
?RCS: patch23: now also check for htonl() macro (ADO)
?RCS:
?RCS: Revision 3.0  1993/08/18  12:06:22  ram
?RCS: Baseline for dist 3.0 netwide release.
?RCS:
?MAKE:d_htonl: Trylink cat i_niin i_sysin
?MAKE:	-pick add $@ %<
?S:d_htonl:
?S:	This variable conditionally defines HAS_HTONL if htonl() and its
?S:	friends are available to do network order byte swapping.
?S:.
?C:HAS_HTONL (HTONL):
?C:	This symbol, if defined, indicates that the htonl() routine (and
?C:	friends htons() ntohl() ntohs()) are available to do network
?C:	order byte swapping.
?C:.
?C:HAS_HTONS (HTONS):
?C:	This symbol, if defined, indicates that the htons() routine (and
?C:	friends htonl() ntohl() ntohs()) are available to do network
?C:	order byte swapping.
?C:.
?C:HAS_NTOHL (NTOHL):
?C:	This symbol, if defined, indicates that the ntohl() routine (and
?C:	friends htonl() htons() ntohs()) are available to do network
?C:	order byte swapping.
?C:.
?C:HAS_NTOHS (NTOHS):
?C:	This symbol, if defined, indicates that the ntohs() routine (and
?C:	friends htonl() htons() ntohl()) are available to do network
?C:	order byte swapping.
?C:.
?H:#$d_htonl HAS_HTONL		/**/
?H:#$d_htonl HAS_HTONS		/**/
?H:#$d_htonl HAS_NTOHL		/**/
?H:#$d_htonl HAS_NTOHS		/**/
?H:.
?LINT:set d_htonl
: see if htonl --and friends-- exist
$cat >try.c <<EOC
#include <stdio.h>
#include <sys/types.h>
#$i_niin I_NETINET_IN
#ifdef I_NETINET_IN
#include <netinet/in.h>
#endif
#$i_sysin I_SYS_IN
#ifdef I_SYS_IN
#include <sys/in.h>
#endif
int main(int argc, char *argv[])
{
	static unsigned long ret;
	unsigned char val = argc;
	(void) argv;
	ret |= htonl(val);
	ret |= htons(val);
	ret |= ntohl(val);
	ret |= ntohs(val);
	return ret ? 0 : 1;
}
EOC
cyn="whether htonl() and friends exist"
set d_htonl
eval $trylink