119 lines
2.5 KiB
C
119 lines
2.5 KiB
C
/*
|
|
* 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.
|
|
*/
|
|
|
|
#if defined(LIBC_SCCS) && !defined(lint)
|
|
static char sccsid[] = "@(#)getprotoent.c 5.5 (Berkeley) 6/27/88";
|
|
#endif /* LIBC_SCCS and not lint */
|
|
|
|
#include <stdio.h>
|
|
#include <sys/types.h>
|
|
#include <sys/socket.h>
|
|
#include <netdb.h>
|
|
#include <ctype.h>
|
|
|
|
#define MAXALIASES 35
|
|
|
|
static char PROTODB[] = "/etc/protocols";
|
|
static FILE *protof = NULL;
|
|
static char line[BUFSIZ+1];
|
|
static struct protoent proto;
|
|
static char *proto_aliases[MAXALIASES];
|
|
static char *any();
|
|
int _proto_stayopen;
|
|
|
|
setprotoent(f)
|
|
int f;
|
|
{
|
|
if (protof == NULL)
|
|
protof = fopen(PROTODB, "r" );
|
|
else
|
|
rewind(protof);
|
|
_proto_stayopen |= f;
|
|
}
|
|
|
|
endprotoent()
|
|
{
|
|
if (protof) {
|
|
fclose(protof);
|
|
protof = NULL;
|
|
}
|
|
_proto_stayopen = 0;
|
|
}
|
|
|
|
struct protoent *
|
|
getprotoent()
|
|
{
|
|
char *p;
|
|
register char *cp, **q;
|
|
|
|
if (protof == NULL && (protof = fopen(PROTODB, "r" )) == NULL)
|
|
return (NULL);
|
|
again:
|
|
if ((p = fgets(line, BUFSIZ, protof)) == NULL)
|
|
return (NULL);
|
|
if (*p == '#')
|
|
goto again;
|
|
cp = any(p, "#\n");
|
|
if (cp == NULL)
|
|
goto again;
|
|
*cp = '\0';
|
|
proto.p_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';
|
|
proto.p_proto = atoi(cp);
|
|
q = proto.p_aliases = proto_aliases;
|
|
if (p != NULL) {
|
|
cp = p;
|
|
while (cp && *cp) {
|
|
if (*cp == ' ' || *cp == '\t') {
|
|
cp++;
|
|
continue;
|
|
}
|
|
if (q < &proto_aliases[MAXALIASES - 1])
|
|
*q++ = cp;
|
|
cp = any(cp, " \t");
|
|
if (cp != NULL)
|
|
*cp++ = '\0';
|
|
}
|
|
}
|
|
*q = NULL;
|
|
return (&proto);
|
|
}
|
|
|
|
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);
|
|
}
|