Gold Fish 3/goldfish_volume_3.bin/files/dev/misc/hwgrcs/src/rcs.rcsfiles/conf.sh,v

Text File | 1995-06-25 | 56.3 KB | 2,605 lines

head    5.14;
branch    5.14.1;
access;
symbols
    HWGRCSP12F:5.14.1.2
    HWGRCSP11F:5.14.1.2
    HWGRCSP10F:5.14.1.2
    HWGRCSP9:5.14.1.2
    HWGRCSP8F:5.14.1.2
    HWGRCSP7F:5.14.1.2
    HWGRCSP6F:5.14.1.2
    HWGRCSP5F:5.14.1.1
    HWGRCSp4:5.14.1.1
    HWGRCSp3:5.14.1
    HWGRCS_Fish:5.14.1
    HWGRCS:5.14.1;
locks; strict;
comment    @# @;


5.14
date    91.11.20.18.21.10;    author eggert;    state Exp;
branches
    5.14.1.1;
next    ;

5.14.1.1
date    93.01.18.14.39.42;    author heinz;    state Exp;
branches;
next    5.14.1.2;

5.14.1.2
date    93.12.20.18.48.30;    author heinz;    state Exp;
branches;
next    ;


desc
@Checked in with -k 16.jan.93 HWG
@


5.14
log
@checked in with -k by heinz at 1993/01/17 01:55:16
@
text
@#!/bin/sh
# Output RCS compile-time configuration.
Id='$Id: conf.sh,v 5.14 1991/11/20 18:21:10 eggert Exp $'
#    Copyright 1990, 1991 by Paul Eggert
#    Distributed under license by the Free Software Foundation, Inc.

# This file is part of RCS.
#
# RCS is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2, or (at your option)
# any later version.
#
# RCS is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with RCS; see the file COPYING.  If not, write to
# the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
#
# Report problems and direct all questions to:
#
#     rcs-bugs@@cs.purdue.edu


# Standard output should already be directed to "a.h";
# later parts of this procedure need it.
# Standard error can be ignored if a.h is OK,
# and can be inspected for clues otherwise.

# The Makefile overrides the following defaults.
: ${CC=cc}
: ${CFLAGS=-O}
: ${COMPAT2=0}
: ${DIFF3=${RCSPREFIX}diff3}
: ${DIFF3_BIN=1}
: ${DIFF=${RCSPREFIX}diff}
: ${DIFF_FLAGS=-an}
: ${DIFF_L=1}
: ${DIFF_SUCCESS=0} ${DIFF_FAILURE=1} ${DIFF_TROUBLE=2}
: ${ED=/bin/ed}
: ${RCSPREFIX=/usr/local/bin/}
: ${SENDMAIL='"/usr/lib/sendmail"'}
# : ${LDFLAGS=} ${LDLIBS=} tickles old shell bug

C="$CC $CFLAGS"
CL="$CC $CFLAGS $LDFLAGS"
L=$LDLIBS
RM='rm -f a.out'

cat <<EOF
/* RCS compile-time configuration */

    /* $Id */

/*
 * This file is generated automatically.
 * If you edit it by hand your changes may be lost.
 * Instead, please try to fix conf.sh,
 * and send your fixes to rcs-bugs@@cs.purdue.edu.
 */

EOF

: exitmain
cat >a.c <<EOF
#include "a.h"
int main(argc,argv) int argc; char **argv; { return argc-1; }
EOF
$RM && $CL a.c $L >&2 || exit
e='exit(n), 3 /* lint fodder */'
if ./a.out -
then :
elif ./a.out
then e=n
fi
echo "#define exitmain(n) return $e /* how to exit from main() */"

: _POSIX_SOURCE
cat >a.c <<'EOF'
#include "a.h"
#include <stdio.h>
int main() { exitmain(fileno(stdout) < 0); }
EOF
a='/* ' z='*/ '
$RM || exit
if ($CL a.c $L && ./a.out) >&2
then :
elif $RM || exit; ($CL -D_POSIX_SOURCE a.c $L && ./a.out) >&2
then a= z=
fi
cat <<EOF
$a#define _POSIX_SOURCE $z/* Define this if Posix + strict Standard C.  */

#include <errno.h>
#include <stdio.h>
#include <time.h>
EOF

cat <<'EOF'

/* Comment out #include lines below that do not work.  */
EOF

# Run `$CS a.c $LS' instead of `$CL a.c $L' for compile-time checking only.
# This speeds up the configuration process.
if $C -S a.c >&2
then CS="$C -S" LS=    # Generate assembly language output.
elif $C -c a.c >&2
then CS="$C -c" LS=    # Generate object code.
else CS=$CL LS=$L    # Generate an executable.
fi

# standard include files
# sys/types.h and sys/stat.h must come first because others depend on them.
has_signal=1
for h in \
    sys/types sys/stat \
    dirent fcntl limits pwd signal stdlib string sys/mman sys/wait unistd utime vfork
do
    i="#include <$h.h>"
    : $i
    cat >a.c <<EOF
#include "a.h"
$i
int main(){ exitmain(0); }
EOF
    $RM || exit
    ($CL a.c $L && ./a.out) >&2 || {
        case $h in
        string)
            i='#include <strings.h>';;
        *)
            i="/* $i */"
        esac
        case $h in
        signal) has_signal=0
        esac
    }
    echo "$i"
done

cat <<'EOF'

/* Define the following symbols to be 1 or 0.  */
EOF

# has_sys_*_h
for H in dir param
do
    : has_sys_${H}_h
    cat >a.c <<EOF
#include "a.h"
#include <sys/$H.h>
int main() { exitmain(0); }
EOF
    $RM || exit
    if ($CL a.c $L && ./a.out) >&2
    then h=1
    else h=0
    fi
    echo "#define has_sys_${H}_h $h /* Does #include <sys/$H.h> work?  */"
done


# We must do NAME_MAX and has_readlink next, because they might generate
# #include directives that affect later definitions.

: NAME_MAX
cat >a.c <<'EOF'
#include "a.h"
char b[NAME_MAX + 2];
main()
{
#if !defined(NAME_MAX)
    exitmain(1);
#else
    int i;
    b[0] = 'a'; b[1] = '.';
    for (i = 2;  i < NAME_MAX;  i++)
        b[i] = 'a';
    b[i] = 'b';
    exitmain(creat(b, 0) < 0);
#endif
}
EOF
$RM a.*ab || exit
if $CL a.c $L >&2 && ./a.out && test -f a.*ab
then a= z=
else a='/* ' z='*/ '
fi
rm -f a.*ab || exit

: has_readlink
cat >a.c <<'EOF'
#include "a.h"
char b[7];
int main()
{
    exitmain(readlink("a.sym2",b,7) != 6  ||  strcmp(b, "a.sym1") != 0);
}
EOF
$RM a.sym* || exit
if (ln -s a.sym1 a.sym2 && $CL a.c $L && ./a.out) >&2
then h=1
else h=0
fi
cat <<EOF
#define has_readlink $h /* Does readlink() work?  */

$a#undef NAME_MAX $z/* Uncomment this if NAME_MAX is broken.  */

#if !defined(NAME_MAX) && !defined(_POSIX_NAME_MAX)
#    if has_sys_dir_h
#        include <sys/dir.h>
#    endif
#    ifndef NAME_MAX
#        ifndef MAXNAMLEN
#            define MAXNAMLEN 14
#        endif
#        define NAME_MAX MAXNAMLEN
#    endif
#endif
#if !defined(PATH_MAX) && !defined(_POSIX_PATH_MAX)
#    if has_sys_param_h
#        include <sys/param.h>
#        define included_sys_param_h 1
#    endif
#    ifndef PATH_MAX
#        ifndef MAXPATHLEN
#            define MAXPATHLEN 1024
#        endif
#        define PATH_MAX (MAXPATHLEN-1)
#    endif
#endif
#if has_readlink && !defined(MAXSYMLINKS)
#    if has_sys_param_h && !included_sys_param_h
#        include <sys/param.h>
#    endif
#    ifndef MAXSYMLINKS
#        define MAXSYMLINKS 20 /* BSD; not standard yet */
#    endif
#endif
EOF

cat <<'EOF'

/* Comment out the keyword definitions below if the keywords work.  */
EOF

: const, volatile
for i in const volatile
do
    cat >a.c <<EOF
#    include "a.h"
    enum Boolean { false, true };
    static enum Boolean $i zero;
    static enum Boolean $i * $i azero = &zero;
    static enum Boolean $i * $i * $i aazero = &azero;
    int main() { exitmain(!!**aazero); }
EOF
    a= z=
    if $CS a.c $LS >&2
    then
        cat >a.c <<EOF
            typedef unsigned char $i *Iptr_type;
            struct { Iptr_type lim; } s, *f = &s;
            int main() {
                Iptr_type lim;
                lim = f->lim;
                return !!lim;
            }
EOF
        if $CS a.c $LS >&2
        then a='/* ' z=' */'
        fi
    fi
    echo "$a#define $i$z"
done

# *_t
cat <<'EOF'

/* Comment out the typedefs below if the types are already declared.  */
/* Fix any uncommented typedefs that are wrong.  */
EOF
cat >a.c <<'EOF'
#include "a.h"
t x;
int main() { exitmain(0); }
EOF
for t in mode_t pid_t sig_atomic_t size_t ssize_t time_t uid_t
do
    : $t
    case $t in
    size_t) i=unsigned;;
    time_t) i=long;;
    *) i=int;;
    esac
    if $CS -Dt=$t a.c $LS >&2
    then a='/* ' z=' */'
    else a= z=
    fi
    echo "${a}typedef $i $t;$z"
done

: has_prototypes, has_stdarg, has_varargs, va_start_args
cat >a.ha <<'EOF'
#if has_prototypes
#    define P(params) params
#else
#    define P(params) ()
#endif
#if has_stdarg
#    include <stdarg.h>
#else
#    if has_varargs
#        include <varargs.h>
#    else
        typedef char *va_list;
#        define va_dcl int va_alist;
#        define va_start(ap) ((ap) = (va_list)&va_alist)
#        define va_arg(ap,t) (((t*) ((ap)+=sizeof(t)))  [-1])
#        define va_end(ap)
#    endif
#endif
#if va_start_args == 2
#    define vararg_start va_start
#else
#    define vararg_start(ap,p) va_start(ap)
#endif
EOF
cat >a.c <<'EOF'
#include "a.h"
#include "a.ha"
#if has_prototypes
char *f(char **p, ...)
#else
char *f(p, va_alist) char **p; va_dcl
#endif
{
    char *s;
    va_list v;
    vararg_start(v,p);
    s = p[va_arg(v,int)];
    va_end(v);
    return s;
}
int main P((int, char**));
int main(argc, argv) int argc; char **argv; {
    exitmain(f(argv,0) != argv[0]  ||  f(argv,1) != argv[1]);
}
EOF
for has_prototypes in 1 0
do
    for has_stdarg in 1 v 0
    do
        case $has_stdarg in
        v) has_varargs=1 has_stdarg=0;;
        *) has_varargs=0
        esac
        case $has_stdarg in
        0) as='1 2';;
        1) as='2 1'
        esac
        for va_start_args in $as
        do
            $RM || exit
            $CL \
                -Dhas_prototypes=$has_prototypes \
                -Dhas_stdarg=$has_stdarg \
                -Dhas_varargs=$has_varargs \
                -Dva_start_args=$va_start_args \
                a.c $L >&2 && ./a.out && break
        done && break
    done && break
done || {
    echo >&2 "cannot deduce has_prototypes, has_stdarg, va_start_args"
    exit 1
}
cat - a.ha <<EOF

/* Define the following symbols to be 1 or 0.  */
#define has_prototypes $has_prototypes /* Do function prototypes work?  */
#define has_stdarg $has_stdarg /* Does <stdarg.h> work?  */
#define has_varargs $has_varargs /* Does <varargs.h> work?  */
#define va_start_args $va_start_args /* How many args does va_start() take?  */
EOF

: text_equals_binary_stdio, FOPEN_...
cat >a.c <<'EOF'
#include "a.h"
    int
copyto(filename, mode)
    char const *filename, *mode;
{
    int c;
    FILE *f, *g;
    if (!(f = fopen("a.out", "rb")) || !(g = fopen(filename, mode)))
        return 1;
    while (c=getc(f), !feof(f))
        if (ferror(f)  ||  putc(c,g)<0 && ferror(g))
            return 1;
    return fclose(f)!=0 || fclose(g)!=0;
}
int main() { exitmain(copyto("a.d", "w+b") || copyto("a.e", "w+")); }
EOF
e=1
$RM a.d a.e || exit
$CL a.c $L >&2 && ./a.out && cmp a.out a.d && {
    cmp a.out a.e || e=0
}
cat <<EOF

#define text_equals_binary_stdio $e /* Does stdio treat text like binary?  */
#define text_work_stdio 0 /* Text i/o for working file, binary for RCS file?  */
#if text_equals_binary_stdio
    /* Text and binary i/o behave the same, or binary i/o does not work.  */
#    define FOPEN_R "r"
#    define FOPEN_W "w"
#    define FOPEN_WPLUS "w+"
#else
    /* Text and binary i/o behave differently.  */
    /* This is incompatible with Posix and Unix.  */
#    define FOPEN_R "rb"
#    define FOPEN_W "wb"
#    define FOPEN_WPLUS "w+b"
#endif
#if text_work_stdio
#    define FOPEN_R_WORK "r"
#    define FOPEN_W_WORK "w"
#    define FOPEN_WPLUS_WORK "w+"
#else
#    define FOPEN_R_WORK FOPEN_R
#    define FOPEN_W_WORK FOPEN_W
#    define FOPEN_WPLUS_WORK FOPEN_WPLUS
#endif

/* Define or comment out the following symbols as needed.  */
EOF

: bad_fopen_wplus
cat >a.c <<'EOF'
#include "a.h"
int main() { exitmain(!fopen("a.d",FOPEN_WPLUS)); }
EOF
$RM || exit
if echo nonempty >a.d && $CL a.c $L >&2 && ./a.out && test ! -s a.d
then b=0
else b=1
fi
echo "#define bad_fopen_wplus $b /* Does fopen(f,FOPEN_WPLUS) fail to truncate f?  */"

: getlogin_is_secure
echo "#define getlogin_is_secure 0 /* Is getlogin() secure?  Usually it's not.  */"

: has_dirent
cat >a.c <<'EOF'
#include "a.h"
int main() {
    DIR *d = opendir(".");
    struct dirent *e;
    while ((e = readdir(d)))
        if (strcmp(e->d_name, "a.c") == 0  &&  closedir(d) == 0)
            exitmain(0);
    exitmain(1);
}
EOF
$RM || exit
if $CL a.c $L >&2 && ./a.out
then h=1
else h=0
fi
echo "#define has_dirent $h /* Do opendir(), readdir(), closedir() work?  */"

: has_fchmod
cat >a.c <<'EOF'
#include "a.h"
int main() { exitmain(fchmod(fileno(stdin),0) != 0); }
EOF
$RM || exit
if $CL a.c $L >&2 && ./a.out <a.c && test ! -r a.c
then h=1
else h=0
fi
echo "#define has_fchmod $h /* Does fchmod() work?  */"
rm -f a.c || exit

: has_fputs
cat >a.c <<'EOF'
#include "a.h"
int main() { exitmain(fputs("Hello\"\nworld", stdout) != 12); }
EOF
Hello='Hello"
world'
$RM || exit
if $CL a.c $L >&2 && ./a.out >/dev/null && x=`./a.out` && test " $x" = " $Hello"
then h=1
else h=0
fi
echo "#define has_fputs $h /* Does fputs() work?  */"

: has_ftruncate
cat >a.c <<'EOF'
#include "a.h"
int main(argc, argv) int argc; char **argv; {
    int f = creat(argv[1], 0);
    if (f<0 || write(f,"abc",3)!=3 || ftruncate(f,(off_t)0)!=0 || close(f)!=0)
            exitmain(1);
    exitmain(0);
}
EOF
$RM || exit
if $CL a.c $L >&2
then
    h=1
    # Check out /tmp too; it's buggy on some hosts.
    for d in . /tmp
    do
        if test -d $d
        then
            f=$d/a.d
            rm -f $f || exit
            ./a.out $f && test ! -s $f && test -f $f  ||  h=0
            rm -f $f || exit
        fi
    done
else h=0
fi
echo "#define has_ftruncate $h /* Does ftruncate() work?  */"

: has_getuid
cat >a.c <<'EOF'
#include "a.h"
#ifndef getuid
    uid_t getuid();
#endif
int main() { exitmain(getuid()!=getuid()); }
EOF
$RM || exit
if ($CL a.c $L && ./a.out) >&2
then has_getuid=1
else has_getuid=0
fi
echo "#define has_getuid $has_getuid /* Does getuid() work?  */"

: has_getpwuid
case $has_getuid in
0)
    a='/* ' z='*/ ' h=?;;
*)
    a= z=
    cat >a.c <<'EOF'
#include "a.h"
int main() { exitmain(!getpwuid(0)); }
EOF
    $RM || exit
    if ($CL a.c $L && ./a.out) >&2
    then h=1
    else h=0
    fi
esac
echo "$a#define has_getpwuid $h $z/* Does getpwuid() work?  */"

: has_link
cat >a.c <<'EOF'
#include "a.h"
int main() { exitmain(link("a.c","a.d") != 0); }
EOF
$RM a.d || exit
if ($CL a.c $L && ./a.out && cmp a.c a.d) >&2
then h=1
else h=0
fi
rm -f a.d || exit
echo "#define has_link $h /* Does link() work?  */"

: has_memcmp
cat >a.c <<'EOF'
#include "a.h"
int main() { exitmain(memcmp("beautiful","beautiful",10) != 0); }
EOF
$RM || exit
if ($CL a.c $L && ./a.out) >&2
then h=1
else h=0
fi
echo "#define has_memcmp $h /* Does memcmp() work?  */"

: has_memcpy
cat >a.c <<'EOF'
#include "a.h"
char a[3];
int main() {
    memcpy(a,"xy",3);
    exitmain(strcmp(a,"xy")!=0);
}
EOF
$RM || exit
if ($CL a.c $L && ./a.out) >&2
then h=1
else h=0
fi
echo "#define has_memcpy $h /* Does memcpy() work?  */"

: has_memmove
cat >a.c <<'EOF'
#include "a.h"
char a[4];
int main() {
    strcpy(a, "xy");
    memmove(a+1, a, 3);
    exitmain(strcmp(a,"xxy")!=0);
}
EOF
$RM || exit
if ($CL a.c $L && ./a.out) >&2
then h=1
else h=0
fi
echo "#define has_memmove $h /* Does memmove() work?  */"

: has_mmap, has_madvise
cat >a.c <<'EOF'
#define CHAR1 '#' /* the first character in this file */
#include "a.h"
#ifndef mmap
    caddr_t mmap();
#endif
caddr_t a;
struct stat b;
#ifndef MADVISE_OK
#    define MADVISE_OK (madvise(a,b.st_size,MADV_SEQUENTIAL)==0 && madvise(a,b.st_size,MADV_NORMAL)==0)
#endif
int main()
{
    if (fstat(fileno(stdin), &b) != 0)
        exitmain(1);
    a = mmap(
        (caddr_t)0, b.st_size, PROT_READ, MAP_SHARED,
        fileno(stdin), (off_t)0
    );
    exitmain(
        a == (caddr_t)-1  ||
        !MADVISE_OK ||
        *a != CHAR1  ||
        munmap(a, b.st_size)  !=  0
    );
}
EOF
a=0 has_mmap=0
$RM || exit
if ($CL -DMADVISE_OK=1 a.c $L && ./a.out <a.c) >&2
then
    has_mmap=1
    $RM || exit
    ($CL a.c $L && ./a.out <a.c) >&2 && a=1
fi
echo "#define has_madvise $a /* Does madvise() work?  */"
echo "#define has_mmap $has_mmap /* Does mmap() work on regular files?  */"

: has_rename, bad_a_rename, bad_b_rename
cat >a.c <<'EOF'
#include "a.h"
int main() { exitmain(rename("a.a","a.b") != 0); }
EOF
echo a >a.a && $RM a.b || exit
if ($CL a.c $L && ./a.out && test -f a.b) >&2
then
    h=1
    rm -f a.a a.b &&
    echo a >a.a && chmod -w a.a || exit
    if ./a.out && test ! -f a.a && test -f a.b
    then a=0
    else a=1
    fi
    rm -f a.a a.b &&
    echo a >a.a && echo b >a.b && chmod -w a.b || exit
    if ./a.out && test ! -f a.a && test -f a.b
    then b=0
    else b=1
    fi
    rm -f a.a a.b || exit
else h=0 a=0 b=0
fi
echo "#define has_rename $h /* Does rename() work?  */"
echo "#define bad_a_rename $a /* Does rename(A,B) fail if A is unwritable?  */"
echo "#define bad_b_rename $b /* Does rename(A,B) fail if B is unwritable?  */"

: void, VOID
cat >a.c <<'EOF'
#include "a.h"
void f() {}
int main() {f(); exitmain(0);}
EOF
if $CS a.c $LS >&2
then
    v='(void) '
else
    v=
    echo 'typedef int void;'
fi
echo "#define VOID $v/* 'VOID e;' discards the value of an expression 'e'.  */"

: has_seteuid
case $has_getuid in
0)
    a='/* ' z='*/ ' has_seteuid=?;;
*)
    a= z=
    cat >a.c <<'EOF'
#include "a.h"
#ifndef geteuid
    uid_t geteuid();
#endif
int main() {
/* Guess, don't test.  Ugh.  Testing would require running conf.sh setuid.  */
/* seteuid() isn't standardized yet, so the guess below may well be wrong.  */
#if !_POSIX_VERSION || _POSIX_VERSION<=199009L&&!defined(sgi)&&!defined(__sgi__)&&!defined(sun)&&!defined(__sun__)
    exitmain(1);
#else
    exitmain(seteuid(geteuid()) != 0);
#endif
}
EOF
    $RM || exit
    if ($CL a.c $L && ./a.out) >&2
    then has_seteuid=1
    else has_seteuid=0
    fi
esac
echo "$a#define has_seteuid $has_seteuid $z/* Does seteuid() work?  See README.  */"

: has_setuid
h=$has_seteuid
case $h in
0)
    cat >a.c <<'EOF'
#include "a.h"
#ifndef getuid
    uid_t getuid();
#endif
int main() { exitmain(setuid(getuid()) != 0); }
EOF
    $RM || exit
    ($CL a.c $L && ./a.out) >&2 && h=1
esac
echo "$a#define has_setuid $h $z/* Does setuid() exist?  */"

: has_signal, signal_args, signal_type, sig_zaps_handler
cat >a.c <<'EOF'
#include "a.h"
#ifndef getpid
    pid_t getpid();
#endif
#if !defined(signal) && declare_signal
    signal_type (*signal P((int,signal_type(*)signal_args)))signal_args;
#endif
signal_type nothing(i) int i; {}
int main(argc, argv) int argc; char **argv;
{
    signal(SIGINT, nothing);
    while (--argc)
        kill(getpid(), SIGINT);
    exitmain(0);
}
EOF
for declare_signal in 1 0
do
    for signal_type in void int
    do
        for signal_args in 'P((int))' '()'
        do
            $RM || exit
            ($CL \
                -Ddeclare_signal=$declare_signal \
                -Dsignal_args="$signal_args" \
                -Dsignal_type=$signal_type \
                    a.c $L && ./a.out 1) >&2 && break
        done && break
    done && break
done || {
    echo >&2 "cannot deduce signal_args, signal_type"
    exit 1
}
if ./a.out 1 2 >&2
then z=0
else z=1
fi
cat <<EOF
#define has_signal $has_signal /* Does signal() work?  */
#define signal_args $signal_args /* arguments of signal handlers */
#define signal_type $signal_type /* type returned by signal handlers */
#define sig_zaps_handler $z /* Must a signal handler reinvoke signal()?  */
EOF

: has_sigaction
cat >a.c <<'EOF'
#include "a.h"
#ifndef getpid
    pid_t getpid();
#endif
static sig_atomic_t volatile gotsig;
static void getsig(i) int i; { gotsig = 1; }
int main(argc, argv) int argc; char **argv;
{
    struct sigaction s;
    sigset_t t;
    if (sigemptyset(&t) != 0  ||  sigaddset(&t, SIGINT) != 0)
        exitmain(1);
    if (sigaction(SIGINT, (struct sigaction const*)0, &s) != 0)
        exitmain(1);
    s.sa_handler = getsig;
    s.sa_mask = t;
    if (sigaction(SIGINT, &s, (struct sigaction*)0) != 0)
        exitmain(1);
    kill(getpid(), SIGINT);
    exitmain(gotsig != 1);
}
EOF
$RM || exit
if ($CL a.c $L && ./a.out) >&2
then has_sigaction=1
else has_sigaction=0
fi
echo "#define has_sigaction $has_sigaction /* Does struct sigaction work?  */"

: has_sigblock, sigmask
a='/* ' z='*/ '
b='/* ' y='*/ '
case $has_sigaction in
1)
    h=? n=?;;
*)
    a= z=
    cat >a.c <<'EOF'
#include "a.h"
#include <signal.h>
#if define_sigmask
#    define sigmask(s) (1 << ((s)-1))
#endif
int main()
{
    sigblock(sigmask(SIGHUP));
    exitmain(kill(getpid(), SIGHUP) != 0);
}
EOF
    if $RM || exit; ($CL a.c $L && ./a.out) >&2
    then h=1
    elif $RM || exit; ($CL -Ddefine_sigmask=1 a.c $L && ./a.out) >&2
    then h=1 b= y=
    else h=0
    fi
esac
echo "$a#define has_sigblock $h $z/* Does sigblock() work?  */"
echo "$b#define sigmask(s) (1 << ((s)-1)) $y/* Yield mask for signal number.  */"

: has_sys_siglist
cat >a.c <<'EOF'
#include "a.h"
#ifndef sys_siglist
    extern char const *sys_siglist[];
#endif
int main() { exitmain(!sys_siglist[1][0]); }
EOF
$RM || exit
if ($CL a.c $L && ./a.out) >&2
then h=1
else h=0
fi
echo "#define has_sys_siglist $h /* Does sys_siglist[] work?  */"

: fread_type, Fread, Fwrite
cat >a.c <<'EOF'
#define CHAR1 '#' /* the first character in this file */
#include "a.h"
#if !defined(fread) && declare_fread
    fread_type fread P((void*,freadarg_type,freadarg_type,FILE*));
#endif
int main()
{
    char b;
    exitmain(!(
        fread(&b, (freadarg_type)1, (freadarg_type)1, stdin) == 1  &&
        b==CHAR1
    ));
}
EOF
for declare_fread in 1 0
do
    for fread_type in ssize_t size_t int unsigned
    do
        for freadarg_type in size_t ssize_t unsigned int
        do
            $RM || exit
            (
                $CL \
                    -Ddeclare_fread=$declare_fread \
                    -Dfreadarg_type=$freadarg_type \
                    -Dfread_type=$fread_type \
                    a.c $L &&
                ./a.out <a.c
            ) >&2 && break
        done && break
    done && break
done || {
    echo >&2 "cannot deduce fread types"
    exit 1
}
cat <<EOF
typedef $fread_type fread_type; /* type returned by fread() and fwrite() */
typedef $freadarg_type freadarg_type; /* type of their size arguments */
EOF

: malloc_type
cat >a.c <<'EOF'
#include "a.h"
typedef void *malloc_type;
#ifndef malloc
    malloc_type malloc();
#endif
int main() { exitmain(!malloc(1)); }
EOF
if $CS a.c $LS >&2
then t=void
else t=char
fi
echo "typedef $t *malloc_type; /* type returned by malloc() */"

: has_getcwd
cat >a.c <<'EOF'
#include "a.h"
#ifndef getcwd
    char *getcwd();
#endif
char buf[10000];
int main() { exitmain(!getcwd(buf,10000)); }
EOF
$RM || exit
if ($CL a.c $L && ./a.out) >&2
then has_getcwd=1
else has_getcwd=0
fi
echo "#define has_getcwd $has_getcwd /* Does getcwd() work?  */"

: has_getwd
case $has_getcwd in
1)
    a='/* ' z='*/ ' h=?;;
*)
    a= z=
    cat >a.c <<'EOF'
#include "a.h"
#include <sys/param.h>
#ifndef getwd
    char *getwd();
#endif
char buf[MAXPATHLEN];
int main() { exitmain(!getwd(buf)); }
EOF
    $RM || exit
    if ($CL a.c $L && ./a.out) >&2
    then h=1
    else h=0
    fi
esac
echo "$a#define has_getwd $h $z/* Does getwd() work?  */"

: has_mktemp
cat >a.c <<'EOF'
#include "a.h"
#ifndef mktemp
    char *mktemp();
#endif
int main()
{
    char b[9];
    strcpy(b, "a.XXXXXX");
    exitmain(!mktemp(b));
}
EOF
$RM || exit
if ($CL a.c $L && ./a.out) >&2
then h=1
else h=0
fi
echo "#define has_mktemp $h /* Does mktemp() work?  */"

: has_NFS
echo "#define has_NFS 1 /* Might NFS be used?  */"

: strchr
cat >a.c <<'EOF'
#include "a.h"
#ifndef strchr
    char *strchr();
#endif
int main() {exitmain(!strchr("abc", 'c'));}
EOF
$RM || exit
if ($CL a.c $L && ./a.out) >&2
then a='/* ' z='*/ '
else a= z=
fi
echo "$a#define strchr index $z/* Use old-fashioned name for strchr()?  */"

: strrchr
cat >a.c <<'EOF'
#include "a.h"
#ifndef strrchr
    char *strrchr();
#endif
int main() {exitmain(!strrchr("abc", 'c'));}
EOF
$RM || exit
if ($CL a.c $L && ./a.out) >&2
then a='/* ' z='*/ '
else a= z=
fi
echo "$a#define strrchr rindex $z/* Use old-fashioned name for strrchr()?  */"

: bad_unlink
cat >a.c <<'EOF'
#include "a.h"
int main() { exitmain(unlink("a.c") != 0); }
EOF
$RM && chmod -w a.c || exit
if $CL a.c $L >&2 && ./a.out >/dev/null && test ! -f a.c
then b=0
else b=1
fi
rm -f a.c || exit
echo "#define bad_unlink $b /* Does unlink() fail on unwritable files?  */"

: has_vfork, has_fork, has_spawn, has_wait, has_waitpid, RCS_SHELL
cat >a.c <<'EOF'
#include "a.h"
#ifndef getpid
    pid_t getpid();
#endif
#if TRY_VFORK
#    ifndef vfork
        pid_t vfork();
#    endif
#else
#    ifndef fork
        pid_t fork();
#    endif
#    undef vfork
#    define vfork fork
#endif
#if TRY_WAITPID
#    ifndef waitpid
        pid_t waitpid();
#    endif
#else
#    ifndef wait
        pid_t wait();
#    endif
#endif
pid_t child;
int status;
struct stat st;
int main()
{
    pid_t parent = getpid();
    if (!(child = vfork())) {
        /* Tickle vfork/compiler bug (e.g. sparc gcc -O (1.37.1).  */
        pid_t i = getpid(), j = getpid();
        if (i!=getpid() || j!=getpid())
            _exit(!i);
        /* Tickle file descriptor bug (e.g. IRIX 3.3).  */
        _exit(close(1) != 0);
    } else {
#        if TRY_WAITPID
            if (waitpid(child, &status, 0) != child)
                exitmain(1);
#        else
            while (wait(&status) != child)
                ;
#        endif
        /* Test for presence of bugs.  */
        exitmain(status  ||  parent != getpid()  ||  fstat(1,&st) != 0);
    }
}
EOF
$RM || exit
if ($CL -DTRY_VFORK=1 a.c $L && ./a.out) >&2
then has_vfork=1
else has_vfork=0
fi
echo "#define has_vfork $has_vfork /* Does vfork() work?  */"
h=$has_vfork
case $h in
0)
    $RM || exit
    ($CL a.c $L && ./a.out) >&2 && h=1
esac
echo "#define has_fork $h /* Does fork() work?  */"
$RM || exit
if ($CL -DTRY_VFORK=$has_vfork -DTRY_WAITPID=1 a.c $L && ./a.out) >&2
then h=1
else h=0
fi
echo "#define has_spawn 0 /* Does spawn*() work?  */"
echo "#define has_wait 1 /* Does wait() work?  */"
echo "#define has_waitpid $h /* Does waitpid() work?  */"
echo '#define RCS_SHELL "/bin/sh" /* shell to run RCS subprograms */'

: has_vfprintf
cat >a.c <<'EOF'
#include "a.h"
#if has_prototypes
int p(char const*format,...)
#else
/*VARARGS1*/ int p(format, va_alist) char *format; va_dcl
#endif
{
    int r;
    va_list args;
    vararg_start(args, format);
    r = vfprintf(stderr, format, args);
    va_end(args);
    return r;
}
int main() { exitmain(p("") != 0); }
EOF
$RM || exit
if ($CL a.c $L && ./a.out) >&2
then h=1
else h=0
fi
echo "#define has_vfprintf $h /* Does vfprintf() work?  */"

: has__doprintf, has__doprnt
case $h in
1)
    h=? a='/* ' z='*/ ';;
*)
    a= z=
    cat >a.c <<'EOF'
#include "a.h"
#if has_prototypes
int p(char const*format,...)
#else
/*VARARGS1*/ int p(format, va_alist) char *format; va_dcl
#endif
{
    va_list args;
    vararg_start(args, format);
#    if TRY__DOPRINTF
        _doprintf(stderr, format, args);
#    else
        _doprnt(format, args, stderr);
#    endif
    va_end(args);
}
int main() { p(""); exitmain(ferror(stderr) != 0); }
EOF
    $RM || exit
    if ($CL -DTRY__DOPRINTF=1 a.c $L && ./a.out) >&2
    then h=1
    else h=0
    fi
esac
echo "$a#define has__doprintf $h $z/* Does _doprintf() work?  */"
case $h in
0)
    $RM || exit
    if ($CL a.c $L && ./a.out) >&2
    then h=1
    else h=0
    fi
    a= z=;;
*)
    h=? a='/* ' z='*/ '
esac
echo "$a#define has__doprnt $h $z/* Does _doprnt() work?  */"

: EXIT_FAILURE
cat >a.c <<'EOF'
#include "a.h"
int main() { exitmain(EXIT_FAILURE); }
EOF
$RM || exit
if $CL a.c $L >&2 && ./a.out
then a= z=
else a='/* ' z='*/ '
fi
echo "$a#undef EXIT_FAILURE $z/* Uncomment this if EXIT_FAILURE is broken.  */"

: large_memory
echo "#define large_memory $has_mmap /* Can main memory hold entire RCS files?  */"

: ULONG_MAX
cat >a.c <<'EOF'
#include "a.h"
#ifdef ULONG_MAX
    /*
     * "#if ULONG_MAX/10 <= 0" does not always work,
     * because some buggy implementations put casts in ULONG_MAX.
     */
    int main() { exitmain(ULONG_MAX/10 <= 0); }
#else
    int main() { exitmain(1); }
#endif
EOF
$RM || exit
if $CL a.c $L >&2 && ./a.out
then a='/* ' z='*/ '
else a= z=
fi
echo "$a#undef ULONG_MAX $z/* Uncomment this if ULONG_MAX is broken (e.g. < 0).  */"

: struct utimbuf
cat >a.c <<'EOF'
#include "a.h"
struct utimbuf s;
int main() { s.actime = s.modtime = 1; exitmain(utime("a.c", &s) != 0); }
EOF
$RM || exit
if ($CL a.c $L && ./a.out) >&2
then a='/* ' z=' */'
else a= z=
fi
echo "${a}struct utimbuf { time_t actime, modtime; };$z /* Uncomment this if needed.  */"

: CO
echo "#define CO \"${RCSPREFIX}co\" /* name of 'co' program */"

: COMPAT2
echo "#define COMPAT2 $COMPAT2 /* Are version 2 files supported?  */"

: DATEFORM
cat >a.c <<'EOF'
#include "a.h"
int main() { printf("%.2d", 1); exitmain(0); }
EOF
$RM && $CL a.c $L >&2 && r=`./a.out` || exit
case $r in
01)    f=%.2d;;
*)    f=%02d
esac
echo "#define DATEFORM \"$f.$f.$f.$f.$f.${f}\" /* e.g. 01.01.01.01.01.01 */"

: DIFF
echo "#define DIFF \"${DIFF}\" /* name of 'diff' program */"

: DIFF3
echo "#define DIFF3 \"${DIFF3}\" /* name of 'diff3' program */"

echo "#define DIFF3_BIN $DIFF3_BIN /* Is diff3 user-visible (not the /usr/lib auxiliary)?  */"

: DIFF_FLAGS
dfs=
for df in $DIFF_FLAGS
do dfs="$dfs, \"${df}\""
done
echo "#define DIFF_FLAGS $dfs /* Make diff output suitable for RCS.  */"

: DIFF_L
echo "#define DIFF_L $DIFF_L /* Does diff -L work? */"

: DIFF_SUCCESS, DIFF_FAILURE, DIFF_TROUBLE
cat <<EOF
#define DIFF_SUCCESS $DIFF_SUCCESS /* DIFF status if no differences are found */
#define DIFF_FAILURE $DIFF_FAILURE /* DIFF status if differences are found */
#define DIFF_TROUBLE $DIFF_TROUBLE /* DIFF status if trouble */
EOF

: ED
echo "#define ED \"${ED}\" /* name of 'ed' program (used only if !DIFF3_BIN) */"

: MERGE
echo "#define MERGE \"${RCSPREFIX}merge\" /* name of 'merge' program */"

: '*SLASH*', ROOTPATH, TMPDIR, X_DEFAULT
case ${PWD-`pwd`} in
/*) # Posix
    SLASH=/
    qSLASH="'/'"
    SLASHes=$qSLASH
    isSLASH='#define isSLASH(c) ((c) == SLASH)'
    ROOTPATH='isSLASH((p)[0])'
    X_DEFAULT=",v$SLASH";;
?:[/\\]*) # MS-DOS
    SLASH='\'
    qSLASH="'\\\\'"
    SLASHes="$qSLASH: case '/': case ':'"
    isSLASH='int isSLASH P((int));'
    ROOTPATH='((p)[0] && (p)[1]==':' && isSLASH((p)[2]))'
    X_DEFAULT="$SLASH,v";;
*)
    echo >&2 "cannot deduce SLASH"; exit 1
esac
cat <<EOF
#define TMPDIR "${SLASH}tmp" /* default directory for temporary files */
#define SLASH $qSLASH /* principal pathname separator */
#define SLASHes $SLASHes /* \`case SLASHes:' labels all pathname separators */
$isSLASH /* Is arg a pathname separator?  */
#define ROOTPATH(p) $ROOTPATH /* Is p an absolute pathname?  */
#define X_DEFAULT "$X_DEFAULT" /* default value for -x option */
EOF

: DIFF_ABSOLUTE
case $DIFF in
"$SLASH"*) a=1;;
*) a=0
esac
echo "#define DIFF_ABSOLUTE $a /* Is ROOTPATH(DIFF) true?  */"

: ALL_ABSOLUTE
a=1
for i in "$DIFF" "$DIFF3" "$ED" "$RCSPREFIX" "$SENDMAIL"/
do
    case $i in
    "$SLASH"* | "\"$SLASH"*) ;;
    *) a=0 break
    esac
done
echo "#define ALL_ABSOLUTE $a /* Are all subprograms absolute pathnames?  */"

: SENDMAIL
case $SENDMAIL in
'') a='/* ' z='*/ ';;
*) a= z=
esac
echo "$a#define SENDMAIL $SENDMAIL $z/* how to send mail */"

: TZ_must_be_set
echo "#define TZ_must_be_set 0 /* Must TZ be set for gmtime() to work?  */"


: standard function declarations

cat <<'EOF'



/* Adjust the following declarations as needed.  */


#if __GNUC__ && !__STRICT_ANSI__
#    define exiting volatile /* GCC extension: function cannot return */
#else
#    define exiting
#endif
EOF

cat >a.ha <<EOF

#if has_ftruncate
    int ftruncate P((int,off_t));
#endif

/* <sys/mman.h> */
#if has_madvise
    int madvise P((caddr_t,size_t,int));
#endif
#if has_mmap
    caddr_t mmap P((caddr_t,size_t,int,int,int,off_t));
    int munmap P((caddr_t,size_t));
#endif


/* Posix (ISO/IEC 9945-1: 1990 / IEEE Std 1003.1-1990) */
/* These definitions are for the benefit of non-Posix hosts, and */
/* Posix hosts that have Standard C compilers but traditional include files.  */
/* Unfortunately, mixed-up hosts are all too common.  */

/* <fcntl.h> */
#ifdef F_DUPFD
    int fcntl P((int,int,...));
#else
    int dup2 P((int,int));
#endif
#ifndef O_BINARY /* some non-Posix hosts need O_BINARY */
#    define O_BINARY 0 /* no effect on Posix */
#endif
#ifdef O_CREAT
#    define open_can_creat 1
#else
#    define open_can_creat 0
#    define O_RDONLY 0
#    define O_WRONLY 1
#    define O_RDWR 2
#    define O_CREAT 01000
#    define O_TRUNC 02000
    int creat P((char const*,mode_t));
#endif
#ifndef O_EXCL
#    define O_EXCL 0
#endif

/* <pwd.h> */
#if has_getpwuid
    struct passwd *getpwuid P((uid_t));
#endif

/* <signal.h> */
#if has_sigaction
    int sigaction P((int,struct sigaction const*,struct sigaction*));
    int sigaddset P((sigset_t*,int));
    int sigemptyset P((sigset_t*));
#else
#if has_sigblock
    /* BSD */
    int sigblock P((int));
    int sigmask P((int));
    int sigsetmask P((int));
#endif
#endif

/* <stdio.h> */
FILE *fdopen P((int,char const*));
int fileno P((FILE*));

/* <sys/stat.h> */
int chmod P((char const*,mode_t));
int fstat P((int,struct stat*));
int stat P((char const*,struct stat*));
mode_t umask P((mode_t));
#if has_fchmod
    int fchmod P((int,mode_t));
#endif
#ifndef S_IRUSR
#    ifdef S_IREAD
#        define S_IRUSR S_IREAD
#    else
#        define S_IRUSR 0400
#    endif
#    ifdef S_IWRITE
#        define S_IWUSR S_IWRITE
#    else
#        define S_IWUSR (S_IRUSR/2)
#    endif
#endif
#ifndef S_IRGRP
#    if has_getuid
#        define S_IRGRP (S_IRUSR / 0010)
#        define S_IWGRP (S_IWUSR / 0010)
#        define S_IROTH (S_IRUSR / 0100)
#        define S_IWOTH (S_IWUSR / 0100)
#    else
        /* single user OS -- not Posix or Unix */
#        define S_IRGRP 0
#        define S_IWGRP 0
#        define S_IROTH 0
#        define S_IWOTH 0
#    endif
#endif
#ifndef S_ISREG
#    define S_ISREG(n) (((n) & S_IFMT) == S_IFREG)
#endif

/* <sys/wait.h> */
#if has_wait
    pid_t wait P((int*));
#endif
#ifndef WEXITSTATUS
#    define WEXITSTATUS(stat_val) ((unsigned)(stat_val) >> 8)
#    undef WIFEXITED /* Avoid 4.3BSD incompatibility with Posix.  */
#endif
#ifndef WIFEXITED
#    define WIFEXITED(stat_val) (!((stat_val) & 255))
#endif

/* <unistd.h> */
char *getlogin P((void));
int close P((int));
int isatty P((int));
int link P((char const*,char const*));
int open P((char const*,int,...));
int unlink P((char const*));
int _filbuf P((FILE*)); /* keeps lint quiet in traditional C */
int _flsbuf P((int,FILE*)); /* keeps lint quiet in traditional C */
long pathconf P((char const*,int));
ssize_t write P((int,void const*,size_t));
#ifndef STDIN_FILENO
#    define STDIN_FILENO 0
#    define STDOUT_FILENO 1
#    define STDERR_FILENO 2
#endif
#if has_fork
#    if !has_vfork
#        undef vfork
#        define vfork fork
#    endif
    pid_t vfork P((void)); /* vfork is nonstandard but faster */
#endif
#if has_getcwd || !has_getwd
    char *getcwd P((char*,size_t));
#else
    char *getwd P((char*));
#endif
#if has_getuid
    uid_t getuid P((void));
#endif
#if has_readlink
    ssize_t readlink P((char const*,char*,size_t)); /* BSD; not standard yet */
#endif
#if has_setuid
#    if !has_seteuid
#        undef seteuid
#        define seteuid setuid
#    endif
    int seteuid P((uid_t));
    uid_t geteuid P((void));
#endif
#if has_spawn
    int spawnv P((int,char const*,char*const*));
#    if ALL_ABSOLUTE
#        define spawn_RCS spawnv
#    else
#        define spawn_RCS spawnvp
        int spawnvp P((int,char const*,char*const*));
#    endif
#else
    int execv P((char const*,char*const*));
#    if ALL_ABSOLUTE
#        define exec_RCS execv
#    else
#        define exec_RCS execvp
        int execvp P((char const*,char*const*));
#    endif
#endif

/* utime.h */
int utime P((char const*,struct utimbuf const*));


/* Standard C library */
/* These definitions are for the benefit of hosts that have */
/* traditional C include files, possibly with Standard C compilers.  */
/* Unfortunately, mixed-up hosts are all too common.  */

/* <errno.h> */
extern int errno;

/* <limits.h> */
#ifndef ULONG_MAX
    /* This does not work in #ifs, but it's good enough for us.  */
#    define ULONG_MAX ((unsigned long)-1)
#endif

/* <signal.h> */
#if has_signal
    signal_type (*signal P((int,signal_type(*)signal_args)))signal_args;
#endif

/* <stdio.h> */
FILE *fopen P((char const*,char const*));
fread_type fread P((void*,freadarg_type,freadarg_type,FILE*));
fread_type fwrite P((void const*,freadarg_type,freadarg_type,FILE*));
int fclose P((FILE*));
int feof P((FILE*));
int ferror P((FILE*));
int fflush P((FILE*));
int fprintf P((FILE*,char const*,...));
int fputs P((char const*,FILE*));
int fseek P((FILE*,long,int));
int printf P((char const*,...));
int rename P((char const*,char const*));
int sprintf P((char*,char const*,...));
long ftell P((FILE*));
void clearerr P((FILE*));
void perror P((char const*));
#ifndef L_tmpnam
#    define L_tmpnam 32 /* power of 2 > sizeof("/usr/tmp/xxxxxxxxxxxxxxx") */
#endif
#ifndef SEEK_SET
#    define SEEK_SET 0
#endif
#if has_mktemp
    char *mktemp P((char*)); /* traditional */
#else
    char *tmpnam P((char*));
#endif
#if has_vfprintf
    int vfprintf P((FILE*,char const*,va_list));
#else
#if has__doprintf
    void _doprintf P((FILE*,char const*,va_list)); /* Minix */
#else
    void _doprnt P((char const*,va_list,FILE*)); /* BSD */
#endif
#endif

/* <stdlib.h> */
char *getenv P((char const*));
exiting void _exit P((int));
exiting void exit P((int));
malloc_type malloc P((size_t));
malloc_type realloc P((malloc_type,size_t));
void free P((malloc_type));
#ifndef EXIT_FAILURE
#    define EXIT_FAILURE 1
#endif
#ifndef EXIT_SUCCESS
#    define EXIT_SUCCESS 0
#endif
#if !has_fork && !has_spawn
    int system P((char const*));
#endif

/* <string.h> */
char *strcpy P((char*,char const*));
char *strchr P((char const*,int));
char *strrchr P((char const*,int));
int memcmp P((void const*,void const*,size_t));
int strcmp P((char const*,char const*));
size_t strlen P((char const*));
void *memcpy P((void*,void const*,size_t));
#if has_memmove
    void *memmove P((void*,void const*,size_t));
#endif

/* <time.h> */
time_t time P((time_t*));
EOF

cat >a.c <<'EOF'
#include "a.h"
#define a 0
#define b 1
#if h==a
#    include "a.ha"
#else
#    include "a.hb"
#endif
int main() { exitmain(0); }
EOF

# Comment out lines in a.ha that the compiler rejects.
# a.ha may not contain comments that cross line boundaries.
# Leave the result in a.h$h.
h=a l=1
U=`wc -l <a.ha | sed 's| ||g'`
commentOut='s|^[^#/][^/]*|/* & */|'

until  test $U -lt $l  ||  $CS -Dh=$h a.c $LS >&2
do
    case $h in
    a) i=b;;
    *) i=a
    esac

    # The compiler rejects some line in l..U.
    # Use binary search to set l to be the index of the first bad line in l..U.
    u=$U
    while test $l -lt $u
    do
        M=`expr '(' $l + $u ')' / 2`
        M1=`expr $M + 1`
        sed "$M1,\$$commentOut" a.h$h >a.h$i || exit
        if $CS -Dh=$i a.c $LS >&2
        then l=$M1
        else u=$M
        fi
    done

    # Comment out the bad line.
    sed "$l$commentOut" a.h$h >a.h$i || exit

    h=$i
    l=`expr $l + 1`
done

cat a.h$h
@


5.14.1.1
log
@Start of the AMIGA port of RCS 5.6. I call it HWGRCS now ;^)
@
text
@@


5.14.1.2
log
@RCS 5.6.0.1 changes added.
@
text
@d3 3
a5 3
Id='$Id: conf.sh,v 5.14.1.1 1993/01/18 14:39:42 heinz Exp heinz $'
#       Copyright 1990, 1991 by Paul Eggert
#       Distributed under license by the Free Software Foundation, Inc.
a37 1
: ${DIFF3_A=1}
d56 1
a56 1
        /* $Id */
d110 1
a110 1
then CS="$C -S" LS=     # Generate assembly language output.
d112 2
a113 2
then CS="$C -c" LS=     # Generate object code.
else CS=$CL LS=$L       # Generate an executable.
d120 2
a121 2
        sys/types sys/stat \
        dirent fcntl limits pwd signal stdlib string sys/mman sys/wait unistd utime vfork
d123 3
a125 3
        i="#include <$h.h>"
        : $i
        cat >a.c <<EOF
d130 13
a142 13
        $RM || exit
        ($CL a.c $L && ./a.out) >&2 || {
                case $h in
                string)
                        i='#include <strings.h>';;
                *)
                        i="/* $i */"
                esac
                case $h in
                signal) has_signal=0
                esac
        }
        echo "$i"
d153 2
a154 2
        : has_sys_${H}_h
        cat >a.c <<EOF
d159 6
a164 6
        $RM || exit
        if ($CL a.c $L && ./a.out) >&2
        then h=1
        else h=0
        fi
        echo "#define has_sys_${H}_h $h /* Does #include <sys/$H.h> work?  */"
d178 1
a178 1
        exitmain(1);
d180 6
a185 6
        int i;
        b[0] = 'a'; b[1] = '.';
        for (i = 2;  i < NAME_MAX;  i++)
                b[i] = 'a';
        b[i] = 'b';
        exitmain(creat(b, 0) < 0);
d202 1
a202 1
        exitmain(readlink("a.sym2",b,7) != 6  ||  strcmp(b, "a.sym1") != 0);
d216 9
a224 9
#       if has_sys_dir_h
#               include <sys/dir.h>
#       endif
#       ifndef NAME_MAX
#               ifndef MAXNAMLEN
#                       define MAXNAMLEN 14
#               endif
#               define NAME_MAX MAXNAMLEN
#       endif
d227 10
a236 10
#       if has_sys_param_h
#               include <sys/param.h>
#               define included_sys_param_h 1
#       endif
#       ifndef PATH_MAX
#               ifndef MAXPATHLEN
#                       define MAXPATHLEN 1024
#               endif
#               define PATH_MAX (MAXPATHLEN-1)
#       endif
d239 6
a244 6
#       if has_sys_param_h && !included_sys_param_h
#               include <sys/param.h>
#       endif
#       ifndef MAXSYMLINKS
#               define MAXSYMLINKS 20 /* BSD; not standard yet */
#       endif
d256 25
a280 25
        cat >a.c <<EOF
#       include "a.h"
        enum Boolean { false, true };
        static enum Boolean $i zero;
        static enum Boolean $i * $i azero = &zero;
        static enum Boolean $i * $i * $i aazero = &azero;
        int main() { exitmain(!!**aazero); }
EOF
        a= z=
        if $CS a.c $LS >&2
        then
                cat >a.c <<EOF
                        typedef unsigned char $i *Iptr_type;
                        struct { Iptr_type lim; } s, *f = &s;
                        int main() {
                                Iptr_type lim;
                                lim = f->lim;
                                return !!lim;
                        }
EOF
                if $CS a.c $LS >&2
                then a='/* ' z=' */'
                fi
        fi
        echo "$a#define $i$z"
d296 11
a306 11
        : $t
        case $t in
        size_t) i=unsigned;;
        time_t) i=long;;
        *) i=int;;
        esac
        if $CS -Dt=$t a.c $LS >&2
        then a='/* ' z=' */'
        else a= z=
        fi
        echo "${a}typedef $i $t;$z"
d312 1
a312 1
#       define P(params) params
d314 1
a314 1
#       define P(params) ()
d317 1
a317 1
#       include <stdarg.h>
d319 9
a327 9
#       if has_varargs
#               include <varargs.h>
#       else
                typedef char *va_list;
#               define va_dcl int va_alist;
#               define va_start(ap) ((ap) = (va_list)&va_alist)
#               define va_arg(ap,t) (((t*) ((ap)+=sizeof(t)))  [-1])
#               define va_end(ap)
#       endif
d330 1
a330 1
#       define vararg_start va_start
d332 1
a332 1
#       define vararg_start(ap,p) va_start(ap)
d344 6
a349 6
        char *s;
        va_list v;
        vararg_start(v,p);
        s = p[va_arg(v,int)];
        va_end(v);
        return s;
d353 1
a353 1
        exitmain(f(argv,0) != argv[0]  ||  f(argv,1) != argv[1]);
d358 21
a378 21
        for has_stdarg in 1 v 0
        do
                case $has_stdarg in
                v) has_varargs=1 has_stdarg=0;;
                *) has_varargs=0
                esac
                case $has_stdarg in
                0) as='1 2';;
                1) as='2 1'
                esac
                for va_start_args in $as
                do
                        $RM || exit
                        $CL \
                                -Dhas_prototypes=$has_prototypes \
                                -Dhas_stdarg=$has_stdarg \
                                -Dhas_varargs=$has_varargs \
                                -Dva_start_args=$va_start_args \
                                a.c $L >&2 && ./a.out && break
                done && break
        done && break
d380 2
a381 2
        echo >&2 "cannot deduce has_prototypes, has_stdarg, va_start_args"
        exit 1
d395 1
a395 1
        int
d397 1
a397 1
        char const *filename, *mode;
d399 8
a406 8
        int c;
        FILE *f, *g;
        if (!(f = fopen("a.out", "rb")) || !(g = fopen(filename, mode)))
                return 1;
        while (c=getc(f), !feof(f))
                if (ferror(f)  ||  putc(c,g)<0 && ferror(g))
                        return 1;
        return fclose(f)!=0 || fclose(g)!=0;
d413 1
a413 1
        cmp a.out a.e || e=0
d420 10
a429 10
        /* Text and binary i/o behave the same, or binary i/o does not work.  */
#       define FOPEN_R "r"
#       define FOPEN_W "w"
#       define FOPEN_WPLUS "w+"
#else
        /* Text and binary i/o behave differently.  */
        /* This is incompatible with Posix and Unix.  */
#       define FOPEN_R "rb"
#       define FOPEN_W "wb"
#       define FOPEN_WPLUS "w+b"
d432 7
a438 7
#       define FOPEN_R_WORK "r"
#       define FOPEN_W_WORK "w"
#       define FOPEN_WPLUS_WORK "w+"
#else
#       define FOPEN_R_WORK FOPEN_R
#       define FOPEN_W_WORK FOPEN_W
#       define FOPEN_WPLUS_WORK FOPEN_WPLUS
d463 6
a468 6
        DIR *d = opendir(".");
        struct dirent *e;
        while ((e = readdir(d)))
                if (strcmp(e->d_name, "a.c") == 0  &&  closedir(d) == 0)
                        exitmain(0);
        exitmain(1);
d509 4
a512 4
        int f = creat(argv[1], 0);
        if (f<0 || write(f,"abc",3)!=3 || ftruncate(f,(off_t)0)!=0 || close(f)!=0)
                        exitmain(1);
        exitmain(0);
d518 12
a529 12
        h=1
        # Check out /tmp too; it's buggy on some hosts.
        for d in . /tmp
        do
                if test -d $d
                then
                        f=$d/a.d
                        rm -f $f || exit
                        ./a.out $f && test ! -s $f && test -f $f  ||  h=0
                        rm -f $f || exit
                fi
        done
d538 1
a538 1
        uid_t getuid();
d552 1
a552 1
        a='/* ' z='*/ ' h=?;;
d554 2
a555 2
        a= z=
        cat >a.c <<'EOF'
d559 5
a563 5
        $RM || exit
        if ($CL a.c $L && ./a.out) >&2
        then h=1
        else h=0
        fi
d597 2
a598 2
        memcpy(a,"xy",3);
        exitmain(strcmp(a,"xy")!=0);
d613 3
a615 3
        strcpy(a, "xy");
        memmove(a+1, a, 3);
        exitmain(strcmp(a,"xxy")!=0);
d630 1
a630 1
        caddr_t mmap();
d635 1
a635 1
#       define MADVISE_OK (madvise(a,b.st_size,MADV_SEQUENTIAL)==0 && madvise(a,b.st_size,MADV_NORMAL)==0)
d639 12
a650 12
        if (fstat(fileno(stdin), &b) != 0)
                exitmain(1);
        a = mmap(
                (caddr_t)0, b.st_size, PROT_READ, MAP_SHARED,
                fileno(stdin), (off_t)0
        );
        exitmain(
                a == (caddr_t)-1  ||
                !MADVISE_OK ||
                *a != CHAR1  ||
                munmap(a, b.st_size)  !=  0
        );
d657 3
a659 3
        has_mmap=1
        $RM || exit
        ($CL a.c $L && ./a.out <a.c) >&2 && a=1
d672 14
a685 14
        h=1
        rm -f a.a a.b &&
        echo a >a.a && chmod -w a.a || exit
        if ./a.out && test ! -f a.a && test -f a.b
        then a=0
        else a=1
        fi
        rm -f a.a a.b &&
        echo a >a.a && echo b >a.b && chmod -w a.b || exit
        if ./a.out && test ! -f a.a && test -f a.b
        then b=0
        else b=1
        fi
        rm -f a.a a.b || exit
d700 1
a700 1
        v='(void) '
d702 2
a703 2
        v=
        echo 'typedef int void;'
d710 1
a710 1
        a='/* ' z='*/ ' has_seteuid=?;;
d712 2
a713 2
        a= z=
        cat >a.c <<'EOF'
d716 1
a716 1
        uid_t geteuid();
d722 1
a722 1
        exitmain(1);
d724 1
a724 1
        exitmain(seteuid(geteuid()) != 0);
d728 5
a732 5
        $RM || exit
        if ($CL a.c $L && ./a.out) >&2
        then has_seteuid=1
        else has_seteuid=0
        fi
d740 1
a740 1
        cat >a.c <<'EOF'
d743 1
a743 1
        uid_t getuid();
d747 2
a748 2
        $RM || exit
        ($CL a.c $L && ./a.out) >&2 && h=1
d756 1
a756 1
        pid_t getpid();
d759 1
a759 1
        signal_type (*signal P((int,signal_type(*)signal_args)))signal_args;
d764 4
a767 4
        signal(SIGINT, nothing);
        while (--argc)
                kill(getpid(), SIGINT);
        exitmain(0);
d772 12
a783 12
        for signal_type in void int
        do
                for signal_args in 'P((int))' '()'
                do
                        $RM || exit
                        ($CL \
                                -Ddeclare_signal=$declare_signal \
                                -Dsignal_args="$signal_args" \
                                -Dsignal_type=$signal_type \
                                        a.c $L && ./a.out 1) >&2 && break
                done && break
        done && break
d785 2
a786 2
        echo >&2 "cannot deduce signal_args, signal_type"
        exit 1
d803 1
a803 1
        pid_t getpid();
d809 12
a820 12
        struct sigaction s;
        sigset_t t;
        if (sigemptyset(&t) != 0  ||  sigaddset(&t, SIGINT) != 0)
                exitmain(1);
        if (sigaction(SIGINT, (struct sigaction const*)0, &s) != 0)
                exitmain(1);
        s.sa_handler = getsig;
        s.sa_mask = t;
        if (sigaction(SIGINT, &s, (struct sigaction*)0) != 0)
                exitmain(1);
        kill(getpid(), SIGINT);
        exitmain(gotsig != 1);
d835 1
a835 1
        h=? n=?;;
d837 2
a838 2
        a= z=
        cat >a.c <<'EOF'
d842 1
a842 1
#       define sigmask(s) (1 << ((s)-1))
d846 2
a847 2
        sigblock(sigmask(SIGHUP));
        exitmain(kill(getpid(), SIGHUP) != 0);
d850 6
a855 6
        if $RM || exit; ($CL a.c $L && ./a.out) >&2
        then h=1
        elif $RM || exit; ($CL -Ddefine_sigmask=1 a.c $L && ./a.out) >&2
        then h=1 b= y=
        else h=0
        fi
d864 1
a864 1
        extern char const *sys_siglist[];
d880 1
a880 1
        fread_type fread P((void*,freadarg_type,freadarg_type,FILE*));
d884 5
a888 5
        char b;
        exitmain(!(
                fread(&b, (freadarg_type)1, (freadarg_type)1, stdin) == 1  &&
                b==CHAR1
        ));
d893 15
a907 15
        for fread_type in ssize_t size_t int unsigned
        do
                for freadarg_type in size_t ssize_t unsigned int
                do
                        $RM || exit
                        (
                                $CL \
                                        -Ddeclare_fread=$declare_fread \
                                        -Dfreadarg_type=$freadarg_type \
                                        -Dfread_type=$fread_type \
                                        a.c $L &&
                                ./a.out <a.c
                        ) >&2 && break
                done && break
        done && break
d909 2
a910 2
        echo >&2 "cannot deduce fread types"
        exit 1
d922 1
a922 1
        malloc_type malloc();
d936 1
a936 1
        char *getcwd();
d951 1
a951 1
        a='/* ' z='*/ ' h=?;;
d953 2
a954 2
        a= z=
        cat >a.c <<'EOF'
d958 1
a958 1
        char *getwd();
d963 5
a967 5
        $RM || exit
        if ($CL a.c $L && ./a.out) >&2
        then h=1
        else h=0
        fi
d975 1
a975 1
        char *mktemp();
d979 3
a981 3
        char b[9];
        strcpy(b, "a.XXXXXX");
        exitmain(!mktemp(b));
d998 1
a998 1
        char *strchr();
d1013 1
a1013 1
        char *strrchr();
d1041 1
a1041 1
        pid_t getpid();
d1044 9
a1052 9
#       ifndef vfork
                pid_t vfork();
#       endif
#else
#       ifndef fork
                pid_t fork();
#       endif
#       undef vfork
#       define vfork fork
d1055 7
a1061 7
#       ifndef waitpid
                pid_t waitpid();
#       endif
#else
#       ifndef wait
                pid_t wait();
#       endif
d1068 19
a1086 19
        pid_t parent = getpid();
        if (!(child = vfork())) {
                /* Tickle vfork/compiler bug (e.g. sparc gcc -O (1.37.1).  */
                pid_t i = getpid(), j = getpid();
                if (i!=getpid() || j!=getpid())
                        _exit(!i);
                /* Tickle file descriptor bug (e.g. IRIX 3.3).  */
                _exit(close(1) != 0);
        } else {
#               if TRY_WAITPID
                        if (waitpid(child, &status, 0) != child)
                                exitmain(1);
#               else
                        while (wait(&status) != child)
                                ;
#               endif
                /* Test for presence of bugs.  */
                exitmain(status  ||  parent != getpid()  ||  fstat(1,&st) != 0);
        }
d1098 2
a1099 2
        $RM || exit
        ($CL a.c $L && ./a.out) >&2 && h=1
d1121 6
a1126 6
        int r;
        va_list args;
        vararg_start(args, format);
        r = vfprintf(stderr, format, args);
        va_end(args);
        return r;
d1140 1
a1140 1
        h=? a='/* ' z='*/ ';;
d1142 2
a1143 2
        a= z=
        cat >a.c <<'EOF'
d1151 8
a1158 8
        va_list args;
        vararg_start(args, format);
#       if TRY__DOPRINTF
                _doprintf(stderr, format, args);
#       else
                _doprnt(format, args, stderr);
#       endif
        va_end(args);
d1162 5
a1166 5
        $RM || exit
        if ($CL -DTRY__DOPRINTF=1 a.c $L && ./a.out) >&2
        then h=1
        else h=0
        fi
d1171 6
a1176 6
        $RM || exit
        if ($CL a.c $L && ./a.out) >&2
        then h=1
        else h=0
        fi
        a= z=;;
d1178 1
a1178 1
        h=? a='/* ' z='*/ '
d1201 5
a1205 5
        /*
         * "#if ULONG_MAX/10 <= 0" does not always work,
         * because some buggy implementations put casts in ULONG_MAX.
         */
        int main() { exitmain(ULONG_MAX/10 <= 0); }
d1207 1
a1207 1
        int main() { exitmain(1); }
d1243 2
a1244 2
01)     f=%.2d;;
*)      f=%02d
a1253 2
echo "#define DIFF3_A $DIFF3_A /* Does diff3 have an -A option?  */"

d1282 6
a1287 6
        SLASH=/
        qSLASH="'/'"
        SLASHes=$qSLASH
        isSLASH='#define isSLASH(c) ((c) == SLASH)'
        ROOTPATH='isSLASH((p)[0])'
        X_DEFAULT=",v$SLASH";;
d1289 6
a1294 6
        SLASH='\'
        qSLASH="'\\\\'"
        SLASHes="$qSLASH: case '/': case ':'"
        isSLASH='int isSLASH P((int));'
        ROOTPATH='((p)[0] && (p)[1]==':' && isSLASH((p)[2]))'
        X_DEFAULT="$SLASH,v";;
d1296 1
a1296 1
        echo >&2 "cannot deduce SLASH"; exit 1
d1318 4
a1321 4
        case $i in
        "$SLASH"* | "\"$SLASH"*) ;;
        *) a=0 break
        esac
d1346 1
a1346 1
#       define exiting volatile /* GCC extension: function cannot return */
d1348 1
a1348 1
#       define exiting
d1355 1
a1355 1
        int ftruncate P((int,off_t));
d1360 1
a1360 1
        int madvise P((caddr_t,size_t,int));
d1363 2
a1364 2
        caddr_t mmap P((caddr_t,size_t,int,int,int,off_t));
        int munmap P((caddr_t,size_t));
d1375 1
a1375 1
        int fcntl P((int,int,...));
d1377 1
a1377 1
        int dup2 P((int,int));
d1380 1
a1380 1
#       define O_BINARY 0 /* no effect on Posix */
d1383 1
a1383 1
#       define open_can_creat 1
d1385 7
a1391 7
#       define open_can_creat 0
#       define O_RDONLY 0
#       define O_WRONLY 1
#       define O_RDWR 2
#       define O_CREAT 01000
#       define O_TRUNC 02000
        int creat P((char const*,mode_t));
d1394 1
a1394 1
#       define O_EXCL 0
d1399 1
a1399 1
        struct passwd *getpwuid P((uid_t));
d1404 3
a1406 3
        int sigaction P((int,struct sigaction const*,struct sigaction*));
        int sigaddset P((sigset_t*,int));
        int sigemptyset P((sigset_t*));
d1409 4
a1412 4
        /* BSD */
        int sigblock P((int));
        int sigmask P((int));
        int sigsetmask P((int));
d1426 1
a1426 1
        int fchmod P((int,mode_t));
d1429 10
a1438 10
#       ifdef S_IREAD
#               define S_IRUSR S_IREAD
#       else
#               define S_IRUSR 0400
#       endif
#       ifdef S_IWRITE
#               define S_IWUSR S_IWRITE
#       else
#               define S_IWUSR (S_IRUSR/2)
#       endif
d1441 12
a1452 12
#       if has_getuid
#               define S_IRGRP (S_IRUSR / 0010)
#               define S_IWGRP (S_IWUSR / 0010)
#               define S_IROTH (S_IRUSR / 0100)
#               define S_IWOTH (S_IWUSR / 0100)
#       else
                /* single user OS -- not Posix or Unix */
#               define S_IRGRP 0
#               define S_IWGRP 0
#               define S_IROTH 0
#               define S_IWOTH 0
#       endif
d1455 1
a1455 1
#       define S_ISREG(n) (((n) & S_IFMT) == S_IFREG)
d1460 1
a1460 1
        pid_t wait P((int*));
d1463 2
a1464 2
#       define WEXITSTATUS(stat_val) ((unsigned)(stat_val) >> 8)
#       undef WIFEXITED /* Avoid 4.3BSD incompatibility with Posix.  */
d1467 1
a1467 1
#       define WIFEXITED(stat_val) (!((stat_val) & 255))
d1482 3
a1484 3
#       define STDIN_FILENO 0
#       define STDOUT_FILENO 1
#       define STDERR_FILENO 2
d1487 5
a1491 5
#       if !has_vfork
#               undef vfork
#               define vfork fork
#       endif
        pid_t vfork P((void)); /* vfork is nonstandard but faster */
d1494 1
a1494 1
        char *getcwd P((char*,size_t));
d1496 1
a1496 1
        char *getwd P((char*));
d1499 1
a1499 1
        uid_t getuid P((void));
d1502 1
a1502 1
        ssize_t readlink P((char const*,char*,size_t)); /* BSD; not standard yet */
d1505 6
a1510 6
#       if !has_seteuid
#               undef seteuid
#               define seteuid setuid
#       endif
        int seteuid P((uid_t));
        uid_t geteuid P((void));
d1513 15
a1527 15
        int spawnv P((int,char const*,char*const*));
#       if ALL_ABSOLUTE
#               define spawn_RCS spawnv
#       else
#               define spawn_RCS spawnvp
                int spawnvp P((int,char const*,char*const*));
#       endif
#else
        int execv P((char const*,char*const*));
#       if ALL_ABSOLUTE
#               define exec_RCS execv
#       else
#               define exec_RCS execvp
                int execvp P((char const*,char*const*));
#       endif
d1544 2
a1545 2
        /* This does not work in #ifs, but it's good enough for us.  */
#       define ULONG_MAX ((unsigned long)-1)
d1550 1
a1550 1
        signal_type (*signal P((int,signal_type(*)signal_args)))signal_args;
d1571 1
a1571 1
#       define L_tmpnam 32 /* power of 2 > sizeof("/usr/tmp/xxxxxxxxxxxxxxx") */
d1574 1
a1574 1
#       define SEEK_SET 0
d1577 1
a1577 1
        char *mktemp P((char*)); /* traditional */
d1579 1
a1579 1
        char *tmpnam P((char*));
d1582 1
a1582 1
        int vfprintf P((FILE*,char const*,va_list));
d1585 1
a1585 1
        void _doprintf P((FILE*,char const*,va_list)); /* Minix */
d1587 1
a1587 1
        void _doprnt P((char const*,va_list,FILE*)); /* BSD */
d1599 1
a1599 1
#       define EXIT_FAILURE 1
d1602 1
a1602 1
#       define EXIT_SUCCESS 0
d1605 1
a1605 1
        int system P((char const*));
d1617 1
a1617 1
        void *memmove P((void*,void const*,size_t));
d1629 1
a1629 1
#       include "a.ha"
d1631 1
a1631 1
#       include "a.hb"
d1645 18
a1662 18
        case $h in
        a) i=b;;
        *) i=a
        esac

        # The compiler rejects some line in l..U.
        # Use binary search to set l to be the index of the first bad line in l..U.
        u=$U
        while test $l -lt $u
        do
                M=`expr '(' $l + $u ')' / 2`
                M1=`expr $M + 1`
                sed "$M1,\$$commentOut" a.h$h >a.h$i || exit
                if $CS -Dh=$i a.c $LS >&2
                then l=$M1
                else u=$M
                fi
        done
d1664 2
a1665 2
        # Comment out the bad line.
        sed "$l$commentOut" a.h$h >a.h$i || exit
d1667 2
a1668 2
        h=$i
        l=`expr $l + 1`
@