text: /*	$NetBSD: getnetent.c,v 1.21 2012/03/20 17:44:18 matt Exp $	*/
  
  /*
   * Copyright (c) 1983, 1993
   *	The Regents of the University of California.  All rights reserved.
   *
   * Redistribution and use in source and binary forms, with or without
   * modification, are permitted provided that the following conditions
   * are met:
   * 1. Redistributions of source code must retain the above copyright
   *    notice, this list of conditions and the following disclaimer.
   * 2. Redistributions in binary form must reproduce the above copyright
   *    notice, this list of conditions and the following disclaimer in the
   *    documentation and/or other materials provided with the distribution.
   * 3. Neither the name of the University nor the names of its contributors
   *    may be used to endorse or promote products derived from this software
   *    without specific prior written permission.
   *
   * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
   * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
   * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
   * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
   * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
   * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
   * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
   * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
   * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
   * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
   * SUCH DAMAGE.
   *
   * Portions Copyright (c) 1993 Carlos Leandro and Rui Salgueiro
   *    Dep. Matematica Universidade de Coimbra, Portugal, Europe
   *
   * Permission to use, copy, modify, and distribute this software for any
   * purpose with or without fee is hereby granted, provided that the above
   * copyright notice and this permission notice appear in all copies.
   *
   * from getnetent.c   1.1 (Coimbra) 93/06/02
   */
  
  #include <sys/cdefs.h>
  #if defined(LIBC_SCCS) && !defined(lint)
  #if 0
  static char sccsid[] = "@(#)getnetent.c	8.1 (Berkeley) 6/4/93";
  static char rcsid[] = "Id: getnetent.c,v 8.4 1997/06/01 20:34:37 vixie Exp ";
  #else
  __RCSID("$NetBSD: getnetent.c,v 1.21 2012/03/20 17:44:18 matt Exp $");
  #endif
  #endif /* LIBC_SCCS and not lint */
  
  #include "namespace.h"
  #include <sys/types.h>
  #include <sys/socket.h>
  #include <netinet/in.h>
  #include <arpa/inet.h>
  #include <netdb.h>
  #include <stdio.h>
  #include <string.h>
  
  #ifdef __weak_alias
  __weak_alias(endnetent,_endnetent)
  __weak_alias(getnetent,_getnetent)
  __weak_alias(setnetent,_setnetent)
  #endif
  
  #define	MAXALIASES	35
  
  static FILE *netf;
  static char line[BUFSIZ+1];
  static struct netent net;
  static char *net_aliases[MAXALIASES];
  int _net_stayopen;
  
  static void __setnetent(int);
  static void __endnetent(void);
  
  void
  setnetent(int stayopen)
  {
  
  	sethostent(stayopen);
  	__setnetent(stayopen);
  }
  
  void
  endnetent(void)
  {
  
  	endhostent();
  	__endnetent();
  }
  
  static void
  __setnetent(int f)
  {
  
  	if (netf == NULL)
  		netf = fopen(_PATH_NETWORKS, "re");
  	else
  		rewind(netf);
  	_net_stayopen |= f;
  }
  
  static void
  __endnetent(void)
  {
  
  	if (netf) {
  		fclose(netf);
  		netf = NULL;
  	}
  	_net_stayopen = 0;
  }
  
  struct netent *
  getnetent(void)
  {
  	char *p;
  	register char *cp, **q;
  
  	if (netf == NULL && (netf = fopen(_PATH_NETWORKS, "re")) == NULL)
  		return (NULL);
  #if (defined(__sparc__) && defined(_LP64)) ||		\
      defined(__alpha__) ||				\
      (defined(__i386__) && defined(_LP64)) ||		\
      (defined(__sh__) && defined(_LP64))
  	net.__n_pad0 = 0;
  #endif
  again:
  	p = fgets(line, (int)sizeof line, netf);
  	if (p == NULL)
  		return (NULL);
  	if (*p == '#')
  		goto again;
  	cp = strpbrk(p, "#\n");
  	if (cp == NULL)
  		goto again;
  	*cp = '\0';
  	net.n_name = p;
  	cp = strpbrk(p, " \t");
  	if (cp == NULL)
  		goto again;
  	*cp++ = '\0';
  	while (*cp == ' ' || *cp == '\t')
  		cp++;
  	p = strpbrk(cp, " \t");
  	if (p != NULL)
  		*p++ = '\0';
  	net.n_net = inet_network(cp);
  	net.n_addrtype = AF_INET;
  	q = net.n_aliases = net_aliases;
  	if (p != NULL) {
  		cp = p;
  		while (cp && *cp) {
  			if (*cp == ' ' || *cp == '\t') {
  				cp++;
  				continue;
  			}
  			if (q < &net_aliases[MAXALIASES - 1])
  				*q++ = cp;
  			cp = strpbrk(cp, " \t");
  			if (cp != NULL)
  				*cp++ = '\0';
  		}
  	}
  	*q = NULL;
  	return (&net);
  }
  