Home | History | Annotate | Download | only in Src 
      1 /*
      2  * Copyright (c) 1983 Regents of the University of California.
      3  * All rights reserved.
      4  *
      5  * Redistribution and use in source and binary forms are permitted
      6  * provided that the above copyright notice and this paragraph are
      7  * duplicated in all such forms and that any documentation,
      8  * advertising materials, and other materials related to such
      9  * distribution and use acknowledge that the software was developed
     10  * by the University of California, Berkeley.  The name of the
     11  * University may not be used to endorse or promote products derived
     12  * from this software without specific prior written permission.
     13  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
     14  * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
     15  * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
     16  */
     17 
     18 #if defined(LIBC_SCCS) && !defined(lint)
     19 static char sccsid[] = "@(#)getnetent.c	5.5 (Berkeley) 6/27/88";
     20 #endif /* LIBC_SCCS and not lint */
     21 
     22 #include "inetprivate.h"
     23 
     24 #define	MAXALIASES	35
     25 
     26 static char NETDB[] = _PATH_NETWORKS;
     27 static FILE *netf = NULL;
     28 static char line[BUFSIZ+1];
     29 static struct netent net;
     30 static char *net_aliases[MAXALIASES];
     31 static char *any(char *, char *);
     32 
     33 int _net_stayopen;
     34 extern u_int32_t inet_network(const char *cp);
     35 
     36 void
     37 setnetent(f)
     38 	int f;
     39 {
     40 	if (netf == NULL)
     41 		netf = fopen(NETDB, "r" );
     42 	else
     43 		rewind(netf);
     44 	_net_stayopen |= f;
     45 }
     46 
     47 void
     48 endnetent()
     49 {
     50 	if (netf) {
     51 		fclose(netf);
     52 		netf = NULL;
     53 	}
     54 	_net_stayopen = 0;
     55 }
     56 
     57 struct netent *
     58 getnetent()
     59 {
     60 	char *p;
     61 	register char *cp, **q;
     62 
     63 	if (netf == NULL && (netf = fopen(NETDB, "r" )) == NULL)
     64 		return (NULL);
     65 again:
     66 	p = fgets(line, BUFSIZ, netf);
     67 	if (p == NULL)
     68 		return (NULL);
     69 	if (*p == '#')
     70 		goto again;
     71 	cp = any(p, "#\n");
     72 	if (cp == NULL)
     73 		goto again;
     74 	*cp = '\0';
     75 	net.n_name = p;
     76 	cp = any(p, " \t");
     77 	if (cp == NULL)
     78 		goto again;
     79 	*cp++ = '\0';
     80 	while (*cp == ' ' || *cp == '\t')
     81 		cp++;
     82 	p = any(cp, " \t");
     83 	if (p != NULL)
     84 		*p++ = '\0';
     85 	net.n_net = inet_network(cp);
     86 	net.n_addrtype = AF_INET;
     87 	q = net.n_aliases = net_aliases;
     88 	if (p != NULL)
     89 		cp = p;
     90 	while (cp && *cp) {
     91 		if (*cp == ' ' || *cp == '\t') {
     92 			cp++;
     93 			continue;
     94 		}
     95 		if (q < &net_aliases[MAXALIASES - 1])
     96 			*q++ = cp;
     97 		cp = any(cp, " \t");
     98 		if (cp != NULL)
     99 			*cp++ = '\0';
    100 	}
    101 	*q = NULL;
    102 	return (&net);
    103 }
    104 
    105 static char *
    106 any(cp, match)
    107 	register char *cp;
    108 	char *match;
    109 {
    110 	register char *mp, c;
    111 
    112 	while (c = *cp) {
    113 		for (mp = match; *mp; mp++)
    114 			if (*mp == c)
    115 				return (cp);
    116 		cp++;
    117 	}
    118 	return ((char *)0);
    119 }
    120