--- /dev/null
+/*\r
+ * Copyright (c) 1983, 1993\r
+ * The Regents of the University of California. All rights reserved.\r
+ *\r
+ * Redistribution and use in source and binary forms, with or without\r
+ * modification, are permitted provided that the following conditions\r
+ * are met:\r
+ * 1. Redistributions of source code must retain the above copyright\r
+ * notice, this list of conditions and the following disclaimer.\r
+ * 2. Redistributions in binary form must reproduce the above copyright\r
+ * notice, this list of conditions and the following disclaimer in the\r
+ * documentation and/or other materials provided with the distribution.\r
+ * 3. All advertising materials mentioning features or use of this software\r
+ * must display the following acknowledgement:\r
+ * This product includes software developed by the University of\r
+ * California, Berkeley and its contributors.\r
+ * 4. Neither the name of the University nor the names of its contributors\r
+ * may be used to endorse or promote products derived from this software\r
+ * without specific prior written permission.\r
+ *\r
+ * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND\r
+ * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE\r
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE\r
+ * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE\r
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL\r
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS\r
+ * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)\r
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT\r
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY\r
+ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF\r
+ * SUCH DAMAGE.\r
+ */\r
+#if defined(LIBC_SCCS) && !defined(lint)\r
+static char sccsid[] = "@(#)getservbyname.c 8.1 (Berkeley) 6/4/93";\r
+#endif /* LIBC_SCCS and not lint */\r
+\r
+#include <netdb.h>\r
+#include <string.h>\r
+\r
+extern int _serv_stayopen;\r
+\r
+struct servent *\r
+getservbyname(IN const char *name, IN const char *proto)\r
+{\r
+ register struct servent *p;\r
+ register char **cp;\r
+\r
+#ifdef YP\r
+ extern char *___getservbyname_yp;\r
+ extern char *___getservbyproto_yp;\r
+\r
+ ___getservbyname_yp = (char *)name;\r
+ ___getservbyproto_yp = (char *)proto;\r
+#endif\r
+\r
+ setservent(_serv_stayopen);\r
+ while ( NULL != (p = getservent()) ) {\r
+ if (strcmp(name, p->s_name) == 0)\r
+ goto gotname;\r
+ for (cp = p->s_aliases; *cp; cp++)\r
+ if (strcmp(name, *cp) == 0)\r
+ goto gotname;\r
+ continue;\r
+gotname:\r
+ if (proto == 0 || strcmp(p->s_proto, proto) == 0)\r
+ break;\r
+ }\r
+ if (!_serv_stayopen)\r
+ endservent();\r
+\r
+#ifdef YP\r
+ ___getservbyname_yp = NULL;\r
+ ___getservbyproto_yp = NULL;\r
+#endif\r
+\r
+ return (p);\r
+}\r