/* * Copyright (c) 1983 Regents of the University of California. * All rights reserved. * * Redistribution and use in source and binary forms are permitted * provided that the above copyright notice and this paragraph are * duplicated in all such forms and that any documentation, * advertising materials, and other materials related to such * distribution and use acknowledge that the software was developed * by the University of California, Berkeley. The name of the * University may not be used to endorse or promote products derived * from this software without specific prior written permission. * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE. */ #define __FORCE_GLIBC #include <features.h> #include <stdio.h> #include <stdlib.h> #include <netdb.h> #include <arpa/inet.h> libc_hidden_proto(fopen) libc_hidden_proto(fclose) libc_hidden_proto(inet_network) libc_hidden_proto(rewind) libc_hidden_proto(fgets) libc_hidden_proto(abort) #ifdef __UCLIBC_HAS_THREADS__ # include <pthread.h> static pthread_mutex_t mylock = PTHREAD_MUTEX_INITIALIZER; #endif #define LOCK __pthread_mutex_lock(&mylock) #define UNLOCK __pthread_mutex_unlock(&mylock) #define MAXALIASES 35 static const char NETDB[] = _PATH_NETWORKS; static FILE *netf = NULL; static char *line = NULL; static struct netent net; static char *net_aliases[MAXALIASES]; int _net_stayopen attribute_hidden; libc_hidden_proto(setnetent) void setnetent(int f) { LOCK; if (netf == NULL) netf = fopen(NETDB, "r" ); else rewind(netf); _net_stayopen |= f; UNLOCK; return; } libc_hidden_def(setnetent) libc_hidden_proto(endnetent) void endnetent(void) { LOCK; if (netf) { fclose(netf); netf = NULL; } _net_stayopen = 0; UNLOCK; } libc_hidden_def(endnetent) static char * any(register char *cp, char *match) { register char *mp, c; while ((c = *cp)) { for (mp = match; *mp; mp++) if (*mp == c) return (cp); cp++; } return ((char *)0); } libc_hidden_proto(getnetent) struct netent *getnetent(void) { char *p; register char *cp, **q; LOCK; if (netf == NULL && (netf = fopen(NETDB, "r" )) == NULL) { UNLOCK; return (NULL); } again: if (!line) { line = malloc(BUFSIZ + 1); if (!line) abort(); } p = fgets(line, BUFSIZ, netf); if (p == NULL) { UNLOCK; return (NULL); } if (*p == '#') goto again; cp = any(p, "#\n"); if (cp == NULL) goto again; *cp = '\0'; net.n_name = p; cp = any(p, " \t"); if (cp == NULL) goto again; *cp++ = '\0'; while (*cp == ' ' || *cp == '\t') cp++; p = any(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 = any(cp, " \t"); if (cp != NULL) *cp++ = '\0'; } *q = NULL; UNLOCK; return (&net); } libc_hidden_def(getnetent)