NetBSD/gnu/libexec/uucp/uulog/uulog.c

493 lines
12 KiB
C
Raw Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

/* uulog.c
Display the UUCP log file.
Copyright (C) 1991, 1992, 1993, 1994, 1995 Ian Lance Taylor
This file is part of the Taylor UUCP package.
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 of the
License, 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.
The author of the program may be contacted at ian@airs.com or
c/o Cygnus Support, 48 Grove Street, Somerville, MA 02144.
*/
#include "uucp.h"
#if USE_RCS_ID
const char uulog_rcsid[] = "$Id: uulog.c,v 1.3 1995/08/24 05:23:22 jtc Exp $";
#endif
#include <ctype.h>
#include <errno.h>
#include "getopt.h"
#include "uudefs.h"
#include "uuconf.h"
#include "system.h"
/* This is a pretty bad implementation of uulog, which I don't think
is a very useful program anyhow. It only takes a single -s and/or
-u switch. When using HAVE_HDB_LOGGING it requires a system. */
/* Local functions. */
static void ulusage P((void));
static void ulhelp P((void));
/* Long getopt options. */
static const struct option asLlongopts[] =
{
{ "debuglog", no_argument, NULL, 'D' },
{ "follow", optional_argument, NULL, 2 },
{ "lines", required_argument, NULL, 'n' },
{ "system", required_argument, NULL, 's' },
{ "statslog", no_argument, NULL, 'S' },
{ "user", required_argument, NULL, 'u' },
{ "uuxqtlog", no_argument, NULL, 'x' },
{ "config", required_argument, NULL, 'I' },
{ "debug", required_argument, NULL, 'X' },
{ "version", no_argument, NULL, 'v' },
{ "help", no_argument, NULL, 1 },
{ NULL, 0, NULL, 0 }
};
int
main (argc, argv)
int argc;
char **argv;
{
/* -D: display Debug file */
boolean fdebug = FALSE;
/* -f: keep displaying lines forever. */
boolean fforever = FALSE;
/* -n lines: number of lines to display. */
int cshow = 0;
/* -s: system name. */
const char *zsystem = NULL;
/* -S: display Stats file */
boolean fstats = FALSE;
/* -u: user name. */
const char *zuser = NULL;
/* -I: configuration file name. */
const char *zconfig = NULL;
/* -x: display uuxqt log file. */
boolean fuuxqt = FALSE;
int i;
int iopt;
pointer puuconf;
int iuuconf;
const char *zlogfile;
const char *zstatsfile;
const char *zdebugfile;
const char *zfile;
FILE *e;
char **pzshow = NULL;
int ishow = 0;
size_t csystem = 0;
size_t cuser = 0;
char *zline;
size_t cline;
zProgram = argv[0];
/* Look for a straight number argument, and convert it to -n before
passing the arguments to getopt. */
for (i = 0; i < argc; i++)
{
if (argv[i][0] == '-' && isdigit (argv[i][1]))
{
size_t clen;
char *znew;
clen = strlen (argv[i]);
znew = zbufalc (clen + 2);
znew[0] = '-';
znew[1] = 'n';
memcpy (znew + 2, argv[i] + 1, clen);
argv[i] = znew;
}
}
while ((iopt = getopt_long (argc, argv, "Df:FI:n:s:Su:vxX:", asLlongopts,
(int *) NULL)) != EOF)
{
switch (iopt)
{
case 'D':
/* Show debugging file. */
fdebug = TRUE;
break;
case 'f':
/* Keep displaying lines forever for a particular system. */
fforever = TRUE;
zsystem = optarg;
if (cshow == 0)
cshow = 10;
break;
case 'F':
/* Keep displaying lines forever. */
fforever = TRUE;
if (cshow == 0)
cshow = 10;
break;
case 'I':
/* Configuration file name. */
if (fsysdep_other_config (optarg))
zconfig = optarg;
break;
case 'n':
/* Number of lines to display. */
cshow = (int) strtol (optarg, (char **) NULL, 10);
break;
case 's':
/* System name. */
zsystem = optarg;
break;
case 'S':
/* Show statistics file. */
fstats = TRUE;
break;
case 'u':
/* User name. */
zuser = optarg;
break;
case 'x':
/* Display uuxqt log file. */
fuuxqt = TRUE;
break;
case 'X':
#if DEBUG > 1
/* Set debugging level. */
iDebug |= idebug_parse (optarg);
#endif
break;
case 'v':
/* Print version and exit. */
printf ("%s: Taylor UUCP %s, copyright (C) 1991, 92, 93, 94, 1995 Ian Lance Taylor\n",
zProgram, VERSION);
exit (EXIT_SUCCESS);
/*NOTREACHED*/
case 2:
/* --follow. */
fforever = TRUE;
if (cshow == 0)
cshow = 10;
if (optarg != NULL)
zsystem = optarg;
break;
case 1:
/* --help. */
ulhelp ();
exit (EXIT_SUCCESS);
/*NOTREACHED*/
case 0:
/* Long option found and flag set. */
break;
default:
ulusage ();
/*NOTREACHED*/
}
}
if (optind != argc || (fstats && fdebug))
ulusage ();
iuuconf = uuconf_init (&puuconf, (const char *) NULL, zconfig);
if (iuuconf != UUCONF_SUCCESS)
ulog_uuconf (LOG_FATAL, puuconf, iuuconf);
#if DEBUG > 1
{
const char *zdebug;
iuuconf = uuconf_debuglevel (puuconf, &zdebug);
if (iuuconf != UUCONF_SUCCESS)
ulog_uuconf (LOG_FATAL, puuconf, iuuconf);
if (zdebug != NULL)
iDebug |= idebug_parse (zdebug);
}
#endif
iuuconf = uuconf_logfile (puuconf, &zlogfile);
if (iuuconf != UUCONF_SUCCESS)
ulog_uuconf (LOG_FATAL, puuconf, iuuconf);
iuuconf = uuconf_statsfile (puuconf, &zstatsfile);
if (iuuconf != UUCONF_SUCCESS)
ulog_uuconf (LOG_FATAL, puuconf, iuuconf);
iuuconf = uuconf_debugfile (puuconf, &zdebugfile);
if (iuuconf != UUCONF_SUCCESS)
ulog_uuconf (LOG_FATAL, puuconf, iuuconf);
usysdep_initialize (puuconf, INIT_NOCHDIR);
if (zsystem != NULL)
{
#if HAVE_HDB_LOGGING
if (strcmp (zsystem, "ANY") != 0)
#endif
{
struct uuconf_system ssys;
/* Canonicalize the system name. If we can't find the
system information, just use whatever we were given so
that people can check on systems that logged in
anonymously. */
iuuconf = uuconf_system_info (puuconf, zsystem, &ssys);
if (iuuconf == UUCONF_SUCCESS)
{
zsystem = zbufcpy (ssys.uuconf_zname);
(void) uuconf_system_free (puuconf, &ssys);
}
}
}
if (fstats)
zfile = zstatsfile;
else if (fdebug)
zfile = zdebugfile;
else
{
#if ! HAVE_HDB_LOGGING
zfile = zlogfile;
#else
const char *zprogram;
char *zalc;
/* We need a system to find a HDB log file. */
if (zsystem == NULL)
ulog (LOG_FATAL,
"system name (-s argument) required for HDB format log files");
if (fuuxqt)
zprogram = "uuxqt";
else
zprogram = "uucico";
zalc = zbufalc (strlen (zlogfile)
+ strlen (zprogram)
+ strlen (zsystem)
+ 1);
sprintf (zalc, zlogfile, zprogram, zsystem);
zfile = zalc;
if (! fsysdep_file_exists (zfile))
ulog (LOG_FATAL, "no log file available for system %s", zsystem);
if (strcmp (zsystem, "ANY") == 0)
zsystem = NULL;
#endif
}
e = fopen (zfile, "r");
if (e == NULL)
{
ulog (LOG_ERROR, "fopen (%s): %s", zfile, strerror (errno));
usysdep_exit (FALSE);
}
if (cshow > 0)
{
pzshow = (char **) xmalloc (cshow * sizeof (char *));
for (ishow = 0; ishow < cshow; ishow++)
pzshow[ishow] = NULL;
ishow = 0;
}
/* Read the log file and output the appropriate lines. */
if (zsystem != NULL)
csystem = strlen (zsystem);
if (zuser != NULL)
cuser = strlen (zuser);
zline = NULL;
cline = 0;
while (TRUE)
{
while (getline (&zline, &cline, e) > 0)
{
char *zluser, *zlsys, *znext;
size_t cluser, clsys;
/* Skip any leading whitespace (not that there should be
any). */
znext = zline + strspn (zline, " \t");
if (! fstats)
{
#if ! HAVE_TAYLOR_LOGGING
/* The user name is the first field on the line. */
zluser = znext;
cluser = strcspn (znext, " \t");
#endif
/* Skip the first field. */
znext += strcspn (znext, " \t");
znext += strspn (znext, " \t");
/* The system is the second field on the line. */
zlsys = znext;
clsys = strcspn (znext, " \t");
/* Skip the second field. */
znext += clsys;
znext += strspn (znext, " \t");
#if HAVE_TAYLOR_LOGGING
/* The user is the third field on the line. */
zluser = znext;
cluser = strcspn (znext, " \t");
#endif
}
else
{
#if ! HAVE_HDB_LOGGING
/* The user name is the first field on the line, and the
system name is the second. */
zluser = znext;
cluser = strcspn (znext, " \t");
znext += cluser;
znext += strspn (znext, " \t");
zlsys = znext;
clsys = strcspn (znext, " \t");
#else
/* The first field is system!user. */
zlsys = znext;
clsys = strcspn (znext, "!");
znext += clsys + 1;
zluser = znext;
cluser = strcspn (znext, " \t");
#endif
}
/* See if we should print this line. */
if (zsystem != NULL
&& (csystem != clsys
|| strncmp (zsystem, zlsys, clsys) != 0))
continue;
if (zuser != NULL
&& (cuser != cluser
|| strncmp (zuser, zluser, cluser) != 0))
continue;
/* Output the line, or save it if we are outputting only a
particular number of lines. */
if (cshow <= 0)
printf ("%s", zline);
else
{
ubuffree ((pointer) pzshow[ishow]);
pzshow[ishow] = zbufcpy (zline);
ishow = (ishow + 1) % cshow;
}
}
/* Output the number of lines requested by the -n option. */
if (cshow > 0)
{
for (i = 0; i < cshow; i++)
{
if (pzshow[ishow] != NULL)
printf ("%s", pzshow[ishow]);
ishow = (ishow + 1) % cshow;
}
}
/* If -f was not specified, or an error occurred while reading
the file, get out. */
if (! fforever || ferror (e))
break;
clearerr (e);
cshow = 0;
/* Sleep 1 second before going around the loop again. */
usysdep_sleep (1);
}
(void) fclose (e);
ulog_close ();
usysdep_exit (TRUE);
/* Avoid errors about not returning a value. */
return 0;
}
/* Print a usage message and die. */
static void
ulusage ()
{
fprintf (stderr,
"Usage: %s [-n #] [-sf system] [-u user] [-xDSF] [-I file] [-X debug]\n",
zProgram);
fprintf (stderr, "Use %s --help for help\n", zProgram);
exit (EXIT_FAILURE);
}
/* Print a help message. */
static void
ulhelp ()
{
printf ("Taylor UUCP %s, copyright (C) 1991, 92, 93, 94, 1995 Ian Lance Taylor\n",
VERSION);
#if HAVE_HDB_LOGGING
printf ("Usage: %s [-n #] [-sf system] [-u user] [-xDS] [-I file] [-X debug]\n",
zProgram);
#else
printf ("Usage: %s [-n #] [-sf system] [-u user] [-DSF] [-I file] [-X debug]\n",
zProgram);
#endif
printf (" -n,--lines: show given number of lines from end of log\n");
printf (" -s,--system: print entries for named system\n");
printf (" -f system,--follow=system: follow entries for named system\n");
printf (" -u,--user user: print entries for named user\n");
#if HAVE_HDB_LOGGING
printf (" -x,--uuxqt: print uuxqt log rather than uucico log\n");
#else
printf (" -F,--follow: follow entries for any system\n");
#endif
printf (" -S,--statslog: show statistics file\n");
printf (" -D,--debuglog: show debugging file\n");
printf (" -X,--debug debug: Set debugging level\n");
#if HAVE_TAYLOR_CONFIG
printf (" -I,--config file: Set configuration file to use\n");
#endif /* HAVE_TAYLOR_CONFIG */
printf (" -v,--version: Print version and exit\n");
printf (" --help: Print help and exit\n");
}