gen.subproj/getservent.c

   1 /*
   2  * Copyright (c) 1999 Apple Computer, Inc. All rights reserved.
   3  *
   4  * @APPLE_LICENSE_HEADER_START@
   5  *
   6  * Portions Copyright (c) 1999 Apple Computer, Inc.  All Rights
   7  * Reserved.  This file contains Original Code and/or Modifications of
   8  * Original Code as defined in and that are subject to the Apple Public
   9  * Source License Version 1.1 (the "License").  You may not use this file
  10  * except in compliance with the License.  Please obtain a copy of the
  11  * License at http://www.apple.com/publicsource and read it before using
  12  * this file.
  13  *
  14  * The Original Code and all software distributed under the License are
  15  * distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, EITHER
  16  * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
  17  * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
  18  * FITNESS FOR A PARTICULAR PURPOSE OR NON- INFRINGEMENT.  Please see the
  19  * License for the specific language governing rights and limitations
  20  * under the License.
  21  *
  22  * @APPLE_LICENSE_HEADER_END@
  23  */
  24 /*
  25  * Copyright (c) 1983, 1993
  26  *      The Regents of the University of California.  All rights reserved.
  27  *
  28  * Redistribution and use in source and binary forms, with or without
  29  * modification, are permitted provided that the following conditions
  30  * are met:
  31  * 1. Redistributions of source code must retain the above copyright
  32  *    notice, this list of conditions and the following disclaimer.
  33  * 2. Redistributions in binary form must reproduce the above copyright
  34  *    notice, this list of conditions and the following disclaimer in the
  35  *    documentation and/or other materials provided with the distribution.
  36  * 3. All advertising materials mentioning features or use of this software
  37  *    must display the following acknowledgement:
  38  *      This product includes software developed by the University of
  39  *      California, Berkeley and its contributors.
  40  * 4. Neither the name of the University nor the names of its contributors
  41  *    may be used to endorse or promote products derived from this software
  42  *    without specific prior written permission.
  43  *
  44  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  45  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  46  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  47  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  48  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  49  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  50  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  51  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  52  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  53  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  54  * SUCH DAMAGE.
  55  */
  56
  57 #if defined(LIBC_SCCS) && !defined(lint)
  58 static char sccsid[] = "@(#)getservent.c        8.1 (Berkeley) 6/4/93";
  59 #endif /* LIBC_SCCS and not lint */
  60
  61 #include <sys/types.h>
  62 #include <sys/socket.h>
  63 #include <netdb.h>
  64 #include <stdio.h>
  65 #include <string.h>
  66 #include <stdlib.h>
  67
  68 #define MAXALIASES      35
  69
  70 static FILE *servf = NULL;
  71 static struct servent serv;
  72 static char *serv_aliases[MAXALIASES];
  73 int _serv_stayopen;
  74
  75 void
  76 setservent(f)
  77         int f;
  78 {
  79         if (servf == NULL)
  80                 servf = fopen(_PATH_SERVICES, "r" );
  81         else
  82                 rewind(servf);
  83         _serv_stayopen |= f;
  84 }
  85
  86 void
  87 endservent()
  88 {
  89         if (servf) {
  90                 fclose(servf);
  91                 servf = NULL;
  92         }
  93         _serv_stayopen = 0;
  94 }
  95
  96 struct servent *
  97 getservent()
  98 {
  99         char *p;
 100         static char *line = NULL;
 101         register char *cp, **q;
 102
 103         if (servf == NULL && (servf = fopen(_PATH_SERVICES, "r" )) == NULL)
 104                 return (NULL);
 105
 106         if (line == NULL) {
 107                 line = malloc(BUFSIZ+1);
 108                 if (line == NULL)
 109                         return (NULL);
 110         }
 111 again:
 112         if ((p = fgets(line, BUFSIZ, servf)) == NULL)
 113                 return (NULL);
 114         if (*p == '#')
 115                 goto again;
 116         cp = strpbrk(p, "#\n");
 117         if (cp == NULL)
 118                 goto again;
 119         *cp = '\0';
 120         serv.s_name = p;
 121         p = strpbrk(p, " \t");
 122         if (p == NULL)
 123                 goto again;
 124         *p++ = '\0';
 125         while (*p == ' ' || *p == '\t')
 126                 p++;
 127         cp = strpbrk(p, ",/");
 128         if (cp == NULL)
 129                 goto again;
 130         *cp++ = '\0';
 131         serv.s_port = htons((u_short)atoi(p));
 132         serv.s_proto = cp;
 133         q = serv.s_aliases = serv_aliases;
 134         cp = strpbrk(cp, " \t");
 135         if (cp != NULL)
 136                 *cp++ = '\0';
 137         while (cp && *cp) {
 138                 if (*cp == ' ' || *cp == '\t') {
 139                         cp++;
 140                         continue;
 141                 }
 142                 if (q < &serv_aliases[MAXALIASES - 1])
 143                         *q++ = cp;
 144                 cp = strpbrk(cp, " \t");
 145                 if (cp != NULL)
 146                         *cp++ = '\0';
 147         }
 148         *q = NULL;
 149         return (&serv);
 150 }