usr.bin/procstat/procstat.c

   1 /*-
   2  * Copyright (c) 2007 Robert N. M. Watson
   3  * 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  *
  14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  18  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  22  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  23  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  24  * SUCH DAMAGE.
  25  *
  26  * $FreeBSD$
  27  */
  28
  29 #include <sys/types.h>
  30 #include <sys/sysctl.h>
  31 #include <sys/user.h>
  32
  33 #include <err.h>
  34 #include <stdio.h>
  35 #include <stdlib.h>
  36 #include <sysexits.h>
  37 #include <unistd.h>
  38
  39 #include "procstat.h"
  40
  41 static int aflag, bflag, cflag, fflag, kflag, sflag, tflag, vflag;
  42 int     hflag;
  43
  44 static void
  45 usage(void)
  46 {
  47
  48         fprintf(stderr, "usage: procstat [-h] [-w interval] [-b | -c | -f | "
  49             "-k | -s | -t | -v]\n");
  50         fprintf(stderr, "                [-a | pid ...]\n");
  51         exit(EX_USAGE);
  52 }
  53
  54 static void
  55 procstat(pid_t pid, struct kinfo_proc *kipp)
  56 {
  57
  58         if (bflag)
  59                 procstat_bin(pid, kipp);
  60         else if (cflag)
  61                 procstat_args(pid, kipp);
  62         else if (fflag)
  63                 procstat_files(pid, kipp);
  64         else if (kflag)
  65                 procstat_kstack(pid, kipp, kflag);
  66         else if (sflag)
  67                 procstat_cred(pid, kipp);
  68         else if (tflag)
  69                 procstat_threads(pid, kipp);
  70         else if (vflag)
  71                 procstat_vm(pid, kipp);
  72         else
  73                 procstat_basic(pid, kipp);
  74 }
  75
  76 /*
  77  * Sort processes first by pid and then tid.
  78  */
  79 static int
  80 kinfo_proc_compare(const void *a, const void *b)
  81 {
  82         int i;
  83
  84         i = ((const struct kinfo_proc *)a)->ki_pid -
  85             ((const struct kinfo_proc *)b)->ki_pid;
  86         if (i != 0)
  87                 return (i);
  88         i = ((const struct kinfo_proc *)a)->ki_tid -
  89             ((const struct kinfo_proc *)b)->ki_tid;
  90         return (i);
  91 }
  92
  93 void
  94 kinfo_proc_sort(struct kinfo_proc *kipp, int count)
  95 {
  96
  97         qsort(kipp, count, sizeof(*kipp), kinfo_proc_compare);
  98 }
  99
 100 int
 101 main(int argc, char *argv[])
 102 {
 103         int ch, interval, name[4], tmp;
 104         unsigned int i;
 105         struct kinfo_proc *kipp;
 106         size_t len;
 107         long l;
 108         pid_t pid;
 109         char *dummy;
 110
 111         interval = 0;
 112         while ((ch = getopt(argc, argv, "abcfkhstvw:")) != -1) {
 113                 switch (ch) {
 114                 case 'a':
 115                         aflag++;
 116                         break;
 117
 118                 case 'b':
 119                         bflag++;
 120                         break;
 121
 122                 case 'c':
 123                         cflag++;
 124                         break;
 125
 126                 case 'f':
 127                         fflag++;
 128                         break;
 129
 130                 case 'k':
 131                         kflag++;
 132                         break;
 133
 134                 case 'h':
 135                         hflag++;
 136                         break;
 137
 138                 case 's':
 139                         sflag++;
 140                         break;
 141
 142                 case 't':
 143                         tflag++;
 144                         break;
 145
 146                 case 'v':
 147                         vflag++;
 148                         break;
 149
 150                 case 'w':
 151                         l = strtol(optarg, &dummy, 10);
 152                         if (*dummy != '\0')
 153                                 usage();
 154                         if (l < 1 || l > INT_MAX)
 155                                 usage();
 156                         interval = l;
 157                         break;
 158
 159                 case '?':
 160                 default:
 161                         usage();
 162                 }
 163
 164         }
 165         argc -= optind;
 166         argv += optind;
 167
 168         /* We require that either 0 or 1 mode flags be set. */
 169         tmp = bflag + cflag + fflag + (kflag ? 1 : 0) + sflag + tflag + vflag;
 170         if (!(tmp == 0 || tmp == 1))
 171                 usage();
 172
 173         /* We allow -k to be specified up to twice, but not more. */
 174         if (kflag > 2)
 175                 usage();
 176
 177         /* Must specify either the -a flag or a list of pids. */
 178         if (!(aflag == 1 && argc == 0) && !(aflag == 0 && argc > 0))
 179                 usage();
 180
 181         do {
 182                 if (aflag) {
 183                         name[0] = CTL_KERN;
 184                         name[1] = KERN_PROC;
 185                         name[2] = KERN_PROC_PROC;
 186
 187                         len = 0;
 188                         if (sysctl(name, 3, NULL, &len, NULL, 0) < 0)
 189                                 err(-1, "sysctl: kern.proc.all");
 190
 191                         kipp = malloc(len);
 192                         if (kipp == NULL)
 193                                 err(-1, "malloc");
 194
 195                         if (sysctl(name, 3, kipp, &len, NULL, 0) < 0) {
 196                                 free(kipp);
 197                                 err(-1, "sysctl: kern.proc.all");
 198                         }
 199                         if (len % sizeof(*kipp) != 0)
 200                                 err(-1, "kinfo_proc mismatch");
 201                         if (kipp->ki_structsize != sizeof(*kipp))
 202                                 err(-1, "kinfo_proc structure mismatch");
 203                         kinfo_proc_sort(kipp, len / sizeof(*kipp));
 204                         for (i = 0; i < len / sizeof(*kipp); i++) {
 205                                 procstat(kipp[i].ki_pid, &kipp[i]);
 206
 207                                 /* Suppress header after first process. */
 208                                 hflag = 1;
 209                         }
 210                         free(kipp);
 211                 }
 212                 for (i = 0; i < (unsigned int)argc; i++) {
 213                         l = strtol(argv[i], &dummy, 10);
 214                         if (*dummy != '\0')
 215                                 usage();
 216                         if (l < 0)
 217                                 usage();
 218                         pid = l;
 219
 220                         name[0] = CTL_KERN;
 221                         name[1] = KERN_PROC;
 222                         name[2] = KERN_PROC_PID;
 223                         name[3] = pid;
 224
 225                         len = 0;
 226                         if (sysctl(name, 4, NULL, &len, NULL, 0) < 0)
 227                                 err(-1, "sysctl: kern.proc.pid: %d", pid);
 228
 229                         kipp = malloc(len);
 230                         if (kipp == NULL)
 231                                 err(-1, "malloc");
 232
 233                         if (sysctl(name, 4, kipp, &len, NULL, 0) < 0) {
 234                                 free(kipp);
 235                                 err(-1, "sysctl: kern.proc.pid: %d", pid);
 236                         }
 237                         if (len != sizeof(*kipp))
 238                                 err(-1, "kinfo_proc mismatch");
 239                         if (kipp->ki_structsize != sizeof(*kipp))
 240                                 errx(-1, "kinfo_proc structure mismatch");
 241                         if (kipp->ki_pid != pid)
 242                                 errx(-1, "kinfo_proc pid mismatch");
 243                         procstat(pid, kipp);
 244                         free(kipp);
 245
 246                         /* Suppress header after first process. */
 247                         hflag = 1;
 248                 }
 249                 if (interval)
 250                         sleep(interval);
 251         } while (interval);
 252         exit(0);
 253 }