getrpcent.c revision 1.15 1 /* $NetBSD: getrpcent.c,v 1.15 1999/09/16 11:45:23 lukem Exp $ */
2
3 /*
4 * Sun RPC is a product of Sun Microsystems, Inc. and is provided for
5 * unrestricted use provided that this legend is included on all tape
6 * media and as a part of the software program in whole or part. Users
7 * may copy or modify Sun RPC without charge, but are not authorized
8 * to license or distribute it to anyone else except as part of a product or
9 * program developed by the user or with the express written consent of
10 * Sun Microsystems, Inc.
11 *
12 * SUN RPC IS PROVIDED AS IS WITH NO WARRANTIES OF ANY KIND INCLUDING THE
13 * WARRANTIES OF DESIGN, MERCHANTIBILITY AND FITNESS FOR A PARTICULAR
14 * PURPOSE, OR ARISING FROM A COURSE OF DEALING, USAGE OR TRADE PRACTICE.
15 *
16 * Sun RPC is provided with no support and without any obligation on the
17 * part of Sun Microsystems, Inc. to assist in its use, correction,
18 * modification or enhancement.
19 *
20 * SUN MICROSYSTEMS, INC. SHALL HAVE NO LIABILITY WITH RESPECT TO THE
21 * INFRINGEMENT OF COPYRIGHTS, TRADE SECRETS OR ANY PATENTS BY SUN RPC
22 * OR ANY PART THEREOF.
23 *
24 * In no event will Sun Microsystems, Inc. be liable for any lost revenue
25 * or profits or other special, indirect and consequential damages, even if
26 * Sun has been advised of the possibility of such damages.
27 *
28 * Sun Microsystems, Inc.
29 * 2550 Garcia Avenue
30 * Mountain View, California 94043
31 */
32
33 #include <sys/cdefs.h>
34 #if defined(LIBC_SCCS) && !defined(lint)
35 #if 0
36 static char *sccsid = "@(#)getrpcent.c 1.14 91/03/11 Copyr 1984 Sun Micro";
37 #else
38 __RCSID("$NetBSD: getrpcent.c,v 1.15 1999/09/16 11:45:23 lukem Exp $");
39 #endif
40 #endif
41
42 /*
43 * Copyright (c) 1984 by Sun Microsystems, Inc.
44 */
45
46 #include "namespace.h"
47
48 #include <sys/types.h>
49
50 #include <netinet/in.h>
51 #include <arpa/inet.h>
52
53 #include <assert.h>
54 #include <netdb.h>
55 #include <stdio.h>
56 #include <stdlib.h>
57 #include <string.h>
58
59 #include <rpc/rpc.h>
60
61 #ifdef __weak_alias
62 __weak_alias(endrpcent,_endrpcent);
63 __weak_alias(getrpcbyname,_getrpcbyname);
64 __weak_alias(getrpcbynumber,_getrpcbynumber);
65 __weak_alias(getrpcent,_getrpcent);
66 __weak_alias(setrpcent,_setrpcent);
67 #endif
68
69 /*
70 * Internet version.
71 */
72 static struct rpcdata {
73 FILE *rpcf;
74 int stayopen;
75 #define MAXALIASES 35
76 char *rpc_aliases[MAXALIASES];
77 struct rpcent rpc;
78 char line[BUFSIZ+1];
79 } *rpcdata;
80
81 static struct rpcent *interpret __P((char *val, size_t len));
82
83 #define RPCDB "/etc/rpc"
84
85 static struct rpcdata *_rpcdata __P((void));
86
87 static struct rpcdata *
88 _rpcdata()
89 {
90 struct rpcdata *d = rpcdata;
91
92 if (d == 0) {
93 d = (struct rpcdata *)calloc(1, sizeof (struct rpcdata));
94 rpcdata = d;
95 }
96 return (d);
97 }
98
99 struct rpcent *
100 getrpcbynumber(number)
101 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 *
115 getrpcbyname(name)
116 char *name;
117 {
118 struct rpcent *rpc;
119 char **rp;
120
121 _DIAGASSERT(name != NULL);
122 #ifdef _DIAGNOSTIC
123 if (name == NULL)
124 return (NULL);
125 #endif
126
127 setrpcent(0);
128 while ((rpc = getrpcent()) != NULL) {
129 if (strcmp(rpc->r_name, name) == 0)
130 break;
131 for (rp = rpc->r_aliases; *rp != NULL; rp++) {
132 if (strcmp(*rp, name) == 0)
133 break;
134 }
135 }
136 endrpcent();
137 return (rpc);
138 }
139
140 void
141 setrpcent(f)
142 int f;
143 {
144 struct rpcdata *d = _rpcdata();
145
146 if (d == 0)
147 return;
148 if (d->rpcf == NULL)
149 d->rpcf = fopen(RPCDB, "r");
150 else
151 rewind(d->rpcf);
152 d->stayopen |= f;
153 }
154
155 void
156 endrpcent()
157 {
158 struct rpcdata *d = _rpcdata();
159
160 if (d == 0)
161 return;
162 if (d->rpcf && !d->stayopen) {
163 fclose(d->rpcf);
164 d->rpcf = NULL;
165 }
166 }
167
168 struct rpcent *
169 getrpcent()
170 {
171 struct rpcdata *d = _rpcdata();
172
173 if (d == 0)
174 return(NULL);
175 if (d->rpcf == NULL && (d->rpcf = fopen(RPCDB, "r")) == NULL)
176 return (NULL);
177 if (fgets(d->line, BUFSIZ, d->rpcf) == NULL)
178 return (NULL);
179 return (interpret(d->line, strlen(d->line)));
180 }
181
182 static struct rpcent *
183 interpret(val, len)
184 char *val;
185 size_t len;
186 {
187 struct rpcdata *d = _rpcdata();
188 char *p;
189 char *cp, **q;
190
191 _DIAGASSERT(val != NULL);
192
193 if (d == 0)
194 return (0);
195 (void) strncpy(d->line, val, len);
196 p = d->line;
197 d->line[len] = '\n';
198 if (*p == '#')
199 return (getrpcent());
200 cp = strpbrk(p, "#\n");
201 if (cp == NULL)
202 return (getrpcent());
203 *cp = '\0';
204 cp = strpbrk(p, " \t");
205 if (cp == NULL)
206 return (getrpcent());
207 *cp++ = '\0';
208 /* THIS STUFF IS INTERNET SPECIFIC */
209 d->rpc.r_name = d->line;
210 while (*cp == ' ' || *cp == '\t')
211 cp++;
212 d->rpc.r_number = atoi(cp);
213 q = d->rpc.r_aliases = d->rpc_aliases;
214 cp = strpbrk(cp, " \t");
215 if (cp != NULL)
216 *cp++ = '\0';
217 while (cp && *cp) {
218 if (*cp == ' ' || *cp == '\t') {
219 cp++;
220 continue;
221 }
222 if (q < &(d->rpc_aliases[MAXALIASES - 1]))
223 *q++ = cp;
224 cp = strpbrk(cp, " \t");
225 if (cp != NULL)
226 *cp++ = '\0';
227 }
228 *q = NULL;
229 return (&d->rpc);
230 }
231