misc-utils/waitpid.c

   1 /*
   2  * waitpid(1) - wait for process termination
   3  *
   4  * Copyright (C) 2022 Thomas Weißschuh <thomas@t-8ch.de>
   5  *
   6  * This program is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License as published by
   8  * the Free Software Foundation; either version 2 of the License, or
   9  * (at your option) any later version.
  10  *
  11  * This program is distributed in the hope that it would be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  * GNU General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU General Public License along
  17  * with this program; if not, write to the Free Software Foundation, Inc.,
  18  * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  19  */
  20
  21 #include <sys/epoll.h>
  22 #include <sys/timerfd.h>
  23 #include <assert.h>
  24 #include <stdlib.h>
  25 #include <errno.h>
  26 #include <string.h>
  27 #include <unistd.h>
  28 #include <stdbool.h>
  29 #include <getopt.h>
  30
  31 #include "pidfd-utils.h"
  32 #include "c.h"
  33 #include "nls.h"
  34 #include "xalloc.h"
  35 #include "strutils.h"
  36 #include "exitcodes.h"
  37 #include "timeutils.h"
  38 #include "optutils.h"
  39
  40 #define EXIT_TIMEOUT_EXPIRED 3
  41
  42 #define TIMEOUT_SOCKET_IDX UINT64_MAX
  43
  44 static bool verbose = false;
  45 static struct timespec timeout;
  46 static bool allow_exited = false;
  47 static size_t count;
  48
  49 static pid_t *parse_pids(size_t n_strings, char * const *strings)
  50 {
  51         pid_t *pids = xcalloc(n_strings, sizeof(*pids));
  52
  53         for (size_t i = 0; i < n_strings; i++)
  54                 pids[i] = strtopid_or_err(strings[i], _("failed to parse pid"));
  55
  56         return pids;
  57 }
  58
  59 static int *open_pidfds(size_t n_pids, pid_t *pids)
  60 {
  61         int *pidfds = xcalloc(n_pids, sizeof(*pidfds));
  62
  63         for (size_t i = 0; i < n_pids; i++) {
  64                 pidfds[i] = pidfd_open(pids[i], 0);
  65                 if (pidfds[i] == -1) {
  66                         if (allow_exited && errno == ESRCH) {
  67                                 if (verbose)
  68                                         warnx(_("PID %d has exited, skipping"), pids[i]);
  69                                 continue;
  70                         }
  71                         err_nosys(EXIT_FAILURE, _("could not open pid %u"), pids[i]);
  72                 }
  73         }
  74
  75         return pidfds;
  76 }
  77
  78 static int open_timeoutfd(void)
  79 {
  80         int fd;
  81         struct itimerspec timer = {};
  82
  83         if (!timeout.tv_sec && !timeout.tv_nsec)
  84                 return -1;
  85
  86         timer.it_value = timeout;
  87
  88         fd = timerfd_create(CLOCK_MONOTONIC, TFD_CLOEXEC);
  89         if (fd == -1)
  90                 err_nosys(EXIT_FAILURE, _("could not create timerfd"));
  91
  92         if (timerfd_settime(fd, 0, &timer, NULL))
  93                 err_nosys(EXIT_FAILURE, _("could not set timer"));
  94
  95         return fd;
  96
  97 }
  98
  99 static size_t add_listeners(int epll, size_t n_pids, int * const pidfds, int timeoutfd)
 100 {
 101         size_t skipped = 0;
 102         struct epoll_event evt = {
 103                 .events = EPOLLIN,
 104         };
 105
 106         if (timeoutfd != -1) {
 107                 evt.data.u64 = TIMEOUT_SOCKET_IDX;
 108                 if (epoll_ctl(epll, EPOLL_CTL_ADD, timeoutfd, &evt))
 109                         err_nosys(EXIT_FAILURE, _("could not add timerfd"));
 110         }
 111
 112         for (size_t i = 0; i < n_pids; i++) {
 113                 if (pidfds[i] == -1) {
 114                         skipped++;
 115                         continue;
 116                 }
 117                 evt.data.u64 = i;
 118                 if (epoll_ctl(epll, EPOLL_CTL_ADD, pidfds[i], &evt))
 119                         err_nosys(EXIT_FAILURE, _("could not add listener"));
 120         }
 121
 122         return n_pids - skipped;
 123 }
 124
 125 static void wait_for_exits(int epll, size_t active_pids, pid_t * const pids,
 126                            int * const pidfds)
 127 {
 128         while (active_pids) {
 129                 struct epoll_event evt;
 130                 int ret, fd;
 131
 132                 ret = epoll_wait(epll, &evt, 1, -1);
 133                 if (ret == -1) {
 134                         if (errno == EINTR)
 135                                 continue;
 136                         else
 137                                 err_nosys(EXIT_FAILURE, _("failure during wait"));
 138                 }
 139                 if (evt.data.u64 == TIMEOUT_SOCKET_IDX) {
 140                         if (verbose)
 141                                 printf(_("Timeout expired\n"));
 142                         exit(EXIT_TIMEOUT_EXPIRED);
 143                 }
 144                 if (verbose)
 145                         printf(_("PID %d finished\n"), pids[evt.data.u64]);
 146                 assert((size_t) ret <= active_pids);
 147                 fd = pidfds[evt.data.u64];
 148                 epoll_ctl(epll, EPOLL_CTL_DEL, fd, NULL);
 149                 active_pids -= ret;
 150         }
 151 }
 152
 153 static void __attribute__((__noreturn__)) usage(void)
 154 {
 155         FILE *out = stdout;
 156
 157         fputs(USAGE_HEADER, out);
 158         fprintf(out, _(" %s [options] pid...\n"), program_invocation_short_name);
 159
 160         fputs(USAGE_OPTIONS, out);
 161         fputs(_(" -v, --verbose           be more verbose\n"), out);
 162         fputs(_(" -t, --timeout=<timeout> wait at most timeout seconds\n"), out);
 163         fputs(_(" -e, --exited            allow exited PIDs\n"), out);
 164         fputs(_(" -c, --count=<count>     number of process exits to wait for\n"), out);
 165
 166         fputs(USAGE_SEPARATOR, out);
 167         fprintf(out, USAGE_HELP_OPTIONS(25));
 168
 169         fprintf(out, USAGE_MAN_TAIL("waitpid(1)"));
 170
 171         exit(EXIT_SUCCESS);
 172 }
 173
 174 static int parse_options(int argc, char **argv)
 175 {
 176         int c;
 177         static const struct option longopts[] = {
 178                 { "verbose", no_argument,       NULL, 'v' },
 179                 { "timeout", required_argument, NULL, 't' },
 180                 { "exited",  no_argument,       NULL, 'e' },
 181                 { "count",   required_argument, NULL, 'c' },
 182                 { "version", no_argument,       NULL, 'V' },
 183                 { "help",    no_argument,       NULL, 'h' },
 184                 { 0 }
 185         };
 186         static const ul_excl_t excl[] = {       /* rows and cols in ASCII order */
 187                 { 'c', 'e' },
 188                 { 0 }
 189         };
 190         int excl_st[ARRAY_SIZE(excl)] = UL_EXCL_STATUS_INIT;
 191
 192         while ((c = getopt_long (argc, argv, "vVht:c:e", longopts, NULL)) != -1) {
 193
 194                 err_exclusive_options(c, longopts, excl, excl_st);
 195
 196                 switch (c) {
 197                 case 'v':
 198                         verbose = true;
 199                         break;
 200                 case 't':
 201                         strtotimespec_or_err(optarg, &timeout,
 202                                              _("Could not parse timeout"));
 203                         break;
 204                 case 'e':
 205                         allow_exited = true;
 206                         break;
 207                 case 'c':
 208                         count = str2num_or_err(optarg, 10, _("Invalid count"),
 209                                                1, INT64_MAX);
 210                         break;
 211                 case 'V':
 212                         print_version(EXIT_SUCCESS);
 213                 case 'h':
 214                         usage();
 215                 default:
 216                         errtryhelp(EXIT_FAILURE);
 217                 }
 218         }
 219
 220         return optind;
 221 }
 222
 223 int main(int argc, char **argv)
 224 {
 225         int pid_idx, epoll, timeoutfd, *pidfds;
 226         size_t n_pids, active_pids;
 227
 228         setlocale(LC_ALL, "");
 229         bindtextdomain(PACKAGE, LOCALEDIR);
 230         textdomain(PACKAGE);
 231
 232         pid_idx = parse_options(argc, argv);
 233         n_pids = argc - pid_idx;
 234         if (!n_pids)
 235                 errx(EXIT_FAILURE, _("no PIDs specified"));
 236
 237         if (count && count > n_pids)
 238                 errx(EXIT_FAILURE,
 239                      _("can't want for %zu of %zu PIDs"), count, n_pids);
 240
 241         pid_t *pids = parse_pids(argc - pid_idx, argv + pid_idx);
 242
 243         pidfds = open_pidfds(n_pids, pids);
 244         timeoutfd = open_timeoutfd();
 245         epoll = epoll_create(n_pids);
 246         if (epoll == -1)
 247                 err_nosys(EXIT_FAILURE, _("could not create epoll"));
 248
 249         active_pids = add_listeners(epoll, n_pids, pidfds, timeoutfd);
 250         if (count)
 251                 active_pids = min(active_pids, count);
 252         wait_for_exits(epoll, active_pids, pids, pidfds);
 253 }