usr/src/sbin/reboot/halt.c

/*
 * Copyright (c) 1980, 1986 The Regents of the University of California.
 * All rights reserved.
 *
 * %sccs.include.redist.c%
 */

#ifndef lint
char copyright[] =
"@(#) Copyright (c) 1980, 1986 The Regents of the University of California.\n\
 All rights reserved.\n";
#endif /* not lint */

#ifndef lint
static char sccsid[] = "@(#)halt.c      5.10 (Berkeley) %G%";
#endif /* not lint */

/*
 * Halt
 */
#include <sys/types.h>
#include <sys/reboot.h>
#include <sys/time.h>
#include <sys/syslog.h>
#include <sys/signal.h>
#include <errno.h>
#include <pwd.h>
#include <stdio.h>
#include <paths.h>

main(argc, argv)
        int argc;
        char **argv;
{
        register int i;
        register int qflag = 0;
        struct passwd *pw;
        int ch, howto, needlog = 1;
        char *user, *ttyn, *getlogin(), *ttyname();

        howto = RB_HALT;
        ttyn = ttyname(2);
        while ((ch = getopt(argc, argv, "lnqy")) != EOF)
                switch((char)ch) {
                case 'l':               /* undocumented; for shutdown(8) */
                        needlog = 0;
                        break;
                case 'n':
                        howto |= RB_NOSYNC;
                        break;
                case 'q':
                        qflag++;
                        break;
                case 'y':
                        ttyn = 0;
                        break;
                case '?':
                default:
                        fprintf(stderr, "usage: halt [-nqy]\n");
                        exit(1);
                }

        if (ttyn && ttyn[sizeof(_PATH_TTY) - 1] == 'd') {
                fprintf(stderr, "halt: dangerous on a dialup; use ``halt -y'' if you are really sure\n");
                exit(1);
        }

        if (needlog) {
                openlog("halt", 0, LOG_AUTH);
                if ((user = getlogin()) == NULL)
                        if ((pw = getpwuid(getuid())))
                                user = pw->pw_name;
                        else
                                user = "???";
                syslog(LOG_CRIT, "halted by %s", user);
        }

        signal(SIGHUP, SIG_IGN);                /* for network connections */
        if (kill(1, SIGTSTP) == -1) {
                fprintf(stderr, "halt: can't idle init\n");
                exit(1);
        }
        sleep(1);
        (void) kill(-1, SIGTERM);       /* one chance to catch it */
        sleep(5);

        if (!qflag) for (i = 1; ; i++) {
                if (kill(-1, SIGKILL) == -1) {
                        extern int errno;

                        if (errno == ESRCH)
                                break;

                        perror("halt: kill");
                        kill(1, SIGHUP);
                        exit(1);
                }
                if (i > 5) {
                        fprintf(stderr,
                            "CAUTION: some process(es) wouldn't die\n");
                        break;
                }
                setalarm(2 * i);
                pause();
        }

        if (!qflag && (howto & RB_NOSYNC) == 0) {
                logwtmp("~", "shutdown", "");
                sync();
                setalarm(5);
                pause();
        }
        reboot(howto);
        perror("halt");
}

void
dingdong()
{
        /* RRRIIINNNGGG RRRIIINNNGGG */
}

setalarm(n)
        int n;
{
        signal(SIGALRM, dingdong);
        alarm(n);
}