Return to diacod.c CVS log

Up to [MW Coherent from dump] / coherent / g / usr / lib / uucp / tay104 / uuconf

Annotation of coherent/g/usr/lib/uucp/tay104/uuconf/diacod.c, revision 1.1

1.1     ! root        1: /* diacod.c
        !             2:    Translate a dialcode.
        !             3: 
        !             4:    Copyright (C) 1992 Ian Lance Taylor
        !             5: 
        !             6:    This file is part of the Taylor UUCP uuconf library.
        !             7: 
        !             8:    This library is free software; you can redistribute it and/or
        !             9:    modify it under the terms of the GNU Library General Public License
        !            10:    as published by the Free Software Foundation; either version 2 of
        !            11:    the License, or (at your option) any later version.
        !            12: 
        !            13:    This library is distributed in the hope that it will be useful, but
        !            14:    WITHOUT ANY WARRANTY; without even the implied warranty of
        !            15:    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
        !            16:    Library General Public License for more details.
        !            17: 
        !            18:    You should have received a copy of the GNU Library General Public
        !            19:    License along with this library; if not, write to the Free Software
        !            20:    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
        !            21: 
        !            22:    The author of the program may be contacted at [email protected] or
        !            23:    c/o Infinity Development Systems, P.O. Box 520, Waltham, MA 02254.
        !            24:    */
        !            25: 
        !            26: #include "uucnfi.h"
        !            27: 
        !            28: #if USE_RCS_ID
        !            29: const char _uuconf_diacod_rcsid[] = "$Id: diacod.c,v 1.1 93/07/30 08:07:07 bin Exp Locker: bin $";
        !            30: #endif
        !            31: 
        !            32: #include <errno.h>
        !            33: 
        !            34: static int idcode P((pointer pglobal, int argc, char **argv,
        !            35:                     pointer pinfo, pointer pvar));
        !            36: 
        !            37: /* Get the name of the UUCP log file.  */
        !            38: 
        !            39: int
        !            40: uuconf_dialcode (pglobal, zdial, pznum)
        !            41:      pointer pglobal;
        !            42:      const char *zdial;
        !            43:      char **pznum;
        !            44: {
        !            45:   struct sglobal *qglobal = (struct sglobal *) pglobal;
        !            46:   struct uuconf_cmdtab as[2];
        !            47:   char **pz;
        !            48:   int iret;
        !            49: 
        !            50:   as[0].uuconf_zcmd = zdial;
        !            51:   as[0].uuconf_itype = UUCONF_CMDTABTYPE_FN | 0;
        !            52:   as[0].uuconf_pvar = (pointer) pznum;
        !            53:   as[0].uuconf_pifn = idcode;
        !            54: 
        !            55:   as[1].uuconf_zcmd = NULL;
        !            56: 
        !            57:   *pznum = NULL;
        !            58: 
        !            59:   iret = UUCONF_SUCCESS;
        !            60: 
        !            61:   for (pz = qglobal->qprocess->pzdialcodefiles; *pz != NULL; pz++)
        !            62:     {
        !            63:       FILE *e;
        !            64: 
        !            65:       e = fopen (*pz, "r");
        !            66:       if (e == NULL)
        !            67:        {
        !            68:          if (FNO_SUCH_FILE ())
        !            69:            continue;
        !            70:          qglobal->ierrno = errno;
        !            71:          iret = UUCONF_FOPEN_FAILED | UUCONF_ERROR_ERRNO;
        !            72:          break;
        !            73:        }
        !            74: 
        !            75:       iret = uuconf_cmd_file (pglobal, e, as, (pointer) NULL,
        !            76:                              (uuconf_cmdtabfn) NULL, 0, (pointer) NULL);
        !            77:       (void) fclose (e);
        !            78: 
        !            79:       if (iret != UUCONF_SUCCESS || *pznum != NULL)
        !            80:        break;
        !            81:     }
        !            82: 
        !            83:   if (iret != UUCONF_SUCCESS)
        !            84:     {
        !            85:       qglobal->zfilename = *pz;
        !            86:       iret |= UUCONF_ERROR_FILENAME;
        !            87:     }
        !            88:   else if (*pznum == NULL)
        !            89:     iret = UUCONF_NOT_FOUND;
        !            90: 
        !            91:   return iret;
        !            92: }
        !            93: 
        !            94: /* This is called if the dialcode is found.  It copies the number into
        !            95:    the heap and gets out of reading the file.  */
        !            96: 
        !            97: /*ARGSUSED*/
        !            98: static int
        !            99: idcode (pglobal, argc, argv, pvar, pinfo)
        !           100:      pointer pglobal;
        !           101:      int argc;
        !           102:      char **argv;
        !           103:      pointer pvar;
        !           104:      pointer pinfo;
        !           105: {
        !           106:   struct sglobal *qglobal = (struct sglobal *) pglobal;
        !           107:   char **pznum = (char **) pvar;
        !           108: 
        !           109:   if (argc == 1)
        !           110:     {
        !           111:       *pznum = malloc (1);
        !           112:       if (*pznum != NULL)
        !           113:        **pznum = '\0';
        !           114:     }
        !           115:   else if (argc == 2)
        !           116:     *pznum = strdup (argv[1]);
        !           117:   else
        !           118:     return UUCONF_SYNTAX_ERROR | UUCONF_CMDTABRET_EXIT;
        !           119: 
        !           120:   if (*pznum == NULL)
        !           121:     {
        !           122:       qglobal->ierrno = errno;
        !           123:       return (UUCONF_MALLOC_FAILED
        !           124:              | UUCONF_ERROR_ERRNO
        !           125:              | UUCONF_CMDTABRET_EXIT);
        !           126:     }
        !           127: 
        !           128:   return UUCONF_CMDTABRET_EXIT;
        !           129: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.