usr/src/cmd/w/w.c

   1 /*
   2  * CDDL HEADER START
   3  *
   4  * The contents of this file are subject to the terms of the
   5  * Common Development and Distribution License (the "License").
   6  * You may not use this file except in compliance with the License.
   7  *
   8  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
   9  * or http://www.opensolaris.org/os/licensing.
  10  * See the License for the specific language governing permissions
  11  * and limitations under the License.
  12  *
  13  * When distributing Covered Code, include this CDDL HEADER in each
  14  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
  15  * If applicable, add the following below this CDDL HEADER, with the
  16  * fields enclosed by brackets "[]" replaced with your own identifying
  17  * information: Portions Copyright [yyyy] [name of copyright owner]
  18  *
  19  * CDDL HEADER END
  20  */
  21 /*
  22  * Copyright (c) 2013 Gary Mills
  23  *
  24  * Copyright 2009 Sun Microsystems, Inc.  All rights reserved.
  25  * Use is subject to license terms.
  26  */
  27
  28 /*      Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */
  29 /*        All Rights Reserved   */
  30
  31 /*
  32  * University Copyright- Copyright (c) 1982, 1986, 1988
  33  * The Regents of the University of California
  34  * All Rights Reserved
  35  *
  36  * University Acknowledgment- Portions of this document are derived from
  37  * software developed by the University of California, Berkeley, and its
  38  * contributors.
  39  */
  40
  41 /*
  42  * This is the new w command which takes advantage of
  43  * the /proc interface to gain access to the information
  44  * of all the processes currently on the system.
  45  *
  46  * This program also implements 'uptime'.
  47  *
  48  * Maintenance note:
  49  *
  50  * Much of this code is replicated in whodo.c.  If you're
  51  * fixing bugs here, then you should probably fix 'em there too.
  52  */
  53
  54 #include <stdio.h>
  55 #include <string.h>
  56 #include <stdarg.h>
  57 #include <stdlib.h>
  58 #include <ctype.h>
  59 #include <fcntl.h>
  60 #include <time.h>
  61 #include <errno.h>
  62 #include <sys/types.h>
  63 #include <utmpx.h>
  64 #include <sys/stat.h>
  65 #include <dirent.h>
  66 #include <procfs.h>             /* /proc header file */
  67 #include <locale.h>
  68 #include <unistd.h>
  69 #include <sys/loadavg.h>
  70 #include <limits.h>
  71 #include <priv_utils.h>
  72
  73 /*
  74  * Use the full lengths from utmpx for user and line.
  75  */
  76 static struct utmpx dummy;
  77 #define NMAX            (sizeof (dummy.ut_user))
  78 #define LMAX            (sizeof (dummy.ut_line))
  79
  80 /* Print minimum field widths. */
  81 #define LOGIN_WIDTH     8
  82 #define LINE_WIDTH      8
  83
  84 #define DIV60(t)        ((t+30)/60)     /* x/60 rounded */
  85
  86 #ifdef ERR
  87 #undef ERR
  88 #endif
  89 #define ERR             (-1)
  90
  91 #define HSIZE           256             /* size of process hash table   */
  92 #define PROCDIR         "/proc"
  93 #define INITPROCESS     (pid_t)1        /* init process pid */
  94 #define NONE            'n'             /* no state */
  95 #define RUNNING         'r'             /* runnable process */
  96 #define ZOMBIE          'z'             /* zombie process */
  97 #define VISITED         'v'             /* marked node as visited */
  98 #define PRINTF(a)       if (printf a < 0) { \
  99                 perror((gettext("%s: printf failed"), prog)); \
 100                 exit(1); }
 101
 102 struct uproc {
 103         pid_t   p_upid;                 /* process id */
 104         char    p_state;                /* numeric value of process state */
 105         dev_t   p_ttyd;                 /* controlling tty of process */
 106         time_t  p_time;                 /* seconds of user & system time */
 107         time_t  p_ctime;                /* seconds of child user & sys time */
 108         int     p_igintr;               /* 1 = ignores SIGQUIT and SIGINT */
 109         char    p_comm[PRARGSZ+1];      /* command */
 110         char    p_args[PRARGSZ+1];      /* command line arguments */
 111         struct uproc    *p_child,       /* first child pointer */
 112                         *p_sibling,     /* sibling pointer */
 113                         *p_pgrpl,       /* pgrp link */
 114                         *p_link;        /* hash table chain pointer */
 115 };
 116
 117 /*
 118  *      define hash table for struct uproc
 119  *      Hash function uses process id
 120  *      and the size of the hash table(HSIZE)
 121  *      to determine process index into the table.
 122  */
 123 static struct uproc     pr_htbl[HSIZE];
 124
 125 static struct   uproc   *findhash(pid_t);
 126 static time_t   findidle(char *);
 127 static void     clnarglist(char *);
 128 static void     showtotals(struct uproc *);
 129 static void     calctotals(struct uproc *);
 130 static void     prttime(time_t, int);
 131 static void     prtat(time_t *time);
 132
 133 static char     *prog;          /* pointer to invocation name */
 134 static int      header = 1;     /* true if -h flag: don't print heading */
 135 static int      lflag = 1;      /* set if -l flag; 0 for -s flag: short form */
 136 static char     *sel_user;      /* login of particular user selected */
 137 static char     firstchar;      /* first char of name of prog invoked as */
 138 static int      login;          /* true if invoked as login shell */
 139 static time_t   now;            /* current time of day */
 140 static time_t   uptime;         /* time of last reboot & elapsed time since */
 141 static int      nusers;         /* number of users logged in now */
 142 static time_t   idle;           /* number of minutes user is idle */
 143 static time_t   jobtime;        /* total cpu time visible */
 144 static char     doing[520];     /* process attached to terminal */
 145 static time_t   proctime;       /* cpu time of process in doing */
 146 static pid_t    curpid, empty;
 147 static int      add_times;      /* boolean: add the cpu times or not */
 148
 149 #if SIGQUIT > SIGINT
 150 #define ACTSIZE SIGQUIT
 151 #else
 152 #define ACTSIZE SIGINT
 153 #endif
 154
 155 int
 156 main(int argc, char *argv[])
 157 {
 158         struct utmpx    *ut;
 159         struct utmpx    *utmpbegin;
 160         struct utmpx    *utmpend;
 161         struct utmpx    *utp;
 162         struct uproc    *up, *parent, *pgrp;
 163         struct psinfo   info;
 164         struct sigaction actinfo[ACTSIZE];
 165         struct pstatus  statinfo;
 166         size_t          size;
 167         struct stat     sbuf;
 168         DIR             *dirp;
 169         struct  dirent  *dp;
 170         char            pname[64];
 171         char            *fname;
 172         int             procfd;
 173         char            *cp;
 174         int             i;
 175         int             days, hrs, mins;
 176         int             entries;
 177         double          loadavg[3];
 178
 179         /*
 180          * This program needs the proc_owner privilege
 181          */
 182         (void) __init_suid_priv(PU_CLEARLIMITSET, PRIV_PROC_OWNER, NULL);
 183
 184         (void) setlocale(LC_ALL, "");
 185 #if !defined(TEXT_DOMAIN)
 186 #define TEXT_DOMAIN "SYS_TEST"
 187 #endif
 188         (void) textdomain(TEXT_DOMAIN);
 189
 190         login = (argv[0][0] == '-');
 191         cp = strrchr(argv[0], '/');
 192         firstchar = login ? argv[0][1] : (cp == 0) ? argv[0][0] : cp[1];
 193         prog = argv[0];
 194
 195         while (argc > 1) {
 196                 if (argv[1][0] == '-') {
 197                         for (i = 1; argv[1][i]; i++) {
 198                                 switch (argv[1][i]) {
 199
 200                                 case 'h':
 201                                         header = 0;
 202                                         break;
 203
 204                                 case 'l':
 205                                         lflag++;
 206                                         break;
 207                                 case 's':
 208                                         lflag = 0;
 209                                         break;
 210
 211                                 case 'u':
 212                                 case 'w':
 213                                         firstchar = argv[1][i];
 214                                         break;
 215
 216                                 default:
 217                                         (void) fprintf(stderr, gettext(
 218                                             "%s: bad flag %s\n"),
 219                                             prog, argv[1]);
 220                                         exit(1);
 221                                 }
 222                         }
 223                 } else {
 224                         if (!isalnum(argv[1][0]) || argc > 2) {
 225                                 (void) fprintf(stderr, gettext(
 226                                     "usage: %s [ -hlsuw ] [ user ]\n"), prog);
 227                                 exit(1);
 228                         } else
 229                                 sel_user = argv[1];
 230                 }
 231                 argc--; argv++;
 232         }
 233
 234         /*
 235          * read the UTMPX_FILE (contains information about each logged in user)
 236          */
 237         if (stat(UTMPX_FILE, &sbuf) == ERR) {
 238                 (void) fprintf(stderr, gettext("%s: stat error of %s: %s\n"),
 239                     prog, UTMPX_FILE, strerror(errno));
 240                 exit(1);
 241         }
 242         entries = sbuf.st_size / sizeof (struct futmpx);
 243         size = sizeof (struct utmpx) * entries;
 244         if ((ut = malloc(size)) == NULL) {
 245                 (void) fprintf(stderr, gettext("%s: malloc error of %s: %s\n"),
 246                     prog, UTMPX_FILE, strerror(errno));
 247                 exit(1);
 248         }
 249
 250         (void) utmpxname(UTMPX_FILE);
 251
 252         utmpbegin = ut;
 253         utmpend = (struct utmpx *)((char *)utmpbegin + size);
 254
 255         setutxent();
 256         while ((ut < utmpend) && ((utp = getutxent()) != NULL))
 257                 (void) memcpy(ut++, utp, sizeof (*ut));
 258         endutxent();
 259
 260         (void) time(&now);      /* get current time */
 261
 262         if (header) {   /* print a header */
 263                 prtat(&now);
 264                 for (ut = utmpbegin; ut < utmpend; ut++) {
 265                         if (ut->ut_type == USER_PROCESS) {
 266                                 if (!nonuserx(*ut))
 267                                         nusers++;
 268                         } else if (ut->ut_type == BOOT_TIME) {
 269                                 uptime = now - ut->ut_xtime;
 270                                 uptime += 30;
 271                                 days = uptime / (60*60*24);
 272                                 uptime %= (60*60*24);
 273                                 hrs = uptime / (60*60);
 274                                 uptime %= (60*60);
 275                                 mins = uptime / 60;
 276
 277                                 PRINTF((gettext("up")));
 278                                 if (days > 0)
 279                                         PRINTF((gettext(
 280                                             " %d day(s),"), days));
 281                                 if (hrs > 0 && mins > 0) {
 282                                         PRINTF((" %2d:%02d,", hrs, mins));
 283                                 } else {
 284                                         if (hrs > 0)
 285                                                 PRINTF((gettext(
 286                                                     " %d hr(s),"), hrs));
 287                                         PRINTF((gettext(
 288                                             " %d min(s),"), mins));
 289                                 }
 290                         }
 291                 }
 292
 293                 ut = utmpbegin; /* rewind utmp data */
 294                 PRINTF((((nusers == 1) ?
 295                     gettext("  %d user") : gettext("  %d users")), nusers));
 296                 /*
 297                  * Print 1, 5, and 15 minute load averages.
 298                  */
 299                 (void) getloadavg(loadavg, 3);
 300                 PRINTF((gettext(",  load average: %.2f, %.2f, %.2f\n"),
 301                     loadavg[LOADAVG_1MIN], loadavg[LOADAVG_5MIN],
 302                     loadavg[LOADAVG_15MIN]));
 303
 304                 if (firstchar == 'u')   /* uptime command */
 305                         exit(0);
 306
 307                 if (lflag) {
 308                         PRINTF((dcgettext(NULL, "User     tty      "
 309                             "login@         idle    JCPU    PCPU what\n",
 310                             LC_TIME)));
 311                 } else {
 312                         PRINTF((dcgettext(NULL,
 313                             "User     tty         idle what\n",
 314                             LC_TIME)));
 315                 }
 316
 317                 if (fflush(stdout) == EOF) {
 318                         perror((gettext("%s: fflush failed\n"), prog));
 319                         exit(1);
 320                 }
 321         }
 322
 323         /*
 324          * loop through /proc, reading info about each process
 325          * and build the parent/child tree
 326          */
 327         if (!(dirp = opendir(PROCDIR))) {
 328                 (void) fprintf(stderr, gettext("%s: could not open %s: %s\n"),
 329                     prog, PROCDIR, strerror(errno));
 330                 exit(1);
 331         }
 332
 333         while ((dp = readdir(dirp)) != NULL) {
 334                 if (dp->d_name[0] == '.')
 335                         continue;
 336 retry:
 337                 (void) sprintf(pname, "%s/%s/", PROCDIR, dp->d_name);
 338                 fname = pname + strlen(pname);
 339                 (void) strcpy(fname, "psinfo");
 340                 if ((procfd = open(pname, O_RDONLY)) < 0)
 341                         continue;
 342                 if (read(procfd, &info, sizeof (info)) != sizeof (info)) {
 343                         int err = errno;
 344                         (void) close(procfd);
 345                         if (err == EAGAIN)
 346                                 goto retry;
 347                         if (err != ENOENT)
 348                                 (void) fprintf(stderr, gettext(
 349                                     "%s: read() failed on %s: %s \n"),
 350                                     prog, pname, strerror(err));
 351                         continue;
 352                 }
 353                 (void) close(procfd);
 354
 355                 up = findhash(info.pr_pid);
 356                 up->p_ttyd = info.pr_ttydev;
 357                 up->p_state = (info.pr_nlwp == 0? ZOMBIE : RUNNING);
 358                 up->p_time = 0;
 359                 up->p_ctime = 0;
 360                 up->p_igintr = 0;
 361                 (void) strncpy(up->p_comm, info.pr_fname,
 362                     sizeof (info.pr_fname));
 363                 up->p_args[0] = 0;
 364
 365                 if (up->p_state != NONE && up->p_state != ZOMBIE) {
 366                         (void) strcpy(fname, "status");
 367
 368                         /* now we need the proc_owner privilege */
 369                         (void) __priv_bracket(PRIV_ON);
 370
 371                         procfd = open(pname, O_RDONLY);
 372
 373                         /* drop proc_owner privilege after open */
 374                         (void) __priv_bracket(PRIV_OFF);
 375
 376                         if (procfd < 0)
 377                                 continue;
 378
 379                         if (read(procfd, &statinfo, sizeof (statinfo))
 380                             != sizeof (statinfo)) {
 381                                 int err = errno;
 382                                 (void) close(procfd);
 383                                 if (err == EAGAIN)
 384                                         goto retry;
 385                                 if (err != ENOENT)
 386                                         (void) fprintf(stderr, gettext(
 387                                             "%s: read() failed on %s: %s \n"),
 388                                             prog, pname, strerror(err));
 389                                 continue;
 390                         }
 391                         (void) close(procfd);
 392
 393                         up->p_time = statinfo.pr_utime.tv_sec +
 394                             statinfo.pr_stime.tv_sec;   /* seconds */
 395                         up->p_ctime = statinfo.pr_cutime.tv_sec +
 396                             statinfo.pr_cstime.tv_sec;
 397
 398                         (void) strcpy(fname, "sigact");
 399
 400                         /* now we need the proc_owner privilege */
 401                         (void) __priv_bracket(PRIV_ON);
 402
 403                         procfd = open(pname, O_RDONLY);
 404
 405                         /* drop proc_owner privilege after open */
 406                         (void) __priv_bracket(PRIV_OFF);
 407
 408                         if (procfd < 0)
 409                                 continue;
 410
 411                         if (read(procfd, actinfo, sizeof (actinfo))
 412                             != sizeof (actinfo)) {
 413                                 int err = errno;
 414                                 (void) close(procfd);
 415                                 if (err == EAGAIN)
 416                                         goto retry;
 417                                 if (err != ENOENT)
 418                                         (void) fprintf(stderr, gettext(
 419                                             "%s: read() failed on %s: %s \n"),
 420                                             prog, pname, strerror(err));
 421                                 continue;
 422                         }
 423                         (void) close(procfd);
 424
 425                         up->p_igintr =
 426                             actinfo[SIGINT-1].sa_handler == SIG_IGN &&
 427                             actinfo[SIGQUIT-1].sa_handler == SIG_IGN;
 428
 429                         /*
 430                          * Process args.
 431                          */
 432                         up->p_args[0] = 0;
 433                         clnarglist(info.pr_psargs);
 434                         (void) strcat(up->p_args, info.pr_psargs);
 435                         if (up->p_args[0] == 0 ||
 436                             up->p_args[0] == '-' && up->p_args[1] <= ' ' ||
 437                             up->p_args[0] == '?') {
 438                                 (void) strcat(up->p_args, " (");
 439                                 (void) strcat(up->p_args, up->p_comm);
 440                                 (void) strcat(up->p_args, ")");
 441                         }
 442                 }
 443
 444                 /*
 445                  * link pgrp together in case parents go away
 446                  * Pgrp chain is a single linked list originating
 447                  * from the pgrp leader to its group member.
 448                  */
 449                 if (info.pr_pgid != info.pr_pid) {      /* not pgrp leader */
 450                         pgrp = findhash(info.pr_pgid);
 451                         up->p_pgrpl = pgrp->p_pgrpl;
 452                         pgrp->p_pgrpl = up;
 453                 }
 454                 parent = findhash(info.pr_ppid);
 455
 456                 /* if this is the new member, link it in */
 457                 if (parent->p_upid != INITPROCESS) {
 458                         if (parent->p_child) {
 459                                 up->p_sibling = parent->p_child;
 460                                 up->p_child = 0;
 461                         }
 462                         parent->p_child = up;
 463                 }
 464         }
 465
 466         /* revert to non-privileged user after opening */
 467         (void) __priv_relinquish();
 468
 469         (void) closedir(dirp);
 470         (void) time(&now);      /* get current time */
 471
 472         /*
 473          * loop through utmpx file, printing process info
 474          * about each logged in user
 475          */
 476         for (ut = utmpbegin; ut < utmpend; ut++) {
 477                 if (ut->ut_type != USER_PROCESS)
 478                         continue;
 479                 if (sel_user && strncmp(ut->ut_name, sel_user, NMAX) != 0)
 480                         continue;       /* we're looking for somebody else */
 481
 482                 /* print login name of the user */
 483                 PRINTF(("%-*.*s ", LOGIN_WIDTH, NMAX, ut->ut_name));
 484
 485                 /* print tty user is on */
 486                 if (lflag) {
 487                         PRINTF(("%-*.*s ", LINE_WIDTH, LMAX, ut->ut_line));
 488                 } else {
 489                         if (ut->ut_line[0] == 'p' && ut->ut_line[1] == 't' &&
 490                             ut->ut_line[2] == 's' && ut->ut_line[3] == '/') {
 491                                 PRINTF(("%-*.*s ", LINE_WIDTH, LMAX,
 492                                     &ut->ut_line[4]));
 493                         } else {
 494                                 PRINTF(("%-*.*s ", LINE_WIDTH, LMAX,
 495                                     ut->ut_line));
 496                         }
 497                 }
 498
 499                 /* print when the user logged in */
 500                 if (lflag) {
 501                         time_t tim = ut->ut_xtime;
 502                         prtat(&tim);
 503                 }
 504
 505                 /* print idle time */
 506                 idle = findidle(ut->ut_line);
 507                 prttime(idle, 8);
 508                 showtotals(findhash(ut->ut_pid));
 509         }
 510         if (fclose(stdout) == EOF) {
 511                 perror((gettext("%s: fclose failed"), prog));
 512                 exit(1);
 513         }
 514         return (0);
 515 }
 516
 517 /*
 518  *  Prints the CPU time for all processes & children,
 519  *  and the cpu time for interesting process,
 520  *  and what the user is doing.
 521  */
 522 static void
 523 showtotals(struct uproc *up)
 524 {
 525         jobtime = 0;
 526         proctime = 0;
 527         empty = 1;
 528         curpid = -1;
 529         add_times = 1;
 530
 531         calctotals(up);
 532
 533         if (lflag) {
 534                 /* print CPU time for all processes & children */
 535                 /* and need to convert clock ticks to seconds first */
 536                 prttime((time_t)jobtime, 8);
 537
 538                 /* print cpu time for interesting process */
 539                 /* and need to convert clock ticks to seconds first */
 540                 prttime((time_t)proctime, 8);
 541         }
 542         /* what user is doing, current process */
 543         PRINTF(("%-.32s\n", doing));
 544 }
 545
 546 /*
 547  *  This recursive routine descends the process
 548  *  tree starting from the given process pointer(up).
 549  *  It used depth-first search strategy and also marked
 550  *  each node as visited as it traversed down the tree.
 551  *  It calculates the process time for all processes &
 552  *  children.  It also finds the interesting process
 553  *  and determines its cpu time and command.
 554  */
 555 static void
 556 calctotals(struct uproc *up)
 557 {
 558         struct uproc   *zp;
 559
 560         /*
 561          * Once a node has been visited, stop adding cpu times
 562          * for its children so they don't get totalled twice.
 563          * Still look for the interesting job for this utmp
 564          * entry, however.
 565          */
 566         if (up->p_state == VISITED)
 567                 add_times = 0;
 568         up->p_state = VISITED;
 569         if (up->p_state == NONE || up->p_state == ZOMBIE)
 570                 return;
 571
 572         if (empty && !up->p_igintr) {
 573                 empty = 0;
 574                 curpid = -1;
 575         }
 576
 577         if (up->p_upid > curpid && (!up->p_igintr || empty)) {
 578                 curpid = up->p_upid;
 579                 if (lflag)
 580                         (void) strcpy(doing, up->p_args);
 581                 else
 582                         (void) strcpy(doing, up->p_comm);
 583         }
 584
 585         if (add_times == 1) {
 586                 jobtime += up->p_time + up->p_ctime;
 587                 proctime += up->p_time;
 588         }
 589
 590         /* descend for its children */
 591         if (up->p_child) {
 592                 calctotals(up->p_child);
 593                 for (zp = up->p_child->p_sibling; zp; zp = zp->p_sibling)
 594                         calctotals(zp);
 595         }
 596 }
 597
 598 /*
 599  *   Findhash  finds the appropriate entry in the process
 600  *   hash table (pr_htbl) for the given pid in case that
 601  *   pid exists on the hash chain. It returns back a pointer
 602  *   to that uproc structure. If this is a new pid, it allocates
 603  *   a new node, initializes it, links it into the chain (after
 604  *   head) and returns a structure pointer.
 605  */
 606 static struct uproc *
 607 findhash(pid_t pid)
 608 {
 609         struct uproc *up, *tp;
 610
 611         tp = up = &pr_htbl[pid % HSIZE];
 612         if (up->p_upid == 0) {                  /* empty slot */
 613                 up->p_upid = pid;
 614                 up->p_state = NONE;
 615                 up->p_child = up->p_sibling = up->p_pgrpl = up->p_link = 0;
 616                 return (up);
 617         }
 618         if (up->p_upid == pid) {                /* found in hash table */
 619                 return (up);
 620         }
 621         for (tp = up->p_link; tp; tp = tp->p_link) {    /* follow chain */
 622                 if (tp->p_upid == pid)
 623                         return (tp);
 624         }
 625         tp = malloc(sizeof (*tp));              /* add new node */
 626         if (!tp) {
 627                 (void) fprintf(stderr, gettext("%s: out of memory!: %s\n"),
 628                     prog, strerror(errno));
 629                 exit(1);
 630         }
 631         (void) memset(tp, 0, sizeof (*tp));
 632         tp->p_upid = pid;
 633         tp->p_state = NONE;
 634         tp->p_child = tp->p_sibling = tp->p_pgrpl = 0;
 635         tp->p_link = up->p_link;                /* insert after head */
 636         up->p_link = tp;
 637         return (tp);
 638 }
 639
 640 #define HR      (60 * 60)
 641 #define DAY     (24 * HR)
 642 #define MON     (30 * DAY)
 643
 644 /*
 645  * Prttime prints an elapsed time in hours, minutes, or seconds,
 646  * right-justified with the rightmost column always blank.
 647  * The second argument is the minimum field width.
 648  */
 649 static void
 650 prttime(time_t tim, int width)
 651 {
 652         char value[36];
 653
 654         if (tim >= 36 * 60) {
 655                 (void) snprintf(value, sizeof (value), "%d:%02d:%02d",
 656                     (int)tim / HR, (int)(tim % HR) / 60, (int)tim % 60);
 657         } else if (tim >= 60) {
 658                 (void) snprintf(value, sizeof (value), "%d:%02d",
 659                     (int)tim / 60, (int)tim % 60);
 660         } else if (tim > 0) {
 661                 (void) snprintf(value, sizeof (value), "%d", (int)tim);
 662         } else {
 663                 (void) strcpy(value, "0");
 664         }
 665         width = (width > 2) ? width - 1 : 1;
 666         PRINTF(("%*s ", width, value));
 667 }
 668
 669 /*
 670  * Prints the ISO date or time given a pointer to a time of day,
 671  * left-justfied in a 12-character expanding field with the
 672  * rightmost column always blank.
 673  * Includes a dcgettext() override in case a message catalog is needed.
 674  */
 675 static void
 676 prtat(time_t *time)
 677 {
 678         struct tm       *p;
 679
 680         p = localtime(time);
 681         if (now - *time <= 18 * HR) {
 682                 char timestr[50];
 683
 684                 (void) strftime(timestr, sizeof (timestr),
 685                     dcgettext(NULL, "%T", LC_TIME), p);
 686                 PRINTF(("%-11s ", timestr));
 687         } else if (now - *time <= 7 * DAY) {
 688                 char weekdaytime[20];
 689
 690                 (void) strftime(weekdaytime, sizeof (weekdaytime),
 691                     dcgettext(NULL, "%a %H:%M", LC_TIME), p);
 692                 PRINTF(("%-11s ", weekdaytime));
 693         } else {
 694                 char monthtime[20];
 695
 696                 (void) strftime(monthtime, sizeof (monthtime),
 697                     dcgettext(NULL, "%F", LC_TIME), p);
 698                 PRINTF(("%-11s ", monthtime));
 699         }
 700 }
 701
 702 /*
 703  * find & return number of minutes current tty has been idle
 704  */
 705 static time_t
 706 findidle(char *devname)
 707 {
 708         struct stat stbuf;
 709         time_t lastaction, diff;
 710         char ttyname[64];
 711
 712         (void) strcpy(ttyname, "/dev/");
 713         (void) strcat(ttyname, devname);
 714         if (stat(ttyname, &stbuf) != -1) {
 715                 lastaction = stbuf.st_atime;
 716                 diff = now - lastaction;
 717                 diff = DIV60(diff);
 718                 if (diff < 0)
 719                         diff = 0;
 720         } else
 721                 diff = 0;
 722         return (diff);
 723 }
 724
 725 /*
 726  * given a pointer to the argument string get rid of unsavory characters.
 727  */
 728 static void
 729 clnarglist(char *arglist)
 730 {
 731         char    *c;
 732         int     err = 0;
 733
 734         /* get rid of unsavory characters */
 735         for (c = arglist; *c != '\0'; c++) {
 736                 if ((*c < ' ') || (*c > 0176)) {
 737                         if (err++ > 5) {
 738                                 *arglist = '\0';
 739                                 break;
 740                         }
 741                         *c = '?';
 742                 }
 743         }
 744 }