summaryrefslogtreecommitdiff
path: root/gnu/libexec/uucp/libuuconf/tinit.c
diff options
context:
space:
mode:
Diffstat (limited to 'gnu/libexec/uucp/libuuconf/tinit.c')
-rw-r--r--gnu/libexec/uucp/libuuconf/tinit.c465
1 files changed, 465 insertions, 0 deletions
diff --git a/gnu/libexec/uucp/libuuconf/tinit.c b/gnu/libexec/uucp/libuuconf/tinit.c
new file mode 100644
index 00000000000..dcdc68f78ec
--- /dev/null
+++ b/gnu/libexec/uucp/libuuconf/tinit.c
@@ -0,0 +1,465 @@
+/* tinit.c
+ Initialize for reading Taylor UUCP configuration files.
+
+ Copyright (C) 1992, 1993, 1994, 1995 Ian Lance Taylor
+
+ This file is part of the Taylor UUCP uuconf library.
+
+ This library is free software; you can redistribute it and/or
+ modify it under the terms of the GNU Library General Public License
+ as published by the Free Software Foundation; either version 2 of
+ the License, or (at your option) any later version.
+
+ This library 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
+ Library General Public License for more details.
+
+ You should have received a copy of the GNU Library General Public
+ License along with this library; 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 "uucnfi.h"
+
+#if USE_RCS_ID
+const char _uuconf_tinit_rcsid[] = "$Id: tinit.c,v 1.1 1995/10/18 08:38:36 deraadt Exp $";
+#endif
+
+#include <errno.h>
+
+/* Local functions. */
+
+static int itset_default P((struct sglobal *qglobal, char ***ppzvar,
+ const char *zfile));
+static int itdebug P((pointer pglobal, int argc, char **argv, pointer pvar,
+ pointer pinfo));
+static int itaddfile P((pointer pglobal, int argc, char **argv, pointer pvar,
+ pointer pinfo));
+static int itunknown P((pointer pglobal, int argc, char **argv, pointer pvar,
+ pointer pinfo));
+static int itprogram P((pointer pglobal, int argc, char **argv, pointer pvar,
+ pointer pinfo));
+
+static const struct cmdtab_offset asCmds[] =
+{
+ { "nodename", UUCONF_CMDTABTYPE_STRING,
+ offsetof (struct sprocess, zlocalname), NULL },
+ { "hostname", UUCONF_CMDTABTYPE_STRING,
+ offsetof (struct sprocess, zlocalname), NULL },
+ { "uuname", UUCONF_CMDTABTYPE_STRING,
+ offsetof (struct sprocess, zlocalname), NULL },
+ { "spool", UUCONF_CMDTABTYPE_STRING,
+ offsetof (struct sprocess, zspooldir), NULL },
+ { "pubdir", UUCONF_CMDTABTYPE_STRING,
+ offsetof (struct sprocess, zpubdir), NULL },
+ { "lockdir", UUCONF_CMDTABTYPE_STRING,
+ offsetof (struct sprocess, zlockdir), NULL },
+ { "logfile", UUCONF_CMDTABTYPE_STRING,
+ offsetof (struct sprocess, zlogfile), NULL },
+ { "statfile", UUCONF_CMDTABTYPE_STRING,
+ offsetof (struct sprocess, zstatsfile), NULL },
+ { "debugfile", UUCONF_CMDTABTYPE_STRING,
+ offsetof (struct sprocess, zdebugfile), NULL },
+ { "debug", UUCONF_CMDTABTYPE_FN | 0,
+ offsetof (struct sprocess, zdebug), itdebug },
+ { "strip-login", UUCONF_CMDTABTYPE_BOOLEAN,
+ offsetof (struct sprocess, fstrip_login), NULL },
+ { "strip-proto", UUCONF_CMDTABTYPE_BOOLEAN,
+ offsetof (struct sprocess, fstrip_proto), NULL },
+ { "max-uuxqts", UUCONF_CMDTABTYPE_INT,
+ offsetof (struct sprocess, cmaxuuxqts), NULL },
+ { "run-uuxqt", UUCONF_CMDTABTYPE_STRING,
+ offsetof (struct sprocess, zrunuuxqt), NULL },
+ { "sysfile", UUCONF_CMDTABTYPE_FN | 0,
+ offsetof (struct sprocess, pzsysfiles), itaddfile },
+ { "portfile", UUCONF_CMDTABTYPE_FN | 0,
+ offsetof (struct sprocess, pzportfiles), itaddfile },
+ { "dialfile", UUCONF_CMDTABTYPE_FN | 0,
+ offsetof (struct sprocess, pzdialfiles), itaddfile },
+ { "dialcodefile", UUCONF_CMDTABTYPE_FN | 0,
+ offsetof (struct sprocess, pzdialcodefiles), itaddfile },
+ { "callfile", UUCONF_CMDTABTYPE_FN | 0,
+ offsetof (struct sprocess, pzcallfiles), itaddfile },
+ { "passwdfile", UUCONF_CMDTABTYPE_FN | 0,
+ offsetof (struct sprocess, pzpwdfiles), itaddfile },
+ { "unknown", UUCONF_CMDTABTYPE_FN, offsetof (struct sprocess, qunknown),
+ itunknown },
+ { "v2-files", UUCONF_CMDTABTYPE_BOOLEAN,
+ offsetof (struct sprocess, fv2), NULL },
+ { "hdb-files", UUCONF_CMDTABTYPE_BOOLEAN,
+ offsetof (struct sprocess, fhdb), NULL },
+ { "bnu-files", UUCONF_CMDTABTYPE_BOOLEAN,
+ offsetof (struct sprocess, fhdb), NULL },
+ { "timetable", UUCONF_CMDTABTYPE_FN | 3,
+ offsetof (struct sprocess, pztimetables), _uuconf_itimetable },
+ { NULL, 0, 0, NULL }
+};
+
+#define CCMDS (sizeof asCmds / sizeof asCmds[0])
+
+/* This structure is used to pass information into the command table
+ functions. */
+
+struct sinfo
+{
+ /* The program name. */
+ const char *zname;
+ /* A pointer to the command table being used, passed to isystem so
+ it can call uuconf_cmd_args. */
+ struct uuconf_cmdtab *qcmds;
+};
+
+/* Initialize the routines which read the Taylor UUCP configuration
+ files. */
+
+int
+uuconf_taylor_init (ppglobal, zprogram, zname)
+ pointer *ppglobal;
+ const char *zprogram;
+ const char *zname;
+{
+ struct sglobal **pqglobal = (struct sglobal **) ppglobal;
+ int iret;
+ char *zcopy;
+ struct sglobal *qglobal;
+ boolean fdefault;
+ FILE *e;
+ struct sinfo si;
+
+ if (*pqglobal == NULL)
+ {
+ iret = _uuconf_iinit_global (pqglobal);
+ if (iret != UUCONF_SUCCESS)
+ return iret;
+ }
+
+ qglobal = *pqglobal;
+
+ if (zname != NULL)
+ {
+ size_t csize;
+
+ csize = strlen (zname) + 1;
+ zcopy = uuconf_malloc (qglobal->pblock, csize);
+ if (zcopy == NULL)
+ {
+ qglobal->ierrno = errno;
+ return UUCONF_MALLOC_FAILED | UUCONF_ERROR_ERRNO;
+ }
+ memcpy ((pointer) zcopy, (pointer) zname, csize);
+ fdefault = FALSE;
+ }
+ else
+ {
+ zcopy = uuconf_malloc (qglobal->pblock,
+ sizeof NEWCONFIGLIB + sizeof CONFIGFILE - 1);
+ if (zcopy == NULL)
+ {
+ qglobal->ierrno = errno;
+ return UUCONF_MALLOC_FAILED | UUCONF_ERROR_ERRNO;
+ }
+ memcpy ((pointer) zcopy, (pointer) NEWCONFIGLIB,
+ sizeof NEWCONFIGLIB - 1);
+ memcpy ((pointer) (zcopy + sizeof NEWCONFIGLIB - 1),
+ (pointer) CONFIGFILE, sizeof CONFIGFILE);
+ fdefault = TRUE;
+ }
+
+ qglobal->qprocess->zconfigfile = zcopy;
+
+ e = fopen (zcopy, "r");
+ if (e == NULL)
+ {
+ if (! fdefault)
+ {
+ qglobal->ierrno = errno;
+ qglobal->zfilename = zcopy;
+ return (UUCONF_FOPEN_FAILED
+ | UUCONF_ERROR_ERRNO
+ | UUCONF_ERROR_FILENAME);
+ }
+
+ /* There is no config file, so just use the default values. */
+ }
+ else
+ {
+ struct uuconf_cmdtab as[CCMDS];
+
+ _uuconf_ucmdtab_base (asCmds, CCMDS, (char *) qglobal->qprocess,
+ as);
+
+ if (zprogram == NULL)
+ zprogram = "uucp";
+
+ si.zname = zprogram;
+ si.qcmds = as;
+ iret = uuconf_cmd_file (qglobal, e, as, (pointer) &si, itprogram,
+ UUCONF_CMDTABFLAG_BACKSLASH,
+ qglobal->pblock);
+
+ (void) fclose (e);
+
+ if (iret != UUCONF_SUCCESS)
+ {
+ qglobal->zfilename = zcopy;
+ return iret | UUCONF_ERROR_FILENAME;
+ }
+ }
+
+ /* Get the defaults for the file names. */
+
+ iret = itset_default (qglobal, &qglobal->qprocess->pzsysfiles, SYSFILE);
+ if (iret != UUCONF_SUCCESS)
+ return iret;
+ iret = itset_default (qglobal, &qglobal->qprocess->pzportfiles, PORTFILE);
+ if (iret != UUCONF_SUCCESS)
+ return iret;
+ iret = itset_default (qglobal, &qglobal->qprocess->pzdialfiles, DIALFILE);
+ if (iret != UUCONF_SUCCESS)
+ return iret;
+ iret = itset_default (qglobal, &qglobal->qprocess->pzdialcodefiles,
+ DIALCODEFILE);
+ if (iret != UUCONF_SUCCESS)
+ return iret;
+ iret = itset_default (qglobal, &qglobal->qprocess->pzpwdfiles, PASSWDFILE);
+ if (iret != UUCONF_SUCCESS)
+ return iret;
+ iret = itset_default (qglobal, &qglobal->qprocess->pzcallfiles, CALLFILE);
+ if (iret != UUCONF_SUCCESS)
+ return iret;
+
+ return UUCONF_SUCCESS;
+}
+
+/* Local interface to the _uuconf_idebug_cmd function, which handles
+ the "debug" command. */
+
+static int
+itdebug (pglobal, argc, argv, pvar, pinfo)
+ pointer pglobal;
+ int argc;
+ char **argv;
+ pointer pvar;
+ pointer pinfo;
+{
+ struct sglobal *qglobal = (struct sglobal *) pglobal;
+ char **pzdebug = (char **) pvar;
+
+ return _uuconf_idebug_cmd (qglobal, pzdebug, argc, argv,
+ qglobal->pblock);
+}
+
+/* Add new filenames to a list of files. */
+
+/*ARGSUSED*/
+static int
+itaddfile (pglobal, argc, argv, pvar, pinfo)
+ pointer pglobal;
+ int argc;
+ char **argv;
+ pointer pvar;
+ pointer pinfo;
+{
+ struct sglobal *qglobal = (struct sglobal *) pglobal;
+ char ***ppz = (char ***) pvar;
+ int i;
+ int iret;
+
+ if (argc == 1)
+ {
+ iret = _uuconf_iadd_string (qglobal, NULL, FALSE, FALSE, ppz,
+ qglobal->pblock);
+ if (iret != UUCONF_SUCCESS)
+ return iret;
+ }
+ else
+ {
+ for (i = 1; i < argc; i++)
+ {
+ char *z;
+ boolean fallocated;
+
+ MAKE_ABSOLUTE (z, fallocated, argv[i], NEWCONFIGLIB,
+ qglobal->pblock);
+ if (z == NULL)
+ {
+ qglobal->ierrno = errno;
+ return (UUCONF_MALLOC_FAILED
+ | UUCONF_ERROR_ERRNO
+ | UUCONF_CMDTABRET_EXIT);
+ }
+ iret = _uuconf_iadd_string (qglobal, z, ! fallocated, FALSE, ppz,
+ qglobal->pblock);
+ if (iret != UUCONF_SUCCESS)
+ return iret;
+ }
+ }
+
+ return UUCONF_CMDTABRET_CONTINUE;
+}
+
+/* Handle an "unknown" command. We accumulate this into a linked
+ list, and only parse them later in uuconf_unknown_system_info. */
+
+/*ARGSUSED*/
+static int
+itunknown (pglobal, argc, argv, pvar, pinfo)
+ pointer pglobal;
+ int argc;
+ char **argv;
+ pointer pvar;
+ pointer pinfo;
+{
+ struct sglobal *qglobal = (struct sglobal *) pglobal;
+ struct sunknown **pq = (struct sunknown **) pvar;
+ struct sunknown *q;
+
+ q = (struct sunknown *) uuconf_malloc (qglobal->pblock,
+ sizeof (struct sunknown));
+ if (q == NULL)
+ {
+ qglobal->ierrno = errno;
+ return (UUCONF_MALLOC_FAILED
+ | UUCONF_ERROR_ERRNO
+ | UUCONF_CMDTABRET_EXIT);
+ }
+ q->qnext = NULL;
+ q->ilineno = qglobal->ilineno;
+ q->cargs = argc - 1;
+ q->pzargs = (char **) uuconf_malloc (qglobal->pblock,
+ (argc - 1) * sizeof (char *));
+ if (q->pzargs == NULL)
+ {
+ qglobal->ierrno = errno;
+ return (UUCONF_MALLOC_FAILED
+ | UUCONF_ERROR_ERRNO
+ | UUCONF_CMDTABRET_EXIT);
+ }
+ memcpy ((pointer) q->pzargs, (pointer) (argv + 1),
+ (argc - 1) * sizeof (char *));
+
+ while (*pq != NULL)
+ pq = &(*pq)->qnext;
+
+ *pq = q;
+
+ return UUCONF_CMDTABRET_KEEP;
+}
+
+/* If we encounter an unknown command, see if it is the program with
+ which we were invoked. If it was, pass the remaining arguments
+ back through the table. */
+
+/*ARGSUSED*/
+static int
+itprogram (pglobal, argc, argv, pvar, pinfo)
+ pointer pglobal;
+ int argc;
+ char **argv;
+ pointer pvar;
+ pointer pinfo;
+{
+ struct sglobal *qglobal = (struct sglobal *) pglobal;
+ struct sinfo *qinfo = (struct sinfo *) pinfo;
+
+ if (argc <= 1
+ || strcasecmp (qinfo->zname, argv[0]) != 0)
+ return UUCONF_CMDTABRET_CONTINUE;
+
+ return uuconf_cmd_args (pglobal, argc - 1, argv + 1, qinfo->qcmds,
+ (pointer) NULL, (uuconf_cmdtabfn) NULL, 0,
+ qglobal->pblock);
+}
+
+/* If a filename was not set by the configuration file, add in the
+ default value. */
+
+static int
+itset_default (qglobal, ppzvar, zfile)
+ struct sglobal *qglobal;
+ char ***ppzvar;
+ const char *zfile;
+{
+ size_t clen;
+ char *zadd;
+
+ if (*ppzvar != NULL)
+ return UUCONF_SUCCESS;
+
+ clen = strlen (zfile);
+ zadd = (char *) uuconf_malloc (qglobal->pblock,
+ sizeof NEWCONFIGLIB + clen);
+ if (zadd == NULL)
+ {
+ qglobal->ierrno = errno;
+ return UUCONF_MALLOC_FAILED | UUCONF_ERROR_ERRNO;
+ }
+
+ memcpy ((pointer) zadd, (pointer) NEWCONFIGLIB, sizeof NEWCONFIGLIB - 1);
+ memcpy ((pointer) (zadd + sizeof NEWCONFIGLIB - 1), (pointer) zfile,
+ clen + 1);
+
+ return _uuconf_iadd_string (qglobal, zadd, FALSE, FALSE, ppzvar,
+ qglobal->pblock);
+}
+
+/* Handle the "debug" command which is documented to take multiple
+ arguments. This is also called by the ``debug'' command in a sys
+ file. It returns a CMDTABRET code. This should probably be in its
+ own file, but the only other place it is called is from tsinfo.c,
+ and any user of tsinfo.c it sure to link in this file as well. */
+
+int
+_uuconf_idebug_cmd (qglobal, pzdebug, argc, argv, pblock)
+ struct sglobal *qglobal;
+ char **pzdebug;
+ int argc;
+ char **argv;
+ pointer pblock;
+{
+ if (argc == 1)
+ {
+ *pzdebug = NULL;
+ return UUCONF_CMDTABRET_CONTINUE;
+ }
+ else if (argc == 2)
+ {
+ *pzdebug = argv[1];
+ return UUCONF_CMDTABRET_KEEP;
+ }
+ else
+ {
+ size_t cdebug;
+ int i;
+ char *zdebug;
+
+ cdebug = 0;
+ for (i = 1; i < argc; i++)
+ cdebug += strlen (argv[i]) + 1;
+ zdebug = (char *) uuconf_malloc (pblock, cdebug);
+ if (zdebug == NULL)
+ {
+ qglobal->ierrno = errno;
+ return (UUCONF_MALLOC_FAILED
+ | UUCONF_ERROR_ERRNO
+ | UUCONF_CMDTABRET_EXIT);
+ }
+ cdebug = 0;
+ for (i = 1; i < argc; i++)
+ {
+ size_t clen;
+
+ clen = strlen (argv[i]);
+ memcpy (zdebug + cdebug, argv[i], clen);
+ zdebug[cdebug + clen] = ' ';
+ cdebug += clen + 1;
+ }
+ zdebug[cdebug - 1] = '\0';
+ *pzdebug = zdebug;
+ return UUCONF_CMDTABRET_CONTINUE;
+ }
+}
generated by cgit v1.2.3 (git 2.25.1) at 2025-01-26 14:15:30 +0000