1 /* $NetBSD: getrpcent.c,v 1.23 2013/03/11 20:19:29 tron Exp $ */
2
3 /*
4 * Copyright (c) 2010, Oracle America, Inc.
5 *
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions are
8 * met:
9 *
10 * * Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * * Redistributions in binary form must reproduce the above
13 * copyright notice, this list of conditions and the following
14 * disclaimer in the documentation and/or other materials
15 * provided with the distribution.
16 * * Neither the name of the "Oracle America, Inc." nor the names of its
17 * contributors may be used to endorse or promote products derived
18 * from this software without specific prior written permission.
19 *
20 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
21 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
22 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
23 * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
24 * COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT,
25 * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
27 * GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
28 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
29 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
30 * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
31 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
32 */
33
34 #include <sys/cdefs.h>
35 #if defined(LIBC_SCCS) && !defined(lint)
36 #if 0
37 static char *sccsid = "@(#)getrpcent.c 1.14 91/03/11 Copyr 1984 Sun Micro";
38 #else
39 __RCSID("$NetBSD: getrpcent.c,v 1.23 2013/03/11 20:19:29 tron Exp $");
40 #endif
41 #endif
42
43 /*
44 * Copyright (c) 1984 by Sun Microsystems, Inc.
45 */
46
47 #include "namespace.h"
48
49 #include <sys/types.h>
50
51 #include <netinet/in.h>
52 #include <arpa/inet.h>
53
54 #include <assert.h>
55 #include <netdb.h>
56 #include <stdio.h>
57 #include <stdlib.h>
58 #include <string.h>
59
60 #include <rpc/rpc.h>
61
62 #ifdef __weak_alias
63 __weak_alias(endrpcent,_endrpcent)
64 __weak_alias(getrpcbyname,_getrpcbyname)
65 __weak_alias(getrpcbynumber,_getrpcbynumber)
66 __weak_alias(getrpcent,_getrpcent)
67 __weak_alias(setrpcent,_setrpcent)
68 #endif
69
70 /*
71 * Internet version.
72 */
73 static struct rpcdata {
74 FILE *rpcf;
75 int stayopen;
76 #define MAXALIASES 35
77 char *rpc_aliases[MAXALIASES];
78 struct rpcent rpc;
79 char line[BUFSIZ+1];
80 } *rpcdata;
81
82 static struct rpcent *interpret(char *val, size_t len);
83
84 #define RPCDB "/etc/rpc"
85
86 static struct rpcdata *_rpcdata(void);
87
88 static struct rpcdata *
_rpcdata(void)89 _rpcdata(void)
90 {
91 struct rpcdata *d = rpcdata;
92
93 if (d == 0) {
94 d = (struct rpcdata *)calloc(1, sizeof (struct rpcdata));
95 rpcdata = d;
96 }
97 return (d);
98 }
99
100 struct rpcent *
getrpcbynumber(int number)101 getrpcbynumber(int number)
102 {
103 struct rpcent *rpc;
104
105 setrpcent(0);
106 while ((rpc = getrpcent()) != NULL) {
107 if (rpc->r_number == number)
108 break;
109 }
110 endrpcent();
111 return (rpc);
112 }
113
114 struct rpcent *
getrpcbyname(const char * name)115 getrpcbyname(const char *name)
116 {
117 struct rpcent *rpc;
118 char **rp;
119
120 _DIAGASSERT(name != NULL);
121
122 setrpcent(0);
123 while ((rpc = getrpcent()) != NULL) {
124 if (strcmp(rpc->r_name, name) == 0)
125 break;
126 for (rp = rpc->r_aliases; *rp != NULL; rp++) {
127 if (strcmp(*rp, name) == 0)
128 goto found;
129 }
130 }
131 found:
132 endrpcent();
133 return (rpc);
134 }
135
136 void
setrpcent(int f)137 setrpcent(int f)
138 {
139 struct rpcdata *d = _rpcdata();
140
141 if (d == 0)
142 return;
143 if (d->rpcf == NULL)
144 d->rpcf = fopen(RPCDB, "re");
145 else
146 rewind(d->rpcf);
147 d->stayopen |= f;
148 }
149
150 void
endrpcent(void)151 endrpcent(void)
152 {
153 struct rpcdata *d = _rpcdata();
154
155 if (d == 0)
156 return;
157 if (d->rpcf && !d->stayopen) {
158 fclose(d->rpcf);
159 d->rpcf = NULL;
160 }
161 }
162
163 struct rpcent *
getrpcent(void)164 getrpcent(void)
165 {
166 struct rpcdata *d = _rpcdata();
167
168 if (d == 0)
169 return(NULL);
170 if (d->rpcf == NULL && (d->rpcf = fopen(RPCDB, "re")) == NULL)
171 return (NULL);
172 if (fgets(d->line, BUFSIZ, d->rpcf) == NULL)
173 return (NULL);
174 return (interpret(d->line, strlen(d->line)));
175 }
176
177 static struct rpcent *
interpret(char * val,size_t len)178 interpret(char *val, size_t len)
179 {
180 struct rpcdata *d = _rpcdata();
181 char *p;
182 char *cp, **q;
183
184 _DIAGASSERT(val != NULL);
185
186 if (d == 0)
187 return (0);
188 (void) strncpy(d->line, val, len);
189 p = d->line;
190 d->line[len] = '\n';
191 if (*p == '#')
192 return (getrpcent());
193 cp = strpbrk(p, "#\n");
194 if (cp == NULL)
195 return (getrpcent());
196 *cp = '\0';
197 cp = strpbrk(p, " \t");
198 if (cp == NULL)
199 return (getrpcent());
200 *cp++ = '\0';
201 /* THIS STUFF IS INTERNET SPECIFIC */
202 d->rpc.r_name = d->line;
203 while (*cp == ' ' || *cp == '\t')
204 cp++;
205 d->rpc.r_number = atoi(cp);
206 q = d->rpc.r_aliases = d->rpc_aliases;
207 cp = strpbrk(cp, " \t");
208 if (cp != NULL)
209 *cp++ = '\0';
210 while (cp && *cp) {
211 if (*cp == ' ' || *cp == '\t') {
212 cp++;
213 continue;
214 }
215 if (q < &(d->rpc_aliases[MAXALIASES - 1]))
216 *q++ = cp;
217 cp = strpbrk(cp, " \t");
218 if (cp != NULL)
219 *cp++ = '\0';
220 }
221 *q = NULL;
222 return (&d->rpc);
223 }
224