Commit | Line | Data |
---|---|---|
0ed44c70 | 1 | ?RCS: $Id: d_getlogin_r.U,v 0RCS: |
55e6b58d | 2 | ?RCS: Copyright (c) 2002,2003 Jarkko Hietaniemi |
0ed44c70 JH |
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: | |
cce04e58 MB |
9 | ?MAKE:d_getlogin_r getlogin_r_proto: Inlibc Protochk Hasproto i_systypes \ |
10 | usethreads i_unistd extern_C | |
eed88ce0 | 11 | ?MAKE: -pick add $@ %< |
959f3c4c | 12 | ?S:d_getlogin_r: |
eed88ce0 JH |
13 | ?S: This variable conditionally defines the HAS_GETLOGIN_R symbol, |
14 | ?S: which indicates to the C program that the getlogin_r() | |
15 | ?S: routine is available. | |
46953654 JH |
16 | ?S:. |
17 | ?S:getlogin_r_proto: | |
eed88ce0 | 18 | ?S: This variable encodes the prototype of getlogin_r. |
05fdd8fd JH |
19 | ?S: It is zero if d_getlogin_r is undef, and one of the |
20 | ?S: REENTRANT_PROTO_T_ABC macros of reentr.h if d_getlogin_r | |
21 | ?S: is defined. | |
959f3c4c JH |
22 | ?S:. |
23 | ?C:HAS_GETLOGIN_R: | |
eed88ce0 JH |
24 | ?C: This symbol, if defined, indicates that the getlogin_r routine |
25 | ?C: is available to getlogin re-entrantly. | |
46953654 JH |
26 | ?C:. |
27 | ?C:GETLOGIN_R_PROTO: | |
eed88ce0 | 28 | ?C: This symbol encodes the prototype of getlogin_r. |
05fdd8fd JH |
29 | ?C: It is zero if d_getlogin_r is undef, and one of the |
30 | ?C: REENTRANT_PROTO_T_ABC macros of reentr.h if d_getlogin_r | |
31 | ?C: is defined. | |
959f3c4c | 32 | ?C:. |
eed88ce0 JH |
33 | ?H:#$d_getlogin_r HAS_GETLOGIN_R /**/ |
34 | ?H:#define GETLOGIN_R_PROTO $getlogin_r_proto /**/ | |
959f3c4c | 35 | ?H:. |
f42a43f5 | 36 | ?T:try hdrs d_getlogin_r_proto |
959f3c4c JH |
37 | : see if getlogin_r exists |
38 | set getlogin_r d_getlogin_r | |
39 | eval $inlibc | |
46953654 JH |
40 | case "$d_getlogin_r" in |
41 | "$define") | |
f2dee704 | 42 | hdrs="$i_systypes sys/types.h define stdio.h $i_unistd unistd.h" |
9bb0d1dd JH |
43 | case "$d_getlogin_r_proto:$usethreads" in |
44 | ":define") d_getlogin_r_proto=define | |
f42a43f5 JH |
45 | set d_getlogin_r_proto getlogin_r $hdrs |
46 | eval $hasproto ;; | |
47 | *) ;; | |
48 | esac | |
49 | case "$d_getlogin_r_proto" in | |
50 | define) | |
46953654 | 51 | case "$getlogin_r_proto" in |
5002a627 | 52 | ''|0) try='int getlogin_r(char*, size_t);' |
cce04e58 | 53 | ./protochk "$extern_C $try" $hdrs && getlogin_r_proto=I_BW ;; |
46953654 JH |
54 | esac |
55 | case "$getlogin_r_proto" in | |
5002a627 | 56 | ''|0) try='int getlogin_r(char*, int);' |
cce04e58 | 57 | ./protochk "$extern_C $try" $hdrs && getlogin_r_proto=I_BI ;; |
f2dee704 JH |
58 | esac |
59 | case "$getlogin_r_proto" in | |
5002a627 | 60 | ''|0) try='char* getlogin_r(char*, size_t);' |
cce04e58 | 61 | ./protochk "$extern_C $try" $hdrs && getlogin_r_proto=B_BW ;; |
f2dee704 JH |
62 | esac |
63 | case "$getlogin_r_proto" in | |
5002a627 | 64 | ''|0) try='char* getlogin_r(char*, int);' |
cce04e58 | 65 | ./protochk "$extern_C $try" $hdrs && getlogin_r_proto=B_BI ;; |
46953654 JH |
66 | esac |
67 | case "$getlogin_r_proto" in | |
81d83c43 | 68 | ''|0) d_getlogin_r=undef |
5002a627 | 69 | getlogin_r_proto=0 |
f42a43f5 | 70 | echo "Disabling getlogin_r, cannot determine prototype." >&4 ;; |
f2dee704 JH |
71 | * ) case "$getlogin_r_proto" in |
72 | REENTRANT_PROTO*) ;; | |
73 | *) getlogin_r_proto="REENTRANT_PROTO_$getlogin_r_proto" ;; | |
74 | esac | |
75 | echo "Prototype: $try" ;; | |
46953654 JH |
76 | esac |
77 | ;; | |
9bb0d1dd JH |
78 | *) case "$usethreads" in |
79 | define) echo "getlogin_r has no prototype, not using it." >&4 ;; | |
80 | esac | |
81d83c43 JH |
81 | d_getlogin_r=undef |
82 | getlogin_r_proto=0 | |
9bb0d1dd | 83 | ;; |
f42a43f5 JH |
84 | esac |
85 | ;; | |
5002a627 JH |
86 | *) getlogin_r_proto=0 |
87 | ;; | |
46953654 | 88 | esac |
959f3c4c | 89 |