.

1 files changed, 0 insertions, 786 deletions

diff --git a/src/who-users.c b/src/who-users.c
deleted file mode 100644
index d6748d66e..000000000
--- a/src/who-users.c
+++ /dev/null
@@ -1,786 +0,0 @@
-/* GNU's uptime/users/who.
-   Copyright (C) 92, 93, 94, 95, 96, 1997 Free Software Foundation, Inc.
-
-   This program is free software; you can redistribute it and/or modify
-   it under the terms of the GNU General Public License as published by
-   the Free Software Foundation; either version 2, or (at your option)
-   any later version.
-
-   This program is distributed in the hope that it will be useful,
-   but WITHOUT ANY WARRANTY; without even the implied warranty of
-   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-   GNU General Public License for more details.
-
-   You should have received a copy of the GNU General Public License
-   along with this program; if not, write to the Free Software Foundation,
-   Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
-
-/* Written by jla; revised by djm */
-
-/* Output format:
-   name [state] line time [idle] host
-   state: -T
-   name, line, time: not -q
-   idle: -u
-*/
-
-#include <config.h>
-#include <stdio.h>
-#include <sys/types.h>
-
-#ifdef HAVE_UTMPX_H
-# include <utmpx.h>
-# define STRUCT_UTMP struct utmpx
-# define UT_TIME_MEMBER(UT_PTR) ((UT_PTR)->ut_tv.tv_sec)
-#else
-# include <utmp.h>
-# define STRUCT_UTMP struct utmp
-# define UT_TIME_MEMBER(UT_PTR) ((UT_PTR)->ut_time)
-#endif
-
-#include <time.h>
-#include <getopt.h>
-#ifdef HAVE_SYS_PARAM_H
-# include <sys/param.h>
-#endif
-
-#include "system.h"
-#include "error.h"
-
-#if !defined (UTMP_FILE) && defined (_PATH_UTMP)
-# define UTMP_FILE _PATH_UTMP
-#endif
-
-#if !defined (WTMP_FILE) && defined (_PATH_WTMP)
-# define WTMP_FILE _PATH_WTMP
-#endif
-
-#ifdef UTMPX_FILE /* Solaris, SysVr4 */
-# undef UTMP_FILE
-# define UTMP_FILE UTMPX_FILE
-#endif
-
-#ifdef WTMPX_FILE /* Solaris, SysVr4 */
-# undef WTMP_FILE
-# define WTMP_FILE WTMPX_FILE
-#endif
-
-#ifndef UTMP_FILE
-# define UTMP_FILE "/etc/utmp"
-#endif
-
-#ifndef WTMP_FILE
-# define WTMP_FILE "/etc/wtmp"
-#endif
-
-#ifndef MAXHOSTNAMELEN
-# define MAXHOSTNAMELEN 64
-#endif
-
-#ifndef S_IWGRP
-# define S_IWGRP 020
-#endif
-
-#ifdef WHO
-# define COMMAND_NAME "who"
-#else
-# ifdef USERS
-#  define COMMAND_NAME "users"
-# else
-#  ifdef UPTIME
-#   define COMMAND_NAME "uptime"
-#  else
- error You must define one of WHO, UPTIME or USERS.
-#  endif /* UPTIME */
-# endif /* USERS */
-#endif /* WHO */
-
-int gethostname ();
-char *ttyname ();
-char *xmalloc ();
-
-/* The name this program was run with. */
-char *program_name;
-
-/* If nonzero, display usage information and exit.  */
-static int show_help;
-
-/* If nonzero, print the version on standard output and exit.  */
-static int show_version;
-
-#ifdef WHO
-/* If nonzero, display only a list of usernames and count of
-   the users logged on.
-   Ignored for `who am i'. */
-static int short_list;
-
-/* If nonzero, display the hours:minutes since each user has touched
-   the keyboard, or "." if within the last minute, or "old" if
-   not within the last day. */
-static int include_idle;
-
-/* If nonzero, display a line at the top describing each field. */
-static int include_heading;
-
-/* If nonzero, display a `+' for each user if mesg y, a `-' if mesg n,
-   or a `?' if their tty cannot be statted. */
-static int include_mesg;
-#endif /* WHO */
-
-static struct option const longopts[] =
-{
-#ifdef WHO
-  {"count", no_argument, NULL, 'q'},
-  {"idle", no_argument, NULL, 'u'},
-  {"heading", no_argument, NULL, 'H'},
-  {"message", no_argument, NULL, 'T'},
-  {"mesg", no_argument, NULL, 'T'},
-  {"writable", no_argument, NULL, 'T'},
-#endif /* WHO */
-  {"help", no_argument, &show_help, 1},
-  {"version", no_argument, &show_version, 1},
-  {NULL, 0, NULL, 0}
-};
-
-static STRUCT_UTMP *utmp_contents;
-
-#ifdef UPTIME
-static void
-print_uptime (int n)
-{
-  register STRUCT_UTMP *this = utmp_contents;
-  register int entries = 0;
-  time_t boot_time = 0;
-  time_t time_now;
-  time_t uptime = 0;
-  int updays;
-  int uphours;
-  int upmins;
-  struct tm *tmn;
-  double avg[3];
-  int loads;
-# ifdef HAVE_PROC_UPTIME
-  FILE *fp;
-  double upsecs;
-
-  fp = fopen ("/proc/uptime", "r");
-  if (fp != NULL)
-    {
-      char buf[BUFSIZ];
-      int res;
-      fgets(buf, BUFSIZ, fp);
-      res = sscanf (buf, "%lf", &upsecs);
-      if (res == 1)
-	uptime = (time_t) upsecs;
-      fclose (fp);
-    }
-# endif /* HAVE_PROC_UPTIME */
-  /* Loop through all the utmp entries we just read and count up the valid
-     ones, also in the process possibly gleaning boottime. */
-  while (n--)
-    {
-      if (this->ut_name[0]
-# ifdef USER_PROCESS
-	  && this->ut_type == USER_PROCESS
-# endif
-	  )
-	{
-	  ++entries;
-	}
-      /* If BOOT_MSG is defined, we can get boottime from utmp.  This avoids
-	 possibly needing special privs to read /dev/kmem. */
-# ifdef BOOT_MSG
-#  if HAVE_PROC_UPTIME
-      if (uptime == 0)
-#  endif /* HAVE_PROC_UPTIME */
-	if (!strcmp (this->ut_line, BOOT_MSG))
-	  boot_time = UT_TIME_MEMBER (this);
-# endif /* BOOT_MSG */
-      ++this;
-  }
-  time_now = time (0);
-# if defined HAVE_PROC_UPTIME
-  if (uptime == 0)
-# endif
-    {
-      if (boot_time == 0)
-	error (1, errno, _("couldn't get boot time"));
-      uptime = time_now - boot_time;
-    }
-  updays = uptime / 86400;
-  uphours = (uptime - (updays * 86400)) / 3600;
-  upmins = (uptime - (updays * 86400) - (uphours * 3600)) / 60;
-  tmn = localtime (&time_now);
-  printf (_(" %2d:%02d%s  up "), ((tmn->tm_hour % 12) == 0
-			       ? 12 : tmn->tm_hour % 12),
-	  tmn->tm_min, (tmn->tm_hour < 12 ? _("am") : _("pm")));
-  if (updays > 0)
-    printf ("%d %s,", updays, (updays == 1 ? _("day") : _("days")));
-  printf (" %2d:%02d,  %d %s", uphours, upmins, entries,
-	  (entries == 1) ? _("user") : _("users"));
-
-# if defined (HAVE_GETLOADAVG) || defined (C_GETLOADAVG)
-  loads = getloadavg (avg, 3);
-# else
-  loads = -1;
-# endif
-
-  if (loads == -1)
-    putchar ('\n');
-  else
-    {
-      if (loads > 0)
-	printf (_(",  load average: %.2f"), avg[0]);
-      if (loads > 1)
-	printf (", %.2f", avg[1]);
-      if (loads > 2)
-	printf (", %.2f", avg[2]);
-      if (loads > 0)
-	putchar ('\n');
-    }
-}
-#endif /* UPTIME */
-
-
-
-#if defined (WHO) || defined (USERS)
-
-/* Copy UT->ut_name into storage obtained from malloc.  Then remove any
-   trailing spaces from the copy, NUL terminate it, and return the copy.  */
-
-static char *
-extract_trimmed_name (const STRUCT_UTMP *ut)
-{
-  char *p, *trimmed_name;
-
-  trimmed_name = xmalloc (sizeof (ut->ut_name) + 1);
-  strncpy (trimmed_name, ut->ut_name, sizeof (ut->ut_name));
-  /* Append a trailing space character.  Some systems pad names shorter than
-     the maximum with spaces, others pad with NULs.  Remove any spaces.  */
-  trimmed_name[sizeof (ut->ut_name)] = ' ';
-  p = strchr (trimmed_name, ' ');
-  if (p != NULL)
-    *p = '\0';
-  return trimmed_name;
-}
-
-#endif /* WHO || USERS */
-
-#if WHO
-
-/* Return a string representing the time between WHEN and the time
-   that this function is first run. */
-
-static const char *
-idle_string (time_t when)
-{
-  static time_t now = 0;
-  static char idle_hhmm[10];
-  time_t seconds_idle;
-
-  if (now == 0)
-    time (&now);
-
-  seconds_idle = now - when;
-  if (seconds_idle < 60)	/* One minute. */
-    return "  .  ";
-  if (seconds_idle < (24 * 60 * 60)) /* One day. */
-    {
-      sprintf (idle_hhmm, "%02d:%02d",
-	       (int) (seconds_idle / (60 * 60)),
-	       (int) ((seconds_idle % (60 * 60)) / 60));
-      return (const char *) idle_hhmm;
-    }
-  return _(" old ");
-}
-
-/* Display a line of information about entry THIS. */
-
-static void
-print_entry (STRUCT_UTMP *this)
-{
-  struct stat stats;
-  time_t last_change;
-  char mesg;
-
-# define DEV_DIR_WITH_TRAILING_SLASH "/dev/"
-# define DEV_DIR_LEN (sizeof (DEV_DIR_WITH_TRAILING_SLASH) - 1)
-
-  char line[sizeof (this->ut_line) + DEV_DIR_LEN + 1];
-  time_t tm;
-
-  /* Copy ut_line into LINE, prepending `/dev/' if ut_line is not
-     already an absolute pathname.  Some system may put the full,
-     absolute pathname in ut_line.  */
-  if (this->ut_line[0] == '/')
-    {
-      strncpy (line, this->ut_line, sizeof (this->ut_line));
-      line[sizeof (this->ut_line)] = '\0';
-    }
-  else
-    {
-      strcpy (line, DEV_DIR_WITH_TRAILING_SLASH);
-      strncpy (line + DEV_DIR_LEN, this->ut_line, sizeof (this->ut_line));
-      line[DEV_DIR_LEN + sizeof (this->ut_line)] = '\0';
-    }
-
-  if (stat (line, &stats) == 0)
-    {
-      mesg = (stats.st_mode & S_IWGRP) ? '+' : '-';
-      last_change = stats.st_atime;
-    }
-  else
-    {
-      mesg = '?';
-      last_change = 0;
-    }
-
-  printf ("%-8.*s", (int) sizeof (this->ut_name), this->ut_name);
-  if (include_mesg)
-    printf ("  %c  ", mesg);
-  printf (" %-8.*s", (int) sizeof (this->ut_line), this->ut_line);
-
-  /* Don't take the address of UT_TIME_MEMBER directly.
-     Ulrich Drepper wrote:
-     ``... GNU libc (and perhaps other libcs as well) have extended
-     utmp file formats which do not use a simple time_t ut_time field.
-     In glibc, ut_time is a macro which selects for backward compatibility
-     the tv_sec member of a struct timeval value.''  */
-  tm = UT_TIME_MEMBER (this);
-  printf (" %-12.12s", ctime (&tm) + 4);
-
-  if (include_idle)
-    {
-      if (last_change)
-	printf (" %s", idle_string (last_change));
-      else
-	printf ("   .  ");
-    }
-# ifdef HAVE_UT_HOST
-  if (this->ut_host[0])
-    {
-      extern char *canon_host ();
-      char ut_host[sizeof (this->ut_host) + 1];
-      char *host = 0, *display = 0;
-
-      /* Copy the host name into UT_HOST, and ensure it's nul terminated. */
-      strncpy (ut_host, this->ut_host, (int) sizeof (this->ut_host));
-      ut_host[sizeof (this->ut_host)] = '\0';
-
-      /* Look for an X display.  */
-      display = strrchr (ut_host, ':');
-      if (display)
-	*display++ = '\0';
-
-      if (*ut_host)
-	/* See if we can canonicalize it.  */
-	host = canon_host (ut_host);
-      if (! host)
-	host = ut_host;
-
-      if (display)
-	printf (" (%s:%s)", host, display);
-      else
-	printf (" (%s)", host);
-    }
-# endif
-
-  putchar ('\n');
-}
-
-/* Print the username of each valid entry and the number of valid entries
-   in `utmp_contents', which should have N elements. */
-
-static void
-list_entries_who (int n)
-{
-  register STRUCT_UTMP *this = utmp_contents;
-  int entries;
-
-  entries = 0;
-  while (n--)
-    {
-      if (this->ut_name[0]
-# ifdef USER_PROCESS
-	  && this->ut_type == USER_PROCESS
-# endif
-	 )
-	{
-	  char *trimmed_name;
-
-	  trimmed_name = extract_trimmed_name (this);
-
-	  printf ("%s ", trimmed_name);
-	  free (trimmed_name);
-	  entries++;
-	}
-      this++;
-    }
-  printf (_("\n# users=%u\n"), entries);
-}
-
-#endif /* WHO */
-
-#ifdef USERS
-
-static int
-userid_compare (const void *v_a, const void *v_b)
-{
-  char **a = (char **) v_a;
-  char **b = (char **) v_b;
-  return strcmp (*a, *b);
-}
-
-static void
-list_entries_users (int n)
-{
-  register STRUCT_UTMP *this = utmp_contents;
-  char **u;
-  int i;
-  int n_entries;
-
-  n_entries = 0;
-  u = (char **) xmalloc (n * sizeof (u[0]));
-  for (i = 0; i < n; i++)
-    {
-      if (this->ut_name[0]
-# ifdef USER_PROCESS
-	  && this->ut_type == USER_PROCESS
-# endif
-	 )
-	{
-	  char *trimmed_name;
-
-	  trimmed_name = extract_trimmed_name (this);
-
-	  u[n_entries] = trimmed_name;
-	  ++n_entries;
-	}
-      this++;
-    }
-
-  qsort (u, n_entries, sizeof (u[0]), userid_compare);
-
-  for (i = 0; i < n_entries; i++)
-    {
-      int c;
-      fputs (u[i], stdout);
-      c = (i < n_entries-1 ? ' ' : '\n');
-      putchar (c);
-    }
-
-  for (i = 0; i < n_entries; i++)
-    free (u[i]);
-  free (u);
-}
-
-#endif /* USERS */
-
-#ifdef WHO
-
-static void
-print_heading (void)
-{
-  printf ("%-8s ", _("USER"));
-  if (include_mesg)
-    printf (_("MESG "));
-  printf ("%-8s ", _("LINE"));
-  printf (_("LOGIN-TIME   "));
-  if (include_idle)
-    printf (_("IDLE  "));
-  printf (_("FROM\n"));
-}
-
-/* Display `utmp_contents', which should have N entries. */
-
-static void
-scan_entries (int n)
-{
-  register STRUCT_UTMP *this = utmp_contents;
-
-  if (include_heading)
-    print_heading ();
-
-  while (n--)
-    {
-      if (this->ut_name[0]
-# ifdef USER_PROCESS
-	  && this->ut_type == USER_PROCESS
-# endif
-	 )
-	print_entry (this);
-      this++;
-    }
-}
-
-#endif /* WHO */
-
-/* Read the utmp file FILENAME into UTMP_CONTENTS and return the
-   number of entries it contains. */
-
-static int
-read_utmp (char *filename)
-{
-  FILE *utmp;
-  struct stat file_stats;
-  size_t n_read;
-  size_t size;
-
-  utmp = fopen (filename, "r");
-  if (utmp == NULL)
-    error (1, errno, "%s", filename);
-
-  fstat (fileno (utmp), &file_stats);
-  size = file_stats.st_size;
-  if (size > 0)
-    utmp_contents = (STRUCT_UTMP *) xmalloc (size);
-  else
-    {
-      fclose (utmp);
-      return 0;
-    }
-
-  /* Use < instead of != in case the utmp just grew.  */
-  n_read = fread (utmp_contents, 1, size, utmp);
-  if (ferror (utmp) || fclose (utmp) == EOF
-      || n_read < size)
-    error (1, errno, "%s", filename);
-
-  return size / sizeof (STRUCT_UTMP);
-}
-
-/* Display a list of who is on the system, according to utmp file FILENAME. */
-
-static void
-who (char *filename)
-{
-  int users;
-
-  users = read_utmp (filename);
-#ifdef WHO
-  if (short_list)
-    list_entries_who (users);
-  else
-    scan_entries (users);
-#else
-# ifdef USERS
-  list_entries_users (users);
-# else
-#  ifdef UPTIME
-  print_uptime (users);
-#  endif /* UPTIME */
-# endif /* USERS */
-#endif /* WHO */
-}
-
-#ifdef WHO
-
-/* Search `utmp_contents', which should have N entries, for
-   an entry with a `ut_line' field identical to LINE.
-   Return the first matching entry found, or NULL if there
-   is no matching entry. */
-
-static STRUCT_UTMP *
-search_entries (int n, char *line)
-{
-  register STRUCT_UTMP *this = utmp_contents;
-
-  while (n--)
-    {
-      if (this->ut_name[0]
-# ifdef USER_PROCESS
-	  && this->ut_type == USER_PROCESS
-# endif
-	  && !strncmp (line, this->ut_line, sizeof (this->ut_line)))
-	return this;
-      this++;
-    }
-  return NULL;
-}
-
-/* Display the entry in utmp file FILENAME for this tty on standard input,
-   or nothing if there is no entry for it. */
-
-static void
-who_am_i (char *filename)
-{
-  register STRUCT_UTMP *utmp_entry;
-  char hostname[MAXHOSTNAMELEN + 1];
-  char *tty;
-
-  if (gethostname (hostname, MAXHOSTNAMELEN + 1))
-    *hostname = 0;
-
-  if (include_heading)
-    {
-      printf ("%*s ", (int) strlen (hostname), " ");
-      print_heading ();
-    }
-
-  tty = ttyname (0);
-  if (tty == NULL)
-    return;
-  tty += 5;			/* Remove "/dev/".  */
-
-  utmp_entry = search_entries (read_utmp (filename), tty);
-  if (utmp_entry == NULL)
-    return;
-
-  printf ("%s!", hostname);
-  print_entry (utmp_entry);
-}
-
-static void
-usage (int status)
-{
-  if (status != 0)
-    fprintf (stderr, _("Try `%s --help' for more information.\n"),
-	     program_name);
-  else
-    {
-      printf (_("Usage: %s [OPTION]... [ FILE | ARG1 ARG2 ]\n"), program_name);
-      printf (_("\
-\n\
-  -H, --heading     print line of column headings\n\
-  -i, -u, --idle    add user idle time as HOURS:MINUTES, . or old\n\
-  -m                only hostname and user associated with stdin\n\
-  -q, --count       all login names and number of users logged on\n\
-  -s                (ignored)\n\
-  -T, -w, --mesg    add user's message status as +, - or ?\n\
-      --message     same as -T\n\
-      --writable    same as -T\n\
-      --help        display this help and exit\n\
-      --version     output version information and exit\n\
-\n\
-If FILE is not specified, use %s.  %s as FILE is common.\n\
-If ARG1 ARG2 given, -m presumed: `am i' or `mom likes' are usual.\n\
-"), UTMP_FILE, WTMP_FILE);
-      puts (_("\nReport bugs to <sh-utils-bugs@gnu.ai.mit.edu>."));
-    }
-  exit (status);
-}
-#endif /* WHO */
-
-#if defined(USERS) || defined(UPTIME)
-static void
-usage (int status)
-{
-  if (status != 0)
-    fprintf (stderr, _("Try `%s --help' for more information.\n"),
-	     program_name);
-  else
-    {
-      printf (_("Usage: %s [OPTION]... [ FILE ]\n"), program_name);
-      printf (_("\
-Output who is currently logged in according to FILE.\n\
-If FILE is not specified, use %s.  %s as FILE is common.\n\
-\n\
-      --help        display this help and exit\n\
-      --version     output version information and exit\n"),
-	      UTMP_FILE, WTMP_FILE);
-      puts (_("\nReport bugs to <sh-utils-bugs@gnu.ai.mit.edu>."));
-    }
-  exit (status);
-}
-#endif /* USERS || UPTIME */
-
-int
-main (int argc, char **argv)
-{
-  int optc, longind;
-#ifdef WHO
-  int my_line_only = 0;
-#endif /* WHO */
-
-  program_name = argv[0];
-  setlocale (LC_ALL, "");
-  bindtextdomain (PACKAGE, LOCALEDIR);
-  textdomain (PACKAGE);
-
-#ifdef WHO
-# define WU_OPTS "imqsuwHT"
-#else
-# define WU_OPTS ""
-#endif
-
-  while ((optc = getopt_long (argc, argv, WU_OPTS, longopts, &longind)) != -1)
-    {
-      switch (optc)
-	{
-	case 0:
-	  break;
-
-#ifdef WHO
-	case 'm':
-	  my_line_only = 1;
-	  break;
-
-	case 'q':
-	  short_list = 1;
-	  break;
-
-	case 's':
-	  break;
-
-	case 'i':
-	case 'u':
-	  include_idle = 1;
-	  break;
-
-	case 'H':
-	  include_heading = 1;
-	  break;
-
-	case 'w':
-	case 'T':
-	  include_mesg = 1;
-	  break;
-#endif /* WHO */
-
-	default:
-	  usage (1);
-	}
-    }
-
-  if (show_version)
-    {
-      printf ("%s (%s) %s\n", COMMAND_NAME, GNU_PACKAGE, VERSION);
-      exit (0);
-    }
-
-  if (show_help)
-    usage (0);
-
-  switch (argc - optind)
-    {
-    case 0:			/* who */
-#ifdef WHO
-      if (my_line_only)
-	who_am_i (UTMP_FILE);
-      else
-#endif /* WHO */
-	who (UTMP_FILE);
-      break;
-
-    case 1:			/* who <utmp file> */
-#ifdef WHO
-      if (my_line_only)
-	who_am_i (argv[optind]);
-      else
-#endif /* WHO */
-	who (argv[optind]);
-      break;
-
-#ifdef WHO
-    case 2:			/* who <blurf> <glop> */
-      who_am_i (UTMP_FILE);
-      break;
-#endif /* WHO */
-
-    default:			/* lose */
-      error (0, 0, _("too many arguments"));
-      usage (1);
-    }
-
-  exit (0);
-}