home *** CD-ROM | disk | FTP | other *** search
- /*
- * 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.
- */
-
- #include <stdio.h>
- #include <sys/types.h>
- #include <sys/socket.h>
- #include <netdb.h>
- #include <ctype.h>
-
- #ifndef lint
- static char *RCSid = "$Id: gethostent.c,v 1.2 90/10/03 22:50:29 rogers Release $";
- #endif
-
- /*
- * Internet version.
- */
- #define MAXALIASES 35
- #define MAXADDRSIZE 14
-
- static FILE *hostf = NULL;
- static char line[BUFSIZ+1];
- static char hostaddr[MAXADDRSIZE];
- static struct hostent host;
- static char *host_aliases[MAXALIASES];
- static char *host_addrs[] = {
- hostaddr,
- NULL
- };
-
- /*
- * The following is shared with gethostnamadr.c
- */
-
- static char *any();
-
- #ifdef NOTUSEDINHOSTCVT
-
- mysethostent()
- {
- if (hostf != NULL)
- rewind(hostf);
- }
-
- myendhostent()
- {
- if (hostf != NULL) {
- (void)fclose(hostf);
- hostf = NULL;
- }
- }
- #endif /* NOTUSEDINHOSTCVT */
-
- struct hostent *
- mygethostent(fname)
- char *fname;
- {
- u_long inet_addr();
- char *p;
- register char *cp, **q;
-
- if (hostf == NULL && (hostf = fopen(fname, "r" )) == NULL)
- return (NULL);
- again:
- if ((p = fgets(line, BUFSIZ, hostf)) == NULL)
- return (NULL);
- if (*p == '#')
- goto again;
- cp = any(p, "#\n");
- if (cp == NULL)
- goto again;
- *cp = '\0';
- cp = any(p, " \t");
- if (cp == NULL)
- goto again;
- *cp++ = '\0';
- /* THIS STUFF IS INTERNET SPECIFIC */
- host.h_addr_list = host_addrs;
- *((u_long *)host.h_addr) = inet_addr(p);
- host.h_length = sizeof (u_long);
- host.h_addrtype = AF_INET;
- while (*cp == ' ' || *cp == '\t')
- cp++;
- host.h_name = cp;
- q = host.h_aliases = host_aliases;
- cp = any(cp, " \t");
- if (cp != NULL)
- *cp++ = '\0';
- while (cp && *cp) {
- if (*cp == ' ' || *cp == '\t') {
- cp++;
- continue;
- }
- if (q < &host_aliases[MAXALIASES - 1])
- *q++ = cp;
- cp = any(cp, " \t");
- if (cp != NULL)
- *cp++ = '\0';
- }
- *q = NULL;
- return (&host);
- }
-
- static char *
- any(cp, match)
- 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);
- }
-