This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Generate a valid config.h even if stdarg.h and varargs.h are both missing.
[metaconfig.git] / U / threads / d_getnetbyaddr_r.U
1 ?RCS: $Id: d_getnetbyaddr_r.U,v 0RCS:
2 ?RCS: Copyright (c) 2002,2003 Jarkko Hietaniemi
3 ?RCS:
4 ?RCS: You may distribute under the terms of either the GNU General Public
5 ?RCS: License or the Artistic License, as specified in the README file.
6 ?RCS:
7 ?RCS: Generated by the reentr.pl from the Perl 5.8 distribution.
8 ?RCS:
9 ?MAKE:d_getnetbyaddr_r getnetbyaddr_r_proto: Inlibc Protochk Hasproto \
10         i_systypes usethreads i_netdb extern_C
11 ?MAKE:  -pick add $@ %<
12 ?S:d_getnetbyaddr_r:
13 ?S:     This variable conditionally defines the HAS_GETNETBYADDR_R symbol,
14 ?S:     which indicates to the C program that the getnetbyaddr_r()
15 ?S:     routine is available.
16 ?S:.
17 ?S:getnetbyaddr_r_proto:
18 ?S:     This variable encodes the prototype of getnetbyaddr_r.
19 ?S:     It is zero if d_getnetbyaddr_r is undef, and one of the
20 ?S:     REENTRANT_PROTO_T_ABC macros of reentr.h if d_getnetbyaddr_r
21 ?S:     is defined.
22 ?S:.
23 ?C:HAS_GETNETBYADDR_R:
24 ?C:     This symbol, if defined, indicates that the getnetbyaddr_r routine
25 ?C:     is available to getnetbyaddr re-entrantly.
26 ?C:.
27 ?C:GETNETBYADDR_R_PROTO:
28 ?C:     This symbol encodes the prototype of getnetbyaddr_r.
29 ?C:     It is zero if d_getnetbyaddr_r is undef, and one of the
30 ?C:     REENTRANT_PROTO_T_ABC macros of reentr.h if d_getnetbyaddr_r
31 ?C:     is defined.
32 ?C:.
33 ?H:#$d_getnetbyaddr_r HAS_GETNETBYADDR_R           /**/
34 ?H:#define GETNETBYADDR_R_PROTO $getnetbyaddr_r_proto      /**/
35 ?H:.
36 ?T:try hdrs d_getnetbyaddr_r_proto
37 : see if getnetbyaddr_r exists
38 set getnetbyaddr_r d_getnetbyaddr_r
39 eval $inlibc
40 case "$d_getnetbyaddr_r" in
41 "$define")
42         hdrs="$i_systypes sys/types.h define stdio.h $i_netdb netdb.h"
43         case "$d_getnetbyaddr_r_proto:$usethreads" in
44         ":define")      d_getnetbyaddr_r_proto=define
45                 set d_getnetbyaddr_r_proto getnetbyaddr_r $hdrs
46                 eval $hasproto ;;
47         *)      ;;
48         esac
49         case "$d_getnetbyaddr_r_proto" in
50         define)
51         case "$getnetbyaddr_r_proto" in
52         ''|0) try='int getnetbyaddr_r(unsigned long, int, struct netent*, char*, size_t, struct netent**, int*);'
53         ./protochk "$extern_C $try" $hdrs && getnetbyaddr_r_proto=I_UISBWRE ;;
54         esac
55         case "$getnetbyaddr_r_proto" in
56         ''|0) try='int getnetbyaddr_r(long, int, struct netent*, char*, int);'
57         ./protochk "$extern_C $try" $hdrs && getnetbyaddr_r_proto=I_LISBI ;;
58         esac
59         case "$getnetbyaddr_r_proto" in
60         ''|0) try='struct netent* getnetbyaddr_r(in_addr_t, int, struct netent*, char*, int);'
61         ./protochk "$extern_C $try" $hdrs && getnetbyaddr_r_proto=S_TISBI ;;
62         esac
63         case "$getnetbyaddr_r_proto" in
64         ''|0) try='struct netent* getnetbyaddr_r(long, int, struct netent*, char*, int);'
65         ./protochk "$extern_C $try" $hdrs && getnetbyaddr_r_proto=S_LISBI ;;
66         esac
67         case "$getnetbyaddr_r_proto" in
68         ''|0) try='int getnetbyaddr_r(in_addr_t, int, struct netent*, struct netent_data*);'
69         ./protochk "$extern_C $try" $hdrs && getnetbyaddr_r_proto=I_TISD ;;
70         esac
71         case "$getnetbyaddr_r_proto" in
72         ''|0) try='int getnetbyaddr_r(long, int, struct netent*, struct netent_data*);'
73         ./protochk "$extern_C $try" $hdrs && getnetbyaddr_r_proto=I_LISD ;;
74         esac
75         case "$getnetbyaddr_r_proto" in
76         ''|0) try='int getnetbyaddr_r(int, int, struct netent*, struct netent_data*);'
77         ./protochk "$extern_C $try" $hdrs && getnetbyaddr_r_proto=I_IISD ;;
78         esac
79         case "$getnetbyaddr_r_proto" in
80         ''|0) try='int getnetbyaddr_r(uint32_t, int, struct netent*, char*, size_t, struct netent**, int*);'
81         ./protochk "$extern_C $try" $hdrs && getnetbyaddr_r_proto=I_uISBWRE ;;
82         esac
83         case "$getnetbyaddr_r_proto" in
84         ''|0)   d_getnetbyaddr_r=undef
85                 getnetbyaddr_r_proto=0
86                 echo "Disabling getnetbyaddr_r, cannot determine prototype." >&4 ;;
87         * )     case "$getnetbyaddr_r_proto" in
88                 REENTRANT_PROTO*) ;;
89                 *) getnetbyaddr_r_proto="REENTRANT_PROTO_$getnetbyaddr_r_proto" ;;
90                 esac
91                 echo "Prototype: $try" ;;
92         esac
93         ;;
94         *)      case "$usethreads" in
95                 define) echo "getnetbyaddr_r has no prototype, not using it." >&4 ;;
96                 esac
97                 d_getnetbyaddr_r=undef
98                 getnetbyaddr_r_proto=0
99                 ;;
100         esac
101         ;;
102 *)      getnetbyaddr_r_proto=0
103         ;;
104 esac
105