https://perl5.git.perl.org / metaconfig.git / blame
| Commit | Line | Data |
|---|---|---|
| ff19f974 JH |
1 | ?RCS: $Id: d_getpgrp.U,v 3.0.1.1 1997/02/28 15:34:28 ram Exp $ |
| 2 | ?RCS: | |
| 3 | ?RCS: Copyright (c) 1991-1993, Raphael Manfredi | |
| 4 | ?RCS: | |
| 5 | ?RCS: You may redistribute only under the terms of the Artistic Licence, | |
| 6 | ?RCS: as specified in the README file that comes with the distribution. | |
| 7 | ?RCS: You may reuse parts of this distribution only within the terms of | |
| 8 | ?RCS: that same Artistic Licence; a copy of which may be found at the root | |
| 9 | ?RCS: of the source tree for dist 3.0. | |
| 10 | ?RCS: | |
| 11 | ?RCS: $Log: d_getpgrp.U,v $ | |
| 12 | ?RCS: Revision 3.0.1.1 1997/02/28 15:34:28 ram | |
| 13 | ?RCS: patch61: new USE_BSD_GETPGRP to detect the getpgrp() flavour | |
| 14 | ?RCS: | |
| 15 | ?RCS: Revision 3.0 1993/08/18 12:06:15 ram | |
| 16 | ?RCS: Baseline for dist 3.0 netwide release. | |
| 17 | ?RCS: | |
| 18 | ?MAKE:d_getpgrp d_bsdgetpgrp: Guess Inlibc Setvar cat rm \ | |
| 19 | +cc +ccflags +ldflags +libs i_unistd | |
| 20 | ?MAKE: -pick add $@ %< | |
| 21 | ?S:d_getpgrp: | |
| 22 | ?S: This variable conditionally defines HAS_GETPGRP if getpgrp() is | |
| 23 | ?S: available to get the current process group. | |
| 24 | ?S:. | |
| 25 | ?S:d_bsdgetpgrp: | |
| 26 | ?S: This variable conditionally defines USE_BSD_GETPGRP if | |
| 27 | ?S: getpgrp needs one arguments whereas USG one needs none. | |
| 28 | ?S:. | |
| 29 | ?C:HAS_GETPGRP (GETPGRP): | |
| 30 | ?C: This symbol, if defined, indicates that the getpgrp routine is | |
| 31 | ?C: available to get the current process group. | |
| 32 | ?C:. | |
| 33 | ?C:USE_BSD_GETPGRP: | |
| 34 | ?C: This symbol, if defined, indicates that getpgrp needs one | |
| 35 | ?C: arguments whereas USG one needs none. | |
| 36 | ?C:. | |
| 37 | ?H:#$d_getpgrp HAS_GETPGRP /**/ | |
| 38 | ?H:#$d_bsdgetpgrp USE_BSD_GETPGRP /**/ | |
| 39 | ?H:. | |
| 40 | ?T:xxx | |
| 41 | ?LINT:set d_getpgrp d_bsdgetpgrp | |
| 42 | : see if getpgrp exists | |
| 43 | set getpgrp d_getpgrp | |
| 44 | eval $inlibc | |
| 45 | ||
| 46 | @if USE_BSD_GETPGRP || d_bsdgetpgrp | |
| 47 | case "$d_getpgrp" in | |
| 48 | "$define") | |
| 49 | echo " " | |
| 50 | echo "Checking to see which flavor of getpgrp is in use..." | |
| 51 | $cat >set.c <<EOP | |
| 52 | #$i_unistd I_UNISTD | |
| 53 | #include <sys/types.h> | |
| 54 | #ifdef I_UNISTD | |
| 55 | # include <unistd.h> | |
| 56 | #endif | |
| 57 | int main() | |
| 58 | { | |
| 59 | if (getuid() == 0) { | |
| 60 | printf("(I see you are running Configure as super-user...)\n"); | |
| 61 | setuid(1); | |
| 62 | } | |
| 63 | #ifdef TRY_BSD_PGRP | |
| 64 | if (getpgrp(1) == 0) | |
| 65 | exit(0); | |
| 66 | #else | |
| 67 | if (getpgrp() > 0) | |
| 68 | exit(0); | |
| 69 | #endif | |
| 70 | exit(1); | |
| 71 | } | |
| 72 | EOP | |
| 73 | if $cc -o set -DTRY_BSD_PGRP $ccflags $ldflags set.c $libs >/dev/null 2>&1 && ./set; then | |
| 74 | echo "You have to use getpgrp(pid) instead of getpgrp()." >&4 | |
| 75 | val="$define" | |
| 76 | elif $cc -o set $ccflags $ldflags set.c $libs >/dev/null 2>&1 && ./set; then | |
| 77 | echo "You have to use getpgrp() instead of getpgrp(pid)." >&4 | |
| 78 | val="$undef" | |
| 79 | else | |
| 80 | echo "I can't seem to compile and run the test program." | |
| 81 | if ./usg; then | |
| 82 | xxx="a USG one, i.e. you use getpgrp()." | |
| 83 | else | |
| 84 | # SVR4 systems can appear rather BSD-ish. | |
| 85 | case "$i_unistd" in | |
| 86 | $undef) | |
| 87 | xxx="a BSD one, i.e. you use getpgrp(pid)." | |
| 88 | val="$define" | |
| 89 | ;; | |
| 90 | $define) | |
| 91 | xxx="probably a USG one, i.e. you use getpgrp()." | |
| 92 | val="$undef" | |
| 93 | ;; | |
| 94 | esac | |
| 95 | fi | |
| 96 | echo "Assuming your getpgrp is $xxx" >&4 | |
| 97 | fi | |
| 98 | ;; | |
| 99 | *) val="$undef";; | |
| 100 | esac | |
| 101 | set d_bsdgetpgrp | |
| 102 | eval $setvar | |
| 103 | $rm -f set set.c | |
| 104 | @end | |
| 105 |