| 1 | ?RCS: $Id: d_getnetbyname_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_getnetbyname_r getnetbyname_r_proto: Inlibc Protochk Hasproto i_systypes usethreads i_netdb |
| 10 | ?MAKE: -pick add $@ %< |
| 11 | ?S:d_getnetbyname_r: |
| 12 | ?S: This variable conditionally defines the HAS_GETNETBYNAME_R symbol, |
| 13 | ?S: which indicates to the C program that the getnetbyname_r() |
| 14 | ?S: routine is available. |
| 15 | ?S:. |
| 16 | ?S:getnetbyname_r_proto: |
| 17 | ?S: This variable encodes the prototype of getnetbyname_r. |
| 18 | ?S: It is zero if d_getnetbyname_r is undef, and one of the |
| 19 | ?S: REENTRANT_PROTO_T_ABC macros of reentr.h if d_getnetbyname_r |
| 20 | ?S: is defined. |
| 21 | ?S:. |
| 22 | ?C:HAS_GETNETBYNAME_R: |
| 23 | ?C: This symbol, if defined, indicates that the getnetbyname_r routine |
| 24 | ?C: is available to getnetbyname re-entrantly. |
| 25 | ?C:. |
| 26 | ?C:GETNETBYNAME_R_PROTO: |
| 27 | ?C: This symbol encodes the prototype of getnetbyname_r. |
| 28 | ?C: It is zero if d_getnetbyname_r is undef, and one of the |
| 29 | ?C: REENTRANT_PROTO_T_ABC macros of reentr.h if d_getnetbyname_r |
| 30 | ?C: is defined. |
| 31 | ?C:. |
| 32 | ?H:#$d_getnetbyname_r HAS_GETNETBYNAME_R /**/ |
| 33 | ?H:#define GETNETBYNAME_R_PROTO $getnetbyname_r_proto /**/ |
| 34 | ?H:. |
| 35 | ?T:try hdrs d_getnetbyname_r_proto |
| 36 | : see if getnetbyname_r exists |
| 37 | set getnetbyname_r d_getnetbyname_r |
| 38 | eval $inlibc |
| 39 | case "$d_getnetbyname_r" in |
| 40 | "$define") |
| 41 | hdrs="$i_systypes sys/types.h define stdio.h $i_netdb netdb.h" |
| 42 | case "$d_getnetbyname_r_proto:$usethreads" in |
| 43 | ":define") d_getnetbyname_r_proto=define |
| 44 | set d_getnetbyname_r_proto getnetbyname_r $hdrs |
| 45 | eval $hasproto ;; |
| 46 | *) ;; |
| 47 | esac |
| 48 | case "$d_getnetbyname_r_proto" in |
| 49 | define) |
| 50 | case "$getnetbyname_r_proto" in |
| 51 | ''|0) try='int getnetbyname_r(const char*, struct netent*, char*, size_t, struct netent**, int*);' |
| 52 | ./protochk "extern $try" $hdrs && getnetbyname_r_proto=I_CSBWRE ;; |
| 53 | esac |
| 54 | case "$getnetbyname_r_proto" in |
| 55 | ''|0) try='int getnetbyname_r(const char*, struct netent*, char*, int);' |
| 56 | ./protochk "extern $try" $hdrs && getnetbyname_r_proto=I_CSBI ;; |
| 57 | esac |
| 58 | case "$getnetbyname_r_proto" in |
| 59 | ''|0) try='struct netent* getnetbyname_r(const char*, struct netent*, char*, int);' |
| 60 | ./protochk "extern $try" $hdrs && getnetbyname_r_proto=S_CSBI ;; |
| 61 | esac |
| 62 | case "$getnetbyname_r_proto" in |
| 63 | ''|0) try='int getnetbyname_r(const char*, struct netent*, struct netent_data*);' |
| 64 | ./protochk "extern $try" $hdrs && getnetbyname_r_proto=I_CSD ;; |
| 65 | esac |
| 66 | case "$getnetbyname_r_proto" in |
| 67 | ''|0) d_getnetbyname_r=undef |
| 68 | getnetbyname_r_proto=0 |
| 69 | echo "Disabling getnetbyname_r, cannot determine prototype." >&4 ;; |
| 70 | * ) case "$getnetbyname_r_proto" in |
| 71 | REENTRANT_PROTO*) ;; |
| 72 | *) getnetbyname_r_proto="REENTRANT_PROTO_$getnetbyname_r_proto" ;; |
| 73 | esac |
| 74 | echo "Prototype: $try" ;; |
| 75 | esac |
| 76 | ;; |
| 77 | *) case "$usethreads" in |
| 78 | define) echo "getnetbyname_r has no prototype, not using it." >&4 ;; |
| 79 | esac |
| 80 | d_getnetbyname_r=undef |
| 81 | getnetbyname_r_proto=0 |
| 82 | ;; |
| 83 | esac |
| 84 | ;; |
| 85 | *) getnetbyname_r_proto=0 |
| 86 | ;; |
| 87 | esac |
| 88 | |