OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [rtos/] [rtems/] [c/] [src/] [librpc/] [src/] [rpc/] [getrpcent.c] - Blame information for rev 593

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 30 unneback 
/*
2 
 * Sun RPC is a product of Sun Microsystems, Inc. and is provided for
3 
 * unrestricted use provided that this legend is included on all tape
4 
 * media and as a part of the software program in whole or part.  Users
5 
 * may copy or modify Sun RPC without charge, but are not authorized
6 
 * to license or distribute it to anyone else except as part of a product or
7 
 * program developed by the user or with the express written consent of
8 
 * Sun Microsystems, Inc.
9 
 *
10 
 * SUN RPC IS PROVIDED AS IS WITH NO WARRANTIES OF ANY KIND INCLUDING THE
11 
 * WARRANTIES OF DESIGN, MERCHANTIBILITY AND FITNESS FOR A PARTICULAR
12 
 * PURPOSE, OR ARISING FROM A COURSE OF DEALING, USAGE OR TRADE PRACTICE.
13 
 *
14 
 * Sun RPC is provided with no support and without any obligation on the
15 
 * part of Sun Microsystems, Inc. to assist in its use, correction,
16 
 * modification or enhancement.
17 
 *
18 
 * SUN MICROSYSTEMS, INC. SHALL HAVE NO LIABILITY WITH RESPECT TO THE
19 
 * INFRINGEMENT OF COPYRIGHTS, TRADE SECRETS OR ANY PATENTS BY SUN RPC
20 
 * OR ANY PART THEREOF.
21 
 *
22 
 * In no event will Sun Microsystems, Inc. be liable for any lost revenue
23 
 * or profits or other special, indirect and consequential damages, even if
24 
 * Sun has been advised of the possibility of such damages.
25 
 *
26 
 * Sun Microsystems, Inc.
27 
 * 2550 Garcia Avenue
28 
 * Mountain View, California  94043
29 
 */
30 
 
31 
#if defined(LIBC_SCCS) && !defined(lint)
32 
/*static char *sccsid = "from: @(#)getrpcent.c 1.14 91/03/11 Copyr 1984 Sun Micro";*/
33 
static char *rcsid = "$FreeBSD: src/lib/libc/rpc/getrpcent.c,v 1.10 1999/08/28 00:00:39 peter Exp $";
34 
#endif
35 
 
36 
/*
37 
 * Copyright (c) 1984 by Sun Microsystems, Inc.
38 
 */
39 
 
40 
#include <stdio.h>
41 
#include <stdlib.h>
42 
#include <sys/types.h>
43 
#include <string.h>
44 
#include <rpc/rpc.h>
45 
#ifdef YP
46 
#include <rpcsvc/yp_prot.h>
47 
#include <rpcsvc/ypclnt.h>
48 
#endif
49 
 
50 
/*
51 
 * Internet version.
52 
 */
53 
struct rpcdata {
54 
        FILE    *rpcf;
55 
        int     stayopen;
56 
#define MAXALIASES      35
57 
        char    *rpc_aliases[MAXALIASES];
58 
        struct  rpcent rpc;
59 
        char    line[BUFSIZ+1];
60 
#ifdef  YP
61 
        char    *domain;
62 
        char    *current;
63 
        int     currentlen;
64 
#endif
65 
} *rpcdata;
66 
 
67 
#ifdef  YP
68 
static int      __yp_nomap = 0;
69 
extern int _yp_check(char **);
70 
#endif  /* YP */
71 
 
72 
static  struct rpcent *interpret();
73 
struct  hostent *gethostent();
74 
char    *inet_ntoa();
75 
 
76 
static char RPCDB[] = "/etc/rpc";
77 
 
78 
static struct rpcdata *
79 
_rpcdata()
80 
{
81 
        register struct rpcdata *d = rpcdata;
82 
 
83 
        if (d == 0) {
84 
                d = (struct rpcdata *)calloc(1, sizeof (struct rpcdata));
85 
                rpcdata = d;
86 
        }
87 
        return (d);
88 
}
89 
 
90 
struct rpcent *
91 
getrpcbynumber(number)
92 
        register int number;
93 
{
94 
        register struct rpcdata *d = _rpcdata();
95 
        register struct rpcent *p;
96 
#ifdef  YP
97 
        int reason;
98 
        char adrstr[16];
99 
#endif
100 
 
101 
        if (d == 0)
102 
                return (0);
103 
#ifdef  YP
104 
        if (!__yp_nomap && _yp_check(&d->domain)) {
105 
                sprintf(adrstr, "%d", number);
106 
                reason = yp_match(d->domain, "rpc.bynumber", adrstr, strlen(adrstr),
107 
                                  &d->current, &d->currentlen);
108 
                switch(reason) {
109 
                case 0:
110 
                        break;
111 
                case YPERR_MAP:
112 
                        __yp_nomap = 1;
113 
                        goto no_yp;
114 
                        break;
115 
                default:
116 
                        return(0);
117 
                        break;
118 
                }
119 
                d->current[d->currentlen] = '\0';
120 
                p = interpret(d->current, d->currentlen);
121 
                (void) free(d->current);
122 
                return p;
123 
        }
124 
no_yp:
125 
#endif  /* YP */
126 
        setrpcent(0);
127 
        while ((p = getrpcent())) {
128 
                if (p->r_number == number)
129 
                        break;
130 
        }
131 
        endrpcent();
132 
        return (p);
133 
}
134 
 
135 
struct rpcent *
136 
getrpcbyname(name)
137 
        char *name;
138 
{
139 
        struct rpcent *rpc = NULL;
140 
        char **rp;
141 
 
142 
        setrpcent(0);
143 
        while ((rpc = getrpcent())) {
144 
                if (strcmp(rpc->r_name, name) == 0)
145 
                        goto done;
146 
                for (rp = rpc->r_aliases; *rp != NULL; rp++) {
147 
                        if (strcmp(*rp, name) == 0)
148 
                                goto done;
149 
                }
150 
        }
151 
done:
152 
        endrpcent();
153 
        return (rpc);
154 
}
155 
 
156 
void
157 
setrpcent(f)
158 
        int f;
159 
{
160 
        register struct rpcdata *d = _rpcdata();
161 
 
162 
        if (d == 0)
163 
                return;
164 
#ifdef  YP
165 
        if (!__yp_nomap && _yp_check(NULL)) {
166 
                if (d->current)
167 
                        free(d->current);
168 
                d->current = NULL;
169 
                d->currentlen = 0;
170 
                return;
171 
        }
172 
        __yp_nomap = 0;
173 
#endif  /* YP */
174 
        if (d->rpcf == NULL)
175 
                d->rpcf = fopen(RPCDB, "r");
176 
        else
177 
                rewind(d->rpcf);
178 
        d->stayopen |= f;
179 
}
180 
 
181 
void
182 
endrpcent()
183 
{
184 
        register struct rpcdata *d = _rpcdata();
185 
 
186 
        if (d == 0)
187 
                return;
188 
#ifdef  YP
189 
        if (!__yp_nomap && _yp_check(NULL)) {
190 
                if (d->current && !d->stayopen)
191 
                        free(d->current);
192 
                d->current = NULL;
193 
                d->currentlen = 0;
194 
                return;
195 
        }
196 
        __yp_nomap = 0;
197 
#endif  /* YP */
198 
        if (d->rpcf && !d->stayopen) {
199 
                fclose(d->rpcf);
200 
                d->rpcf = NULL;
201 
        }
202 
}
203 
 
204 
struct rpcent *
205 
getrpcent()
206 
{
207 
        register struct rpcdata *d = _rpcdata();
208 
#ifdef  YP
209 
        struct rpcent *hp;
210 
        int reason;
211 
        char *val = NULL;
212 
        int vallen;
213 
#endif
214 
 
215 
        if (d == 0)
216 
                return(NULL);
217 
#ifdef  YP
218 
        if (!__yp_nomap && _yp_check(&d->domain)) {
219 
                if (d->current == NULL && d->currentlen == 0) {
220 
                        reason = yp_first(d->domain, "rpc.bynumber",
221 
                                          &d->current, &d->currentlen,
222 
                                          &val, &vallen);
223 
                } else {
224 
                        reason = yp_next(d->domain, "rpc.bynumber",
225 
                                         d->current, d->currentlen,
226 
                                         &d->current, &d->currentlen,
227 
                                         &val, &vallen);
228 
                }
229 
                switch(reason) {
230 
                case 0:
231 
                        break;
232 
                case YPERR_MAP:
233 
                        __yp_nomap = 1;
234 
                        goto no_yp;
235 
                        break;
236 
                default:
237 
                        return(0);
238 
                        break;
239 
                }
240 
                val[vallen] = '\0';
241 
                hp = interpret(val, vallen);
242 
                (void) free(val);
243 
                return hp;
244 
        }
245 
no_yp:
246 
#endif  /* YP */
247 
        if (d->rpcf == NULL && (d->rpcf = fopen(RPCDB, "r")) == NULL)
248 
                return (NULL);
249 
        /* -1 so there is room to append a \n below */
250 
        if (fgets(d->line, BUFSIZ - 1, d->rpcf) == NULL)
251 
                return (NULL);
252 
        return (interpret(d->line, strlen(d->line)));
253 
}
254 
 
255 
static struct rpcent *
256 
interpret(val, len)
257 
        char *val;
258 
        int len;
259 
{
260 
        register struct rpcdata *d = _rpcdata();
261 
        char *p;
262 
        register char *cp, **q;
263 
 
264 
        if (d == 0)
265 
                return (0);
266 
        (void) strncpy(d->line, val, BUFSIZ);
267 
        d->line[BUFSIZ] = '\0';
268 
        p = d->line;
269 
        p[len] = '\n';
270 
        if (*p == '#')
271 
                return (getrpcent());
272 
        cp = strpbrk(p, "#\n");
273 
        if (cp == NULL)
274 
                return (getrpcent());
275 
        *cp = '\0';
276 
        cp = strpbrk(p, " \t");
277 
        if (cp == NULL)
278 
                return (getrpcent());
279 
        *cp++ = '\0';
280 
        /* THIS STUFF IS INTERNET SPECIFIC */
281 
        d->rpc.r_name = d->line;
282 
        while (*cp == ' ' || *cp == '\t')
283 
                cp++;
284 
        d->rpc.r_number = atoi(cp);
285 
        q = d->rpc.r_aliases = d->rpc_aliases;
286 
        cp = strpbrk(cp, " \t");
287 
        if (cp != NULL)
288 
                *cp++ = '\0';
289 
        while (cp && *cp) {
290 
                if (*cp == ' ' || *cp == '\t') {
291 
                        cp++;
292 
                        continue;
293 
                }
294 
                if (q < &(d->rpc_aliases[MAXALIASES - 1]))
295 
                        *q++ = cp;
296 
                cp = strpbrk(cp, " \t");
297 
                if (cp != NULL)
298 
                        *cp++ = '\0';
299 
        }
300 
        *q = NULL;
301 
        return (&d->rpc);
302 
}
303 
 

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.