Annotation of embedaddon/sudo/plugins/sudoers/sudoreplay.c, revision 1.1

1.1     ! misho       1: /*
        !             2:  * Copyright (c) 2009-2011 Todd C. Miller <Todd.Miller@courtesan.com>
        !             3:  *
        !             4:  * Permission to use, copy, modify, and distribute this software for any
        !             5:  * purpose with or without fee is hereby granted, provided that the above
        !             6:  * copyright notice and this permission notice appear in all copies.
        !             7:  *
        !             8:  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
        !             9:  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
        !            10:  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
        !            11:  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
        !            12:  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
        !            13:  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
        !            14:  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
        !            15:  */
        !            16: 
        !            17: #include <config.h>
        !            18: 
        !            19: #include <sys/types.h>
        !            20: #include <sys/param.h>
        !            21: #ifdef HAVE_SYS_SYSMACROS_H
        !            22: # include <sys/sysmacros.h>
        !            23: #endif
        !            24: #include <sys/stat.h>
        !            25: #include <sys/time.h>
        !            26: #include <sys/wait.h>
        !            27: #include <sys/ioctl.h>
        !            28: #ifdef HAVE_SYS_SELECT_H
        !            29: #include <sys/select.h>
        !            30: #endif /* HAVE_SYS_SELECT_H */
        !            31: #include <stdio.h>
        !            32: #ifdef STDC_HEADERS
        !            33: # include <stdlib.h>
        !            34: # include <stddef.h>
        !            35: #else
        !            36: # ifdef HAVE_STDLIB_H
        !            37: #  include <stdlib.h>
        !            38: # endif
        !            39: #endif /* STDC_HEADERS */
        !            40: #ifdef HAVE_STRING_H
        !            41: # if defined(HAVE_MEMORY_H) && !defined(STDC_HEADERS)
        !            42: #  include <memory.h>
        !            43: # endif
        !            44: # include <string.h>
        !            45: #endif /* HAVE_STRING_H */
        !            46: #ifdef HAVE_STRINGS_H
        !            47: # include <strings.h>
        !            48: #endif /* HAVE_STRINGS_H */
        !            49: #ifdef HAVE_UNISTD_H
        !            50: # include <unistd.h>
        !            51: #endif /* HAVE_UNISTD_H */
        !            52: #if TIME_WITH_SYS_TIME
        !            53: # include <time.h>
        !            54: #endif
        !            55: #ifndef HAVE_TIMESPEC
        !            56: # include "compat/timespec.h"
        !            57: #endif
        !            58: #include <ctype.h>
        !            59: #include <errno.h>
        !            60: #include <limits.h>
        !            61: #include <fcntl.h>
        !            62: #ifdef HAVE_DIRENT_H
        !            63: # include <dirent.h>
        !            64: # define NAMLEN(dirent) strlen((dirent)->d_name)
        !            65: #else
        !            66: # define dirent direct
        !            67: # define NAMLEN(dirent) (dirent)->d_namlen
        !            68: # ifdef HAVE_SYS_NDIR_H
        !            69: #  include <sys/ndir.h>
        !            70: # endif
        !            71: # ifdef HAVE_SYS_DIR_H
        !            72: #  include <sys/dir.h>
        !            73: # endif
        !            74: # ifdef HAVE_NDIR_H
        !            75: #  include <ndir.h>
        !            76: # endif
        !            77: #endif
        !            78: #ifdef HAVE_REGCOMP
        !            79: # include <regex.h>
        !            80: #endif
        !            81: #ifdef HAVE_ZLIB_H
        !            82: # include <zlib.h>
        !            83: #endif
        !            84: #ifdef HAVE_SETLOCALE
        !            85: # include <locale.h>
        !            86: #endif
        !            87: #include <signal.h>
        !            88: 
        !            89: #include <pathnames.h>
        !            90: 
        !            91: #include "missing.h"
        !            92: #include "alloc.h"
        !            93: #include "error.h"
        !            94: #include "gettext.h"
        !            95: 
        !            96: #ifndef LINE_MAX
        !            97: # define LINE_MAX 2048
        !            98: #endif
        !            99: 
        !           100: /* Must match the defines in iolog.c */
        !           101: #define IOFD_STDIN      0
        !           102: #define IOFD_STDOUT     1
        !           103: #define IOFD_STDERR     2
        !           104: #define IOFD_TTYIN      3
        !           105: #define IOFD_TTYOUT     4
        !           106: #define IOFD_TIMING     5
        !           107: #define IOFD_MAX        6
        !           108: 
        !           109: /* Bitmap of iofds to be replayed */
        !           110: unsigned int replay_filter = (1 << IOFD_STDOUT) | (1 << IOFD_STDERR) |
        !           111:                             (1 << IOFD_TTYOUT);
        !           112: 
        !           113: /* For getopt(3) */
        !           114: extern char *optarg;
        !           115: extern int optind;
        !           116: 
        !           117: union io_fd {
        !           118:     FILE *f;
        !           119: #ifdef HAVE_ZLIB_H
        !           120:     gzFile g;
        !           121: #endif
        !           122:     void *v;
        !           123: };
        !           124: 
        !           125: /*
        !           126:  * Info present in the I/O log file
        !           127:  */
        !           128: struct log_info {
        !           129:     char *cwd;
        !           130:     char *user;
        !           131:     char *runas_user;
        !           132:     char *runas_group;
        !           133:     char *tty;
        !           134:     char *cmd;
        !           135:     time_t tstamp;
        !           136: };
        !           137: 
        !           138: /*
        !           139:  * Handle expressions like:
        !           140:  * ( user millert or user root ) and tty console and command /bin/sh
        !           141:  */
        !           142: struct search_node {
        !           143:     struct search_node *next;
        !           144: #define ST_EXPR                1
        !           145: #define ST_TTY         2
        !           146: #define ST_USER                3
        !           147: #define ST_PATTERN     4
        !           148: #define ST_RUNASUSER   5
        !           149: #define ST_RUNASGROUP  6
        !           150: #define ST_FROMDATE    7
        !           151: #define ST_TODATE      8
        !           152: #define ST_CWD         9
        !           153:     char type;
        !           154:     char negated;
        !           155:     char or;
        !           156:     char pad;
        !           157:     union {
        !           158: #ifdef HAVE_REGCOMP
        !           159:        regex_t cmdre;
        !           160: #endif
        !           161:        time_t tstamp;
        !           162:        char *cwd;
        !           163:        char *tty;
        !           164:        char *user;
        !           165:        char *pattern;
        !           166:        char *runas_group;
        !           167:        char *runas_user;
        !           168:        struct search_node *expr;
        !           169:        void *ptr;
        !           170:     } u;
        !           171: } *search_expr;
        !           172: 
        !           173: #define STACK_NODE_SIZE        32
        !           174: static struct search_node *node_stack[32];
        !           175: static int stack_top;
        !           176: 
        !           177: static const char *session_dir = _PATH_SUDO_IO_LOGDIR;
        !           178: 
        !           179: static union io_fd io_fds[IOFD_MAX];
        !           180: static const char *io_fnames[IOFD_MAX] = {
        !           181:     "/stdin",
        !           182:     "/stdout",
        !           183:     "/stderr",
        !           184:     "/ttyin",
        !           185:     "/ttyout",
        !           186:     "/timing"
        !           187: };
        !           188: 
        !           189: extern time_t get_date(char *);
        !           190: extern char *get_timestr(time_t, int);
        !           191: extern int term_raw(int, int);
        !           192: extern int term_restore(int, int);
        !           193: extern void zero_bytes(volatile void *, size_t);
        !           194: void cleanup(int);
        !           195: 
        !           196: static int list_sessions(int, char **, const char *, const char *, const char *);
        !           197: static int parse_expr(struct search_node **, char **);
        !           198: static void check_input(int, double *);
        !           199: static void delay(double);
        !           200: static void help(void) __attribute__((__noreturn__));
        !           201: static void usage(int);
        !           202: static int open_io_fd(char *pathbuf, int len, const char *suffix, union io_fd *fdp);
        !           203: static int parse_timing(const char *buf, const char *decimal, int *idx, double *seconds, size_t *nbytes);
        !           204: 
        !           205: #ifdef HAVE_REGCOMP
        !           206: # define REGEX_T       regex_t
        !           207: #else
        !           208: # define REGEX_T       char
        !           209: #endif
        !           210: 
        !           211: #define VALID_ID(s) (isalnum((unsigned char)(s)[0]) && \
        !           212:     isalnum((unsigned char)(s)[1]) && isalnum((unsigned char)(s)[2]) && \
        !           213:     isalnum((unsigned char)(s)[3]) && isalnum((unsigned char)(s)[4]) && \
        !           214:     isalnum((unsigned char)(s)[5]) && (s)[6] == '\0')
        !           215: 
        !           216: #define IS_IDLOG(s) ( \
        !           217:     isalnum((unsigned char)(s)[0]) && isalnum((unsigned char)(s)[1]) && \
        !           218:     (s)[2] == '/' && \
        !           219:     isalnum((unsigned char)(s)[3]) && isalnum((unsigned char)(s)[4]) && \
        !           220:     (s)[5] == '/' && \
        !           221:     isalnum((unsigned char)(s)[6]) && isalnum((unsigned char)(s)[7]) && \
        !           222:     (s)[8] == '/' && (s)[9] == 'l' && (s)[10] == 'o' && (s)[11] == 'g' && \
        !           223:     (s)[9] == '\0')
        !           224: 
        !           225: int
        !           226: main(int argc, char *argv[])
        !           227: {
        !           228:     int ch, idx, plen, nready, interactive = 0, listonly = 0;
        !           229:     const char *id, *user = NULL, *pattern = NULL, *tty = NULL, *decimal = ".";
        !           230:     char path[PATH_MAX], buf[LINE_MAX], *cp, *ep;
        !           231:     double seconds, to_wait, speed = 1.0, max_wait = 0;
        !           232:     FILE *lfile;
        !           233:     fd_set *fdsw;
        !           234:     sigaction_t sa;
        !           235:     size_t len, nbytes, nread, off;
        !           236:     ssize_t nwritten;
        !           237: 
        !           238: #if !defined(HAVE_GETPROGNAME) && !defined(HAVE___PROGNAME)
        !           239:     setprogname(argc > 0 ? argv[0] : "sudoreplay");
        !           240: #endif
        !           241: 
        !           242: #ifdef HAVE_SETLOCALE
        !           243:     setlocale(LC_ALL, "");
        !           244:     decimal = localeconv()->decimal_point;
        !           245: #endif
        !           246:     bindtextdomain("sudoers", LOCALEDIR); /* XXX - should have sudoreplay domain */
        !           247:     textdomain("sudoers");
        !           248: 
        !           249:     while ((ch = getopt(argc, argv, "d:f:hlm:s:V")) != -1) {
        !           250:        switch(ch) {
        !           251:        case 'd':
        !           252:            session_dir = optarg;
        !           253:            break;
        !           254:        case 'f':
        !           255:            /* Set the replay filter. */
        !           256:            replay_filter = 0;
        !           257:            for (cp = strtok(optarg, ","); cp; cp = strtok(NULL, ",")) {
        !           258:                if (strcmp(cp, "stdout") == 0)
        !           259:                    SET(replay_filter, 1 << IOFD_STDOUT);
        !           260:                else if (strcmp(cp, "stderr") == 0)
        !           261:                    SET(replay_filter, 1 << IOFD_STDERR);
        !           262:                else if (strcmp(cp, "ttyout") == 0)
        !           263:                    SET(replay_filter, 1 << IOFD_TTYOUT);
        !           264:                else
        !           265:                    errorx(1, _("invalid filter option: %s"), optarg);
        !           266:            }
        !           267:            break;
        !           268:        case 'h':
        !           269:            help();
        !           270:            /* NOTREACHED */
        !           271:        case 'l':
        !           272:            listonly = 1;
        !           273:            break;
        !           274:        case 'm':
        !           275:            errno = 0;
        !           276:            max_wait = strtod(optarg, &ep);
        !           277:            if (*ep != '\0' || errno != 0)
        !           278:                errorx(1, _("invalid max wait: %s"), optarg);
        !           279:            break;
        !           280:        case 's':
        !           281:            errno = 0;
        !           282:            speed = strtod(optarg, &ep);
        !           283:            if (*ep != '\0' || errno != 0)
        !           284:                errorx(1, _("invalid speed factor: %s"), optarg);
        !           285:            break;
        !           286:        case 'V':
        !           287:            (void) printf(_("%s version %s\n"), getprogname(), PACKAGE_VERSION);
        !           288:            exit(0);
        !           289:        default:
        !           290:            usage(1);
        !           291:            /* NOTREACHED */
        !           292:        }
        !           293: 
        !           294:     }
        !           295:     argc -= optind;
        !           296:     argv += optind;
        !           297: 
        !           298:     if (listonly)
        !           299:        exit(list_sessions(argc, argv, pattern, user, tty));
        !           300: 
        !           301:     if (argc != 1)
        !           302:        usage(1);
        !           303: 
        !           304:     /* 6 digit ID in base 36, e.g. 01G712AB or free-form name */
        !           305:     id = argv[0];
        !           306:     if (VALID_ID(id)) {
        !           307:        plen = snprintf(path, sizeof(path), "%s/%.2s/%.2s/%.2s/timing",
        !           308:            session_dir, id, &id[2], &id[4]);
        !           309:        if (plen <= 0 || plen >= sizeof(path))
        !           310:            errorx(1, _("%s/%.2s/%.2s/%.2s/timing: %s"), session_dir,
        !           311:                id, &id[2], &id[4], strerror(ENAMETOOLONG));
        !           312:     } else {
        !           313:        plen = snprintf(path, sizeof(path), "%s/%s/timing",
        !           314:            session_dir, id);
        !           315:        if (plen <= 0 || plen >= sizeof(path))
        !           316:            errorx(1, _("%s/%s/timing: %s"), session_dir,
        !           317:                id, strerror(ENAMETOOLONG));
        !           318:     }
        !           319:     plen -= 7;
        !           320: 
        !           321:     /* Open files for replay, applying replay filter for the -f flag. */
        !           322:     for (idx = 0; idx < IOFD_MAX; idx++) {
        !           323:        if (ISSET(replay_filter, 1 << idx) || idx == IOFD_TIMING) {
        !           324:            if (open_io_fd(path, plen, io_fnames[idx], &io_fds[idx]) == -1)
        !           325:                error(1, _("unable to open %s"), path);
        !           326:        }
        !           327:     }
        !           328: 
        !           329:     /* Read log file. */
        !           330:     path[plen] = '\0';
        !           331:     strlcat(path, "/log", sizeof(path));
        !           332:     lfile = fopen(path, "r");
        !           333:     if (lfile == NULL)
        !           334:        error(1, _("unable to open %s"), path);
        !           335:     cp = NULL;
        !           336:     len = 0;
        !           337:     /* Pull out command (third line). */
        !           338:     if (getline(&cp, &len, lfile) == -1 ||
        !           339:        getline(&cp, &len, lfile) == -1 ||
        !           340:        getline(&cp, &len, lfile) == -1) {
        !           341:        errorx(1, _("invalid log file %s"), path);
        !           342:     }
        !           343:     printf(_("Replaying sudo session: %s"), cp);
        !           344:     free(cp);
        !           345:     fclose(lfile);
        !           346: 
        !           347:     fflush(stdout);
        !           348:     zero_bytes(&sa, sizeof(sa));
        !           349:     sigemptyset(&sa.sa_mask);
        !           350:     sa.sa_flags = SA_RESETHAND;
        !           351:     sa.sa_handler = cleanup;
        !           352:     (void) sigaction(SIGINT, &sa, NULL);
        !           353:     (void) sigaction(SIGKILL, &sa, NULL);
        !           354:     (void) sigaction(SIGTERM, &sa, NULL);
        !           355:     (void) sigaction(SIGHUP, &sa, NULL);
        !           356:     sa.sa_flags = SA_RESTART;
        !           357:     sa.sa_handler = SIG_IGN;
        !           358:     (void) sigaction(SIGTSTP, &sa, NULL);
        !           359:     (void) sigaction(SIGQUIT, &sa, NULL);
        !           360: 
        !           361:     /* XXX - read user input from /dev/tty and set STDOUT to raw if not a pipe */
        !           362:     /* Set stdin to raw mode if it is a tty */
        !           363:     interactive = isatty(STDIN_FILENO);
        !           364:     if (interactive) {
        !           365:        ch = fcntl(STDIN_FILENO, F_GETFL, 0);
        !           366:        if (ch != -1)
        !           367:            (void) fcntl(STDIN_FILENO, F_SETFL, ch | O_NONBLOCK);
        !           368:        if (!term_raw(STDIN_FILENO, 1))
        !           369:            error(1, _("unable to set tty to raw mode"));
        !           370:     }
        !           371:     fdsw = (fd_set *)emalloc2(howmany(STDOUT_FILENO + 1, NFDBITS),
        !           372:        sizeof(fd_mask));
        !           373: 
        !           374:     /*
        !           375:      * Timing file consists of line of the format: "%f %d\n"
        !           376:      */
        !           377: #ifdef HAVE_ZLIB_H
        !           378:     while (gzgets(io_fds[IOFD_TIMING].g, buf, sizeof(buf)) != NULL) {
        !           379: #else
        !           380:     while (fgets(buf, sizeof(buf), io_fds[IOFD_TIMING].f) != NULL) {
        !           381: #endif
        !           382:        if (!parse_timing(buf, decimal, &idx, &seconds, &nbytes))
        !           383:            errorx(1, _("invalid timing file line: %s"), buf);
        !           384: 
        !           385:        if (interactive)
        !           386:            check_input(STDIN_FILENO, &speed);
        !           387: 
        !           388:        /* Adjust delay using speed factor and clamp to max_wait */
        !           389:        to_wait = seconds / speed;
        !           390:        if (max_wait && to_wait > max_wait)
        !           391:            to_wait = max_wait;
        !           392:        delay(to_wait);
        !           393: 
        !           394:        /* Even if we are not relaying, we still have to delay. */
        !           395:        if (io_fds[idx].v == NULL)
        !           396:            continue;
        !           397: 
        !           398:        /* All output is sent to stdout. */
        !           399:        while (nbytes != 0) {
        !           400:            if (nbytes > sizeof(buf))
        !           401:                len = sizeof(buf);
        !           402:            else
        !           403:                len = nbytes;
        !           404: #ifdef HAVE_ZLIB_H
        !           405:            nread = gzread(io_fds[idx].g, buf, len);
        !           406: #else
        !           407:            nread = fread(buf, 1, len, io_fds[idx].f);
        !           408: #endif
        !           409:            nbytes -= nread;
        !           410:            off = 0;
        !           411:            do {
        !           412:                /* no stdio, must be unbuffered */
        !           413:                nwritten = write(STDOUT_FILENO, buf + off, nread - off);
        !           414:                if (nwritten == -1) {
        !           415:                    if (errno == EINTR)
        !           416:                        continue;
        !           417:                    if (errno == EAGAIN) {
        !           418:                        FD_SET(STDOUT_FILENO, fdsw);
        !           419:                        do {
        !           420:                            nready = select(STDOUT_FILENO + 1, NULL, fdsw, NULL, NULL);
        !           421:                        } while (nready == -1 && errno == EINTR);
        !           422:                        if (nready == 1)
        !           423:                            continue;
        !           424:                    }
        !           425:                    error(1, _("writing to standard output"));
        !           426:                }
        !           427:                off += nwritten;
        !           428:            } while (nread > off);
        !           429:        }
        !           430:     }
        !           431:     term_restore(STDIN_FILENO, 1);
        !           432:     exit(0);
        !           433: }
        !           434: 
        !           435: static void
        !           436: delay(double secs)
        !           437: {
        !           438:     struct timespec ts, rts;
        !           439:     int rval;
        !           440: 
        !           441:     /*
        !           442:      * Typical max resolution is 1/HZ but we can't portably check that.
        !           443:      * If the interval is small enough, just ignore it.
        !           444:      */
        !           445:     if (secs < 0.0001)
        !           446:        return;
        !           447: 
        !           448:     rts.tv_sec = secs;
        !           449:     rts.tv_nsec = (secs - (double) rts.tv_sec) * 1000000000.0;
        !           450:     do {
        !           451:       memcpy(&ts, &rts, sizeof(ts));
        !           452:       rval = nanosleep(&ts, &rts);
        !           453:     } while (rval == -1 && errno == EINTR);
        !           454:     if (rval == -1) {
        !           455:        error(1, _("nanosleep: tv_sec %ld, tv_nsec %ld"),
        !           456:            (long)ts.tv_sec, (long)ts.tv_nsec);
        !           457:     }
        !           458: }
        !           459: 
        !           460: static int
        !           461: open_io_fd(char *path, int len, const char *suffix, union io_fd *fdp)
        !           462: {
        !           463:     path[len] = '\0';
        !           464:     strlcat(path, suffix, PATH_MAX);
        !           465: 
        !           466: #ifdef HAVE_ZLIB_H
        !           467:     fdp->g = gzopen(path, "r");
        !           468:     return fdp->g ? 0 : -1;
        !           469: #else
        !           470:     fdp->f = fopen(path, "r");
        !           471:     return fdp->f ? 0 : -1;
        !           472: #endif
        !           473: }
        !           474: 
        !           475: /*
        !           476:  * Build expression list from search args
        !           477:  */
        !           478: static int
        !           479: parse_expr(struct search_node **headp, char *argv[])
        !           480: {
        !           481:     struct search_node *sn, *newsn;
        !           482:     char or = 0, not = 0, type, **av;
        !           483: 
        !           484:     sn = *headp;
        !           485:     for (av = argv; *av; av++) {
        !           486:        switch (av[0][0]) {
        !           487:        case 'a': /* and (ignore) */
        !           488:            if (strncmp(*av, "and", strlen(*av)) != 0)
        !           489:                goto bad;
        !           490:            continue;
        !           491:        case 'o': /* or */
        !           492:            if (strncmp(*av, "or", strlen(*av)) != 0)
        !           493:                goto bad;
        !           494:            or = 1;
        !           495:            continue;
        !           496:        case '!': /* negate */
        !           497:            if (av[0][1] != '\0')
        !           498:                goto bad;
        !           499:            not = 1;
        !           500:            continue;
        !           501:        case 'c': /* command */
        !           502:            if (av[0][1] == '\0')
        !           503:                errorx(1, _("ambiguous expression \"%s\""), *av);
        !           504:            if (strncmp(*av, "cwd", strlen(*av)) == 0)
        !           505:                type = ST_CWD;
        !           506:            else if (strncmp(*av, "command", strlen(*av)) == 0)
        !           507:                type = ST_PATTERN;
        !           508:            else
        !           509:                goto bad;
        !           510:            break;
        !           511:        case 'f': /* from date */
        !           512:            if (strncmp(*av, "fromdate", strlen(*av)) != 0)
        !           513:                goto bad;
        !           514:            type = ST_FROMDATE;
        !           515:            break;
        !           516:        case 'g': /* runas group */
        !           517:            if (strncmp(*av, "group", strlen(*av)) != 0)
        !           518:                goto bad;
        !           519:            type = ST_RUNASGROUP;
        !           520:            break;
        !           521:        case 'r': /* runas user */
        !           522:            if (strncmp(*av, "runas", strlen(*av)) != 0)
        !           523:                goto bad;
        !           524:            type = ST_RUNASUSER;
        !           525:            break;
        !           526:        case 't': /* tty or to date */
        !           527:            if (av[0][1] == '\0')
        !           528:                errorx(1, _("ambiguous expression \"%s\""), *av);
        !           529:            if (strncmp(*av, "todate", strlen(*av)) == 0)
        !           530:                type = ST_TODATE;
        !           531:            else if (strncmp(*av, "tty", strlen(*av)) == 0)
        !           532:                type = ST_TTY;
        !           533:            else
        !           534:                goto bad;
        !           535:            break;
        !           536:        case 'u': /* user */
        !           537:            if (strncmp(*av, "user", strlen(*av)) != 0)
        !           538:                goto bad;
        !           539:            type = ST_USER;
        !           540:            break;
        !           541:        case '(': /* start sub-expression */
        !           542:            if (av[0][1] != '\0')
        !           543:                goto bad;
        !           544:            if (stack_top + 1 == STACK_NODE_SIZE) {
        !           545:                errorx(1, _("too many parenthesized expressions, max %d"),
        !           546:                    STACK_NODE_SIZE);
        !           547:            }
        !           548:            node_stack[stack_top++] = sn;
        !           549:            type = ST_EXPR;
        !           550:            break;
        !           551:        case ')': /* end sub-expression */
        !           552:            if (av[0][1] != '\0')
        !           553:                goto bad;
        !           554:            /* pop */
        !           555:            if (--stack_top < 0)
        !           556:                errorx(1, _("unmatched ')' in expression"));
        !           557:            if (node_stack[stack_top])
        !           558:                sn->next = node_stack[stack_top]->next;
        !           559:            return av - argv + 1;
        !           560:        bad:
        !           561:        default:
        !           562:            errorx(1, _("unknown search term \"%s\""), *av);
        !           563:            /* NOTREACHED */
        !           564:        }
        !           565: 
        !           566:        /* Allocate new search node */
        !           567:        newsn = emalloc(sizeof(*newsn));
        !           568:        newsn->next = NULL;
        !           569:        newsn->type = type;
        !           570:        newsn->or = or;
        !           571:        newsn->negated = not;
        !           572:        if (type == ST_EXPR) {
        !           573:            av += parse_expr(&newsn->u.expr, av + 1);
        !           574:        } else {
        !           575:            if (*(++av) == NULL)
        !           576:                errorx(1, _("%s requires an argument"), av[-1]);
        !           577: #ifdef HAVE_REGCOMP
        !           578:            if (type == ST_PATTERN) {
        !           579:                if (regcomp(&newsn->u.cmdre, *av, REG_EXTENDED|REG_NOSUB) != 0)
        !           580:                    errorx(1, _("invalid regular expression: %s"), *av);
        !           581:            } else
        !           582: #endif
        !           583:            if (type == ST_TODATE || type == ST_FROMDATE) {
        !           584:                newsn->u.tstamp = get_date(*av);
        !           585:                if (newsn->u.tstamp == -1)
        !           586:                    errorx(1, _("could not parse date \"%s\""), *av);
        !           587:            } else {
        !           588:                newsn->u.ptr = *av;
        !           589:            }
        !           590:        }
        !           591:        not = or = 0; /* reset state */
        !           592:        if (sn)
        !           593:            sn->next = newsn;
        !           594:        else
        !           595:            *headp = newsn;
        !           596:        sn = newsn;
        !           597:     }
        !           598:     if (stack_top)
        !           599:        errorx(1, _("unmatched '(' in expression"));
        !           600:     if (or)
        !           601:        errorx(1, _("illegal trailing \"or\""));
        !           602:     if (not)
        !           603:        errorx(1, _("illegal trailing \"!\""));
        !           604: 
        !           605:     return av - argv;
        !           606: }
        !           607: 
        !           608: static int
        !           609: match_expr(struct search_node *head, struct log_info *log)
        !           610: {
        !           611:     struct search_node *sn;
        !           612:     int matched = 1, rc;
        !           613: 
        !           614:     for (sn = head; sn; sn = sn->next) {
        !           615:        /* If we have no match, skip ahead to the next OR entry. */
        !           616:        if (!matched && !sn->or)
        !           617:            continue;
        !           618: 
        !           619:        switch (sn->type) {
        !           620:        case ST_EXPR:
        !           621:            matched = match_expr(sn->u.expr, log);
        !           622:            break;
        !           623:        case ST_CWD:
        !           624:            matched = strcmp(sn->u.cwd, log->cwd) == 0;
        !           625:            break;
        !           626:        case ST_TTY:
        !           627:            matched = strcmp(sn->u.tty, log->tty) == 0;
        !           628:            break;
        !           629:        case ST_RUNASGROUP:
        !           630:            matched = strcmp(sn->u.runas_group, log->runas_group) == 0;
        !           631:            break;
        !           632:        case ST_RUNASUSER:
        !           633:            matched = strcmp(sn->u.runas_user, log->runas_user) == 0;
        !           634:            break;
        !           635:        case ST_USER:
        !           636:            matched = strcmp(sn->u.user, log->user) == 0;
        !           637:            break;
        !           638:        case ST_PATTERN:
        !           639: #ifdef HAVE_REGCOMP
        !           640:            rc = regexec(&sn->u.cmdre, log->cmd, 0, NULL, 0);
        !           641:            if (rc && rc != REG_NOMATCH) {
        !           642:                char buf[BUFSIZ];
        !           643:                regerror(rc, &sn->u.cmdre, buf, sizeof(buf));
        !           644:                errorx(1, "%s", buf);
        !           645:            }
        !           646:            matched = rc == REG_NOMATCH ? 0 : 1;
        !           647: #else
        !           648:            matched = strstr(log.cmd, sn->u.pattern) != NULL;
        !           649: #endif
        !           650:            break;
        !           651:        case ST_FROMDATE:
        !           652:            matched = log->tstamp >= sn->u.tstamp;
        !           653:            break;
        !           654:        case ST_TODATE:
        !           655:            matched = log->tstamp <= sn->u.tstamp;
        !           656:            break;
        !           657:        }
        !           658:        if (sn->negated)
        !           659:            matched = !matched;
        !           660:     }
        !           661:     return matched;
        !           662: }
        !           663: 
        !           664: static int
        !           665: list_session(char *logfile, REGEX_T *re, const char *user, const char *tty)
        !           666: {
        !           667:     FILE *fp;
        !           668:     char *buf = NULL, *cmd = NULL, *cwd = NULL, idbuf[7], *idstr, *cp;
        !           669:     struct log_info li;
        !           670:     size_t bufsize = 0, cwdsize = 0, cmdsize = 0;
        !           671:     int rval = -1;
        !           672: 
        !           673:     fp = fopen(logfile, "r");
        !           674:     if (fp == NULL) {
        !           675:        warning(_("unable to open %s"), logfile);
        !           676:        goto done;
        !           677:     }
        !           678: 
        !           679:     /*
        !           680:      * ID file has three lines:
        !           681:      *  1) a log info line
        !           682:      *  2) cwd
        !           683:      *  3) command with args
        !           684:      */
        !           685:     if (getline(&buf, &bufsize, fp) == -1 ||
        !           686:        getline(&cwd, &cwdsize, fp) == -1 ||
        !           687:        getline(&cmd, &cmdsize, fp) == -1) {
        !           688:        goto done;
        !           689:     }
        !           690: 
        !           691:     /* crack the log line: timestamp:user:runas_user:runas_group:tty */
        !           692:     buf[strcspn(buf, "\n")] = '\0';
        !           693:     if ((li.tstamp = atoi(buf)) == 0)
        !           694:        goto done;
        !           695: 
        !           696:     if ((cp = strchr(buf, ':')) == NULL)
        !           697:        goto done;
        !           698:     *cp++ = '\0';
        !           699:     li.user = cp;
        !           700: 
        !           701:     if ((cp = strchr(cp, ':')) == NULL)
        !           702:        goto done;
        !           703:     *cp++ = '\0';
        !           704:     li.runas_user = cp;
        !           705: 
        !           706:     if ((cp = strchr(cp, ':')) == NULL)
        !           707:        goto done;
        !           708:     *cp++ = '\0';
        !           709:     li.runas_group = cp;
        !           710: 
        !           711:     if ((cp = strchr(cp, ':')) == NULL)
        !           712:        goto done;
        !           713:     *cp++ = '\0';
        !           714:     li.tty = cp;
        !           715: 
        !           716:     cwd[strcspn(cwd, "\n")] = '\0';
        !           717:     li.cwd = cwd;
        !           718: 
        !           719:     cmd[strcspn(cmd, "\n")] = '\0';
        !           720:     li.cmd = cmd;
        !           721: 
        !           722:     /* Match on search expression if there is one. */
        !           723:     if (search_expr && !match_expr(search_expr, &li))
        !           724:        goto done;
        !           725: 
        !           726:     /* Convert from /var/log/sudo-sessions/00/00/01/log to 000001 */
        !           727:     cp = logfile + strlen(session_dir) + 1;
        !           728:     if (IS_IDLOG(cp)) {
        !           729:        idbuf[0] = cp[7];
        !           730:        idbuf[1] = cp[6];
        !           731:        idbuf[2] = cp[4];
        !           732:        idbuf[3] = cp[3];
        !           733:        idbuf[4] = cp[1];
        !           734:        idbuf[5] = cp[0];
        !           735:        idbuf[6] = '\0';
        !           736:        idstr = idbuf;
        !           737:     } else {
        !           738:        /* Not an id, just use the iolog_file portion. */
        !           739:        cp[strlen(cp) - 4] = '\0';
        !           740:        idstr = cp;
        !           741:     }
        !           742:     printf("%s : %s : TTY=%s ; CWD=%s ; USER=%s ; ",
        !           743:        get_timestr(li.tstamp, 1), li.user, li.tty, li.cwd, li.runas_user);
        !           744:     if (*li.runas_group)
        !           745:        printf("GROUP=%s ; ", li.runas_group);
        !           746:     printf("TSID=%s ; COMMAND=%s\n", idstr, li.cmd);
        !           747: 
        !           748:     rval = 0;
        !           749: 
        !           750: done:
        !           751:     fclose(fp);
        !           752:     return rval;
        !           753: }
        !           754: 
        !           755: static int
        !           756: find_sessions(const char *dir, REGEX_T *re, const char *user, const char *tty)
        !           757: {
        !           758:     DIR *d;
        !           759:     struct dirent *dp;
        !           760:     struct stat sb;
        !           761:     size_t sdlen;
        !           762:     int len;
        !           763:     char pathbuf[PATH_MAX];
        !           764: 
        !           765:     d = opendir(dir);
        !           766:     if (d == NULL)
        !           767:        error(1, _("unable to open %s"), dir);
        !           768: 
        !           769:     /* XXX - would be faster to chdir and use relative names */
        !           770:     sdlen = strlcpy(pathbuf, dir, sizeof(pathbuf));
        !           771:     if (sdlen + 1 >= sizeof(pathbuf)) {
        !           772:        errno = ENAMETOOLONG;
        !           773:        error(1, "%s/", dir);
        !           774:     }
        !           775:     pathbuf[sdlen++] = '/';
        !           776:     pathbuf[sdlen] = '\0';
        !           777:     while ((dp = readdir(d)) != NULL) {
        !           778:        /* Skip "." and ".." */
        !           779:        if (dp->d_name[0] == '.' && (dp->d_name[1] == '\0' ||
        !           780:            (dp->d_name[1] == '.' && dp->d_name[2] == '\0')))
        !           781:            continue;
        !           782: 
        !           783:        len = snprintf(&pathbuf[sdlen], sizeof(pathbuf) - sdlen,
        !           784:            "%s/log", dp->d_name);
        !           785:        if (len <= 0 || len >= sizeof(pathbuf) - sdlen) {
        !           786:            errno = ENAMETOOLONG;
        !           787:            error(1, "%s/%s/log", dir, dp->d_name);
        !           788:        }
        !           789: 
        !           790:        /* Check for dir with a log file. */
        !           791:        if (lstat(pathbuf, &sb) == 0 && S_ISREG(sb.st_mode)) {
        !           792:            list_session(pathbuf, re, user, tty);
        !           793:        } else {
        !           794:            /* Strip off "/log" and recurse if a dir. */
        !           795:            pathbuf[sdlen + len - 4] = '\0';
        !           796:            if (lstat(pathbuf, &sb) == 0 && S_ISDIR(sb.st_mode))
        !           797:                find_sessions(pathbuf, re, user, tty);
        !           798:        }
        !           799:     }
        !           800:     closedir(d);
        !           801: 
        !           802:     return 0;
        !           803: }
        !           804: 
        !           805: static int
        !           806: list_sessions(int argc, char **argv, const char *pattern, const char *user,
        !           807:     const char *tty)
        !           808: {
        !           809:     REGEX_T rebuf, *re = NULL;
        !           810: 
        !           811:     /* Parse search expression if present */
        !           812:     parse_expr(&search_expr, argv);
        !           813: 
        !           814: #ifdef HAVE_REGCOMP
        !           815:     /* optional regex */
        !           816:     if (pattern) {
        !           817:        re = &rebuf;
        !           818:        if (regcomp(re, pattern, REG_EXTENDED|REG_NOSUB) != 0)
        !           819:            errorx(1, _("invalid regex: %s"), pattern);
        !           820:     }
        !           821: #else
        !           822:     re = (char *) pattern;
        !           823: #endif /* HAVE_REGCOMP */
        !           824: 
        !           825:     return find_sessions(session_dir, re, user, tty);
        !           826: }
        !           827: 
        !           828: /*
        !           829:  * Check input for ' ', '<', '>'
        !           830:  * pause, slow, fast
        !           831:  */
        !           832: static void
        !           833: check_input(int ttyfd, double *speed)
        !           834: {
        !           835:     fd_set *fdsr;
        !           836:     int nready, paused = 0;
        !           837:     struct timeval tv;
        !           838:     char ch;
        !           839:     ssize_t n;
        !           840: 
        !           841:     fdsr = (fd_set *)emalloc2(howmany(ttyfd + 1, NFDBITS), sizeof(fd_mask));
        !           842: 
        !           843:     for (;;) {
        !           844:        FD_SET(ttyfd, fdsr);
        !           845:        tv.tv_sec = 0;
        !           846:        tv.tv_usec = 0;
        !           847: 
        !           848:        nready = select(ttyfd + 1, fdsr, NULL, NULL, paused ? NULL : &tv);
        !           849:        if (nready != 1)
        !           850:            break;
        !           851:        n = read(ttyfd, &ch, 1);
        !           852:        if (n == 1) {
        !           853:            if (paused) {
        !           854:                paused = 0;
        !           855:                continue;
        !           856:            }
        !           857:            switch (ch) {
        !           858:            case ' ':
        !           859:                paused = 1;
        !           860:                break;
        !           861:            case '<':
        !           862:                *speed /= 2;
        !           863:                break;
        !           864:            case '>':
        !           865:                *speed *= 2;
        !           866:                break;
        !           867:            }
        !           868:        }
        !           869:     }
        !           870:     free(fdsr);
        !           871: }
        !           872: 
        !           873: /*
        !           874:  * Parse a timing line, which is formatted as:
        !           875:  *     index sleep_time num_bytes
        !           876:  * Where index is IOFD_*, sleep_time is the number of seconds to sleep
        !           877:  * before writing the data and num_bytes is the number of bytes to output.
        !           878:  * Returns 1 on success and 0 on failure.
        !           879:  */
        !           880: static int
        !           881: parse_timing(buf, decimal, idx, seconds, nbytes)
        !           882:     const char *buf;
        !           883:     const char *decimal;
        !           884:     int *idx;
        !           885:     double *seconds;
        !           886:     size_t *nbytes;
        !           887: {
        !           888:     unsigned long ul;
        !           889:     long l;
        !           890:     double d, fract = 0;
        !           891:     char *cp, *ep;
        !           892: 
        !           893:     /* Parse index */
        !           894:     ul = strtoul(buf, &ep, 10);
        !           895:     if (ul > IOFD_MAX)
        !           896:        goto bad;
        !           897:     *idx = (int)ul;
        !           898:     for (cp = ep + 1; isspace((unsigned char) *cp); cp++)
        !           899:        continue;
        !           900: 
        !           901:     /*
        !           902:      * Parse number of seconds.  Sudo logs timing data in the C locale
        !           903:      * but this may not match the current locale so we cannot use strtod().
        !           904:      * Furthermore, sudo < 1.7.4 logged with the user's locale so we need
        !           905:      * to be able to parse those logs too.
        !           906:      */
        !           907:     errno = 0;
        !           908:     l = strtol(cp, &ep, 10);
        !           909:     if ((errno == ERANGE && (l == LONG_MAX || l == LONG_MIN)) ||
        !           910:        l < 0 || l > INT_MAX ||
        !           911:        (*ep != '.' && strncmp(ep, decimal, strlen(decimal)) != 0)) {
        !           912:        goto bad;
        !           913:     }
        !           914:     *seconds = (double)l;
        !           915:     cp = ep + (*ep == '.' ? 1 : strlen(decimal));
        !           916:     d = 10.0;
        !           917:     while (isdigit((unsigned char) *cp)) {
        !           918:        fract += (*cp - '0') / d;
        !           919:        d *= 10;
        !           920:        cp++;
        !           921:     }
        !           922:     *seconds += fract;
        !           923:     while (isspace((unsigned char) *cp))
        !           924:        cp++;
        !           925: 
        !           926:     errno = 0;
        !           927:     ul = strtoul(cp, &ep, 10);
        !           928:     if (errno == ERANGE && ul == ULONG_MAX)
        !           929:        goto bad;
        !           930:     *nbytes = (size_t)ul;
        !           931: 
        !           932:     return 1;
        !           933: bad:
        !           934:     return 0;
        !           935: }
        !           936: 
        !           937: static void
        !           938: usage(int fatal)
        !           939: {
        !           940:     fprintf(fatal ? stderr : stdout,
        !           941:        _("usage: %s [-h] [-d directory] [-m max_wait] [-s speed_factor] ID\n"),
        !           942:        getprogname());
        !           943:     fprintf(fatal ? stderr : stdout,
        !           944:        _("usage: %s [-h] [-d directory] -l [search expression]\n"),
        !           945:        getprogname());
        !           946:     if (fatal)
        !           947:        exit(1);
        !           948: }
        !           949: 
        !           950: static void
        !           951: help(void)
        !           952: {
        !           953:     (void) printf(_("%s - replay sudo session logs\n\n"), getprogname());
        !           954:     usage(0);
        !           955:     (void) puts(_("\nOptions:\n"
        !           956:        "  -d directory     specify directory for session logs\n"
        !           957:        "  -f filter        specify which I/O type to display\n"
        !           958:        "  -h               display help message and exit\n"
        !           959:        "  -l [expression]  list available session IDs that match expression\n"
        !           960:        "  -m max_wait      max number of seconds to wait between events\n"
        !           961:        "  -s speed_factor  speed up or slow down output\n"
        !           962:        "  -V               display version information and exit"));
        !           963:     exit(0);
        !           964: }
        !           965: 
        !           966: /*
        !           967:  * Cleanup hook for error()/errorx()
        !           968:   */
        !           969: void
        !           970: cleanup(int signo)
        !           971: {
        !           972:     term_restore(STDIN_FILENO, 0);
        !           973:     if (signo)
        !           974:        kill(getpid(), signo);
        !           975: }

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>