added LIBC_SCCS condition for sccs ids

[unix-history] / usr / src / lib / libc / net / getprotoname.c

/*
* Copyright (c) 1983 Regents of the University of California.
* All rights reserved.  The Berkeley software License Agreement
* specifies the terms and conditions for redistribution.
*/

#if defined(LIBC_SCCS) && !defined(lint)
static char sccsid[] = "@(#)getprotoname.c      5.2 (Berkeley) %G%";
#endif LIBC_SCCS and not lint

#include <netdb.h>

struct protoent *
getprotobyname(name)
       register char *name;
{
       register struct protoent *p;
       register char **cp;

       setprotoent(0);
       while (p = getprotoent()) {
               if (strcmp(p->p_name, name) == 0)
                       break;
               for (cp = p->p_aliases; *cp != 0; cp++)
                       if (strcmp(*cp, name) == 0)
                               goto found;
       }
found:
       endprotoent();
       return (p);
}