2 ** protocols.c /etc/protocols access functions
4 ** This file is part of the NYS Library.
6 ** The NYS Library is free software; you can redistribute it and/or
7 ** modify it under the terms of the GNU Library General Public License as
8 ** published by the Free Software Foundation; either version 2 of the
9 ** License, or (at your option) any later version.
11 ** The NYS Library is distributed in the hope that it will be useful,
12 ** but WITHOUT ANY WARRANTY; without even the implied warranty of
13 ** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 ** Library General Public License for more details.
16 ** You should have received a copy of the GNU Library General Public
17 ** License along with the NYS Library; see the file COPYING.LIB. If
18 ** not, write to the Free Software Foundation, Inc., 675 Mass Ave,
19 ** Cambridge, MA 02139, USA.
22 ** Copyright (c) 1983 Regents of the University of California.
23 ** All rights reserved.
25 ** Redistribution and use in source and binary forms, with or without
26 ** modification, are permitted provided that the following conditions
28 ** 1. Redistributions of source code must retain the above copyright
29 ** notice, this list of conditions and the following disclaimer.
30 ** 2. Redistributions in binary form must reproduce the above copyright
31 ** notice, this list of conditions and the following disclaimer in the
32 ** documentation and/or other materials provided with the distribution.
33 ** 3. All advertising materials mentioning features or use of this software
34 ** must display the following acknowledgement:
35 ** This product includes software developed by the University of
36 ** California, Berkeley and its contributors.
37 ** 4. Neither the name of the University nor the names of its contributors
38 ** may be used to endorse or promote products derived from this software
39 ** without specific prior written permission.
41 ** THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
42 ** ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
43 ** IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
44 ** ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
45 ** FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
46 ** DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
47 ** OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
48 ** HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
49 ** LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
50 ** OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
57 #include <sys/types.h>
58 #include <sys/socket.h>
65 libc_hidden_proto(fopen)
66 libc_hidden_proto(strcmp)
67 libc_hidden_proto(strpbrk)
68 libc_hidden_proto(atoi)
69 libc_hidden_proto(rewind)
70 libc_hidden_proto(fgets)
71 libc_hidden_proto(fclose)
72 libc_hidden_proto(abort)
74 #ifdef __UCLIBC_HAS_THREADS__
76 static pthread_mutex_t mylock = PTHREAD_RECURSIVE_MUTEX_INITIALIZER_NP;
78 #define LOCK __pthread_mutex_lock(&mylock)
79 #define UNLOCK __pthread_mutex_unlock(&mylock)
84 #define SBUFSIZE (BUFSIZ + 1 + (sizeof(char *) * MAXALIASES))
86 static FILE *protof = NULL;
87 static struct protoent proto;
88 static char *static_aliases = NULL;
89 static int proto_stayopen;
91 static void __initbuf(void)
93 if (!static_aliases) {
94 static_aliases = malloc(SBUFSIZE);
100 void setprotoent(int f)
104 protof = fopen(_PATH_PROTOCOLS, "r" );
110 libc_hidden_proto(setprotoent)
111 libc_hidden_def(setprotoent)
113 void endprotoent(void)
123 libc_hidden_proto(endprotoent)
124 libc_hidden_def(endprotoent)
126 int getprotoent_r(struct protoent *result_buf,
127 char *buf, size_t buflen,
128 struct protoent **result)
131 register char *cp, **q;
132 char **proto_aliases;
137 if (buflen < sizeof(*proto_aliases)*MAXALIASES) {
142 proto_aliases=(char **)buf;
143 buf+=sizeof(*proto_aliases)*MAXALIASES;
144 buflen-=sizeof(*proto_aliases)*MAXALIASES;
146 if (buflen < BUFSIZ+1) {
155 if (protof == NULL && (protof = fopen(_PATH_PROTOCOLS, "r" )) == NULL) {
160 if ((p = fgets(line, BUFSIZ, protof)) == NULL) {
167 cp = strpbrk(p, "#\n");
171 result_buf->p_name = p;
172 cp = strpbrk(p, " \t");
176 while (*cp == ' ' || *cp == '\t')
178 p = strpbrk(cp, " \t");
181 result_buf->p_proto = atoi(cp);
182 q = result_buf->p_aliases = proto_aliases;
186 if (*cp == ' ' || *cp == '\t') {
190 if (q < &proto_aliases[MAXALIASES - 1])
192 cp = strpbrk(cp, " \t");
202 libc_hidden_proto(getprotoent_r)
203 libc_hidden_def(getprotoent_r)
205 struct protoent * getprotoent(void)
207 struct protoent *result;
210 getprotoent_r(&proto, static_aliases, SBUFSIZE, &result);
215 int getprotobyname_r(const char *name,
216 struct protoent *result_buf,
217 char *buf, size_t buflen,
218 struct protoent **result)
224 setprotoent(proto_stayopen);
225 while (!(ret=getprotoent_r(result_buf, buf, buflen, result))) {
226 if (strcmp(result_buf->p_name, name) == 0)
228 for (cp = result_buf->p_aliases; *cp != 0; cp++)
229 if (strcmp(*cp, name) == 0)
236 return *result?0:ret;
238 libc_hidden_proto(getprotobyname_r)
239 libc_hidden_def(getprotobyname_r)
242 struct protoent * getprotobyname(const char *name)
244 struct protoent *result;
247 getprotobyname_r(name, &proto, static_aliases, SBUFSIZE, &result);
252 int getprotobynumber_r (int proto_num,
253 struct protoent *result_buf,
254 char *buf, size_t buflen,
255 struct protoent **result)
260 setprotoent(proto_stayopen);
261 while (!(ret=getprotoent_r(result_buf, buf, buflen, result)))
262 if (result_buf->p_proto == proto_num)
267 return *result?0:ret;
269 libc_hidden_proto(getprotobynumber_r)
270 libc_hidden_def(getprotobynumber_r)
272 struct protoent * getprotobynumber(int proto_num)
274 struct protoent *result;
277 getprotobynumber_r(proto_num, &proto, static_aliases,