122 lines
2.6 KiB
C
122 lines
2.6 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[] = "@(#)getservent.c 5.6 (Berkeley) 6/27/88";
|
|
#endif /* LIBC_SCCS and not lint */
|
|
|
|
#include <stdio.h>
|
|
#include <sys/param.h>
|
|
#include <sys/types.h>
|
|
#include <sys/socket.h>
|
|
#include <netdb.h>
|
|
#include <ctype.h>
|
|
|
|
#define MAXALIASES 35
|
|
|
|
static char SERVDB[] = "/etc/services";
|
|
static FILE *servf = NULL;
|
|
static char line[BUFSIZ+1];
|
|
static struct servent serv;
|
|
static char *serv_aliases[MAXALIASES];
|
|
static char *any();
|
|
int _serv_stayopen;
|
|
|
|
setservent(f)
|
|
int f;
|
|
{
|
|
if (servf == NULL)
|
|
servf = fopen(SERVDB, "r" );
|
|
else
|
|
rewind(servf);
|
|
_serv_stayopen |= f;
|
|
}
|
|
|
|
endservent()
|
|
{
|
|
if (servf) {
|
|
fclose(servf);
|
|
servf = NULL;
|
|
}
|
|
_serv_stayopen = 0;
|
|
}
|
|
|
|
struct servent *
|
|
getservent()
|
|
{
|
|
char *p;
|
|
register char *cp, **q;
|
|
|
|
if (servf == NULL && (servf = fopen(SERVDB, "r" )) == NULL)
|
|
return (NULL);
|
|
again:
|
|
if ((p = fgets(line, BUFSIZ, servf)) == NULL)
|
|
return (NULL);
|
|
if (*p == '#')
|
|
goto again;
|
|
cp = any(p, "#\n");
|
|
if (cp == NULL)
|
|
goto again;
|
|
*cp = '\0';
|
|
serv.s_name = p;
|
|
p = any(p, " \t");
|
|
if (p == NULL)
|
|
goto again;
|
|
*p++ = '\0';
|
|
while (*p == ' ' || *p == '\t')
|
|
p++;
|
|
cp = any(p, ",/");
|
|
if (cp == NULL)
|
|
goto again;
|
|
*cp++ = '\0';
|
|
serv.s_port = htons((u_short)atoi(p));
|
|
serv.s_proto = cp;
|
|
q = serv.s_aliases = serv_aliases;
|
|
cp = any(cp, " \t");
|
|
if (cp != NULL)
|
|
*cp++ = '\0';
|
|
while (cp && *cp) {
|
|
if (*cp == ' ' || *cp == '\t') {
|
|
cp++;
|
|
continue;
|
|
}
|
|
if (q < &serv_aliases[MAXALIASES - 1])
|
|
*q++ = cp;
|
|
cp = any(cp, " \t");
|
|
if (cp != NULL)
|
|
*cp++ = '\0';
|
|
}
|
|
*q = NULL;
|
|
return (&serv);
|
|
}
|
|
|
|
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);
|
|
}
|