Release FreeBSD 1.1upstream/1.1.0_cvsrelease/1.1.0_cvs

This commit was manufactured to restore the state of the 1.1-RELEASE image.
Releases prior to 5.3-RELEASE are omitting the secure/ and crypto/ subdirs.

1 files changed, 212 insertions, 0 deletions

diff --git a/gnu/libexec/uucp/libunix/status.c b/gnu/libexec/uucp/libunix/status.c
new file mode 100644
index 000000000000..f403068a7094
--- /dev/null
+++ b/gnu/libexec/uucp/libunix/status.c
@@ -0,0 +1,212 @@
+/* status.c
+   Routines to get and set the status for a system.
+
+   Copyright (C) 1991, 1992 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., 675 Mass Ave, Cambridge, MA 02139, USA.
+
+   The author of the program may be contacted at ian@airs.com or
+   c/o Infinity Development Systems, P.O. Box 520, Waltham, MA 02254.
+   */
+
+#include "uucp.h"
+
+#include "uudefs.h"
+#include "uuconf.h"
+#include "sysdep.h"
+#include "system.h"
+
+#include <errno.h>
+
+#if SPOOLDIR_HDB || SPOOLDIR_SVR4
+
+/* If we are using HDB spool layout, store status using HDB status
+   values.  SVR4 is a variant of HDB.  */
+
+#define MAP_STATUS 1
+
+static const int aiMapstatus[] =
+{
+  0, 13, 7, 6, 4, 20, 3, 2
+};
+#define CMAPENTRIES (sizeof (aiMapstatus) / sizeof (aiMapstatus[0]))
+
+#else /* ! SPOOLDIR_HDB && ! SPOOLDIR_SVR4 */
+
+#define MAP_STATUS 0
+
+#endif /* ! SPOOLDIR_HDB && ! SPOOLDIR_SVR4 */
+
+/* Get the status of a system.  This assumes that we are in the spool
+   directory.  */
+
+boolean
+fsysdep_get_status (qsys, qret, pfnone)
+     const struct uuconf_system *qsys;
+     struct sstatus *qret;
+     boolean *pfnone;
+{
+  char *zname;
+  FILE *e;
+  char *zline;
+  char *zend, *znext;
+  boolean fbad;
+  int istat;
+
+  if (pfnone != NULL)
+    *pfnone = FALSE;
+
+  zname = zsysdep_in_dir (".Status", qsys->uuconf_zname);
+  e = fopen (zname, "r");
+  if (e == NULL)
+    {
+      if (errno != ENOENT)
+	{
+	  ulog (LOG_ERROR, "fopen (%s): %s", zname, strerror (errno));
+	  ubuffree (zname);
+	  return FALSE;
+	}
+      zline = NULL;
+    }
+  else
+    {
+      size_t cline;
+
+      zline = NULL;
+      cline = 0;
+      if (getline (&zline, &cline, e) <= 0)
+	{
+	  xfree ((pointer) zline);
+	  zline = NULL;
+	}
+      (void) fclose (e);
+    }
+
+  if (zline == NULL)
+    {
+      /* There is either no status file for this system, or it's been
+	 truncated, so fake a good status.  */
+      qret->ttype = STATUS_COMPLETE;
+      qret->cretries = 0;
+      qret->ilast = 0;
+      qret->cwait = 0;
+      if (pfnone != NULL)
+	*pfnone = TRUE;
+      ubuffree (zname);
+      return TRUE;
+    }
+
+  /* It turns out that scanf is not used much in this program, so for
+     the benefit of small computers we avoid linking it in.  This is
+     basically
+
+     sscanf (zline, "%d %d %ld %d", &qret->ttype, &qret->cretries,
+             &qret->ilast, &qret->cwait);
+
+     except that it's done with strtol.  */
+
+  fbad = FALSE;
+  istat = (int) strtol (zline, &zend, 10);
+  if (zend == zline)
+    fbad = TRUE;
+
+#if MAP_STATUS
+  /* On some systems it may be appropriate to map system dependent status
+     values on to our status values.  */
+  {
+    int i;
+
+    for (i = 0; i < CMAPENTRIES; ++i)
+      {
+	if (aiMapstatus[i] == istat)
+	  {
+	    istat = i;
+	    break;
+	  }
+      }
+  }
+#endif /* MAP_STATUS */
+
+  if (istat < 0 || istat >= (int) STATUS_VALUES)
+    istat = (int) STATUS_COMPLETE;
+  qret->ttype = (enum tstatus_type) istat;
+  znext = zend;
+  qret->cretries = (int) strtol (znext, &zend, 10);
+  if (zend == znext)
+    fbad = TRUE;
+  znext = zend;
+  qret->ilast = strtol (znext, &zend, 10);
+  if (zend == znext)
+    fbad = TRUE;
+  znext = zend;
+  qret->cwait = (int) strtol (znext, &zend, 10);
+  if (zend == znext)
+    fbad = TRUE;
+
+  xfree ((pointer) zline);
+
+  if (fbad)
+    {
+      ulog (LOG_ERROR, "%s: Bad status file format", zname);
+      ubuffree (zname);
+      return FALSE;
+    }
+
+  ubuffree (zname);
+
+  return TRUE;
+}
+
+/* Set the status of a remote system.  This assumes the system is
+   locked when this is called, and that the program is in the spool
+   directory.  */
+
+boolean
+fsysdep_set_status (qsys, qset)
+     const struct uuconf_system *qsys;
+     const struct sstatus *qset;
+{
+  char *zname;
+  FILE *e;
+  int istat;
+
+  zname = zsysdep_in_dir (".Status", qsys->uuconf_zname);
+
+  e = esysdep_fopen (zname, TRUE, FALSE, TRUE);
+  ubuffree (zname);
+  if (e == NULL)
+    return FALSE;
+  istat = (int) qset->ttype;
+
+#if MAP_STATUS
+  /* On some systems it may be appropriate to map istat onto a system
+     dependent number.  */
+  if (istat >= 0 && istat < CMAPENTRIES)
+    istat = aiMapstatus[istat];
+#endif /* MAP_STATUS */
+
+  fprintf (e, "%d %d %ld %d %s %s\n", istat, qset->cretries,
+	   qset->ilast, qset->cwait, azStatus[(int) qset->ttype],
+	   qsys->uuconf_zname);
+  if (fclose (e) != 0)
+    {
+      ulog (LOG_ERROR, "fclose: %s", strerror (errno));
+      return FALSE;
+    }
+
+  return TRUE;
+}