Initial import from FreeBSD RELENG_4:
[dragonfly.git] / sbin / reboot / reboot.c
1 /*
2  * Copyright (c) 1980, 1986, 1993
3  *      The Regents of the University of California.  All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  * 3. All advertising materials mentioning features or use of this software
14  *    must display the following acknowledgement:
15  *      This product includes software developed by the University of
16  *      California, Berkeley and its contributors.
17  * 4. Neither the name of the University nor the names of its contributors
18  *    may be used to endorse or promote products derived from this software
19  *    without specific prior written permission.
20  *
21  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31  * SUCH DAMAGE.
32  */
33
34 #ifndef lint
35 static const char copyright[] =
36 "@(#) Copyright (c) 1980, 1986, 1993\n\
37         The Regents of the University of California.  All rights reserved.\n";
38 #endif /* not lint */
39
40 #ifndef lint
41 #if 0
42 static char sccsid[] = "@(#)reboot.c    8.1 (Berkeley) 6/5/93";
43 #endif
44 static const char rcsid[] =
45   "$FreeBSD: src/sbin/reboot/reboot.c,v 1.9.2.4 2002/04/28 22:50:00 wes Exp $";
46 #endif /* not lint */
47
48 #include <sys/reboot.h>
49 #include <sys/types.h>
50 #include <sys/sysctl.h>
51 #include <signal.h>
52 #include <err.h>
53 #include <errno.h>
54 #include <fcntl.h>
55 #include <libutil.h>
56 #include <pwd.h>
57 #include <syslog.h>
58 #include <stdio.h>
59 #include <stdlib.h>
60 #include <string.h>
61 #include <unistd.h>
62
63 void usage(void);
64 u_int get_pageins(void);
65
66 int dohalt;
67
68 int
69 main(int argc, char *argv[])
70 {
71         struct passwd *pw;
72         int ch, howto, i, fd, kflag, lflag, nflag, qflag, pflag, sverrno;
73         u_int pageins;
74         char *kernel, *p;
75         const char *user;
76
77         if (strstr((p = rindex(*argv, '/')) ? p + 1 : *argv, "halt")) {
78                 dohalt = 1;
79                 howto = RB_HALT;
80         } else
81                 howto = 0;
82         kflag = lflag = nflag = qflag = 0;
83         while ((ch = getopt(argc, argv, "dk:lnpq")) != -1)
84                 switch(ch) {
85                 case 'd':
86                         howto |= RB_DUMP;
87                         break;
88                 case 'k':
89                         kflag = 1;
90                         kernel = optarg;
91                         break;
92                 case 'l':
93                         lflag = 1;
94                         break;
95                 case 'n':
96                         nflag = 1;
97                         howto |= RB_NOSYNC;
98                         break;
99                 case 'p':
100                         pflag = 1;
101                         howto |= (RB_POWEROFF | RB_HALT);
102                         break;
103                 case 'q':
104                         qflag = 1;
105                         break;
106                 case '?':
107                 default:
108                         usage();
109                 }
110         argc -= optind;
111         argv += optind;
112
113         if ((howto & (RB_DUMP | RB_HALT)) == (RB_DUMP | RB_HALT))
114                 errx(1, "cannot dump (-d) when halting; must reboot instead");
115         if (geteuid()) {
116                 errno = EPERM;
117                 err(1, NULL);
118         }
119
120         if (qflag) {
121                 reboot(howto);
122                 err(1, NULL);
123         }
124
125         if (kflag) {
126                 fd = open("/boot/nextboot.conf", O_WRONLY | O_CREAT, 0444);
127                 if (fd > -1) {
128                         (void)write(fd, "kernel=\"", 8L);
129                         (void)write(fd, kernel, strlen(kernel));
130                         (void)write(fd, "\"\n", 2);
131                         close(fd);
132                 }
133         }
134
135         /* Log the reboot. */
136         if (!lflag)  {
137                 if ((user = getlogin()) == NULL)
138                         user = (pw = getpwuid(getuid())) ?
139                             pw->pw_name : "???";
140                 if (dohalt) {
141                         openlog("halt", 0, LOG_AUTH | LOG_CONS);
142                         syslog(LOG_CRIT, "halted by %s", user);
143                 } else {
144                         openlog("reboot", 0, LOG_AUTH | LOG_CONS);
145                         syslog(LOG_CRIT, "rebooted by %s", user);
146                 }
147         }
148         logwtmp("~", "shutdown", "");
149
150         /*
151          * Do a sync early on, so disks start transfers while we're off
152          * killing processes.  Don't worry about writes done before the
153          * processes die, the reboot system call syncs the disks.
154          */
155         if (!nflag)
156                 sync();
157
158         /* Just stop init -- if we fail, we'll restart it. */
159         if (kill(1, SIGTSTP) == -1)
160                 err(1, "SIGTSTP init");
161
162         /* Ignore the SIGHUP we get when our parent shell dies. */
163         (void)signal(SIGHUP, SIG_IGN);
164
165         /* Send a SIGTERM first, a chance to save the buffers. */
166         if (kill(-1, SIGTERM) == -1)
167                 err(1, "SIGTERM processes");
168
169         /*
170          * After the processes receive the signal, start the rest of the
171          * buffers on their way.  Wait 5 seconds between the SIGTERM and
172          * the SIGKILL to give everybody a chance. If there is a lot of
173          * paging activity then wait longer, up to a maximum of approx
174          * 60 seconds.
175          */
176         sleep(2);
177         for (i = 0; i < 20; i++) {
178                 pageins = get_pageins();
179                 if (!nflag)
180                         sync();
181                 sleep(3);
182                 if (get_pageins() == pageins)
183                         break;
184         }
185
186         for (i = 1;; ++i) {
187                 if (kill(-1, SIGKILL) == -1) {
188                         if (errno == ESRCH)
189                                 break;
190                         goto restart;
191                 }
192                 if (i > 5) {
193                         (void)fprintf(stderr,
194                             "WARNING: some process(es) wouldn't die\n");
195                         break;
196                 }
197                 (void)sleep(2 * i);
198         }
199
200         reboot(howto);
201         /* FALLTHROUGH */
202
203 restart:
204         sverrno = errno;
205         errx(1, "%s%s", kill(1, SIGHUP) == -1 ? "(can't restart init): " : "",
206             strerror(sverrno));
207         /* NOTREACHED */
208 }
209
210 void
211 usage()
212 {
213         (void)fprintf(stderr, "usage: %s [-dnpq] [-k kernel]\n",
214             dohalt ? "halt" : "reboot");
215         exit(1);
216 }
217
218 u_int
219 get_pageins()
220 {
221         u_int pageins;
222         size_t len;
223
224         len = sizeof(pageins);
225         if (sysctlbyname("vm.stats.vm.v_swappgsin", &pageins, &len, NULL, 0)
226             != 0) {
227                 warnx("v_swappgsin");
228                 return (0);
229         }
230         return pageins;
231 }