summaryrefslogtreecommitdiff
path: root/libc/inet/rpc/getrpcent.c
diff options
context:
space:
mode:
Diffstat (limited to 'libc/inet/rpc/getrpcent.c')
-rw-r--r--libc/inet/rpc/getrpcent.c345
1 files changed, 0 insertions, 345 deletions
diff --git a/libc/inet/rpc/getrpcent.c b/libc/inet/rpc/getrpcent.c
deleted file mode 100644
index dba2a6878..000000000
--- a/libc/inet/rpc/getrpcent.c
+++ /dev/null
@@ -1,345 +0,0 @@
-/* @(#)getrpcent.c 2.2 88/07/29 4.0 RPCSRC */
-
-/*
- * Sun RPC is a product of Sun Microsystems, Inc. and is provided for
- * unrestricted use provided that this legend is included on all tape
- * media and as a part of the software program in whole or part. Users
- * may copy or modify Sun RPC without charge, but are not authorized
- * to license or distribute it to anyone else except as part of a product or
- * program developed by the user.
- *
- * SUN RPC IS PROVIDED AS IS WITH NO WARRANTIES OF ANY KIND INCLUDING THE
- * WARRANTIES OF DESIGN, MERCHANTIBILITY AND FITNESS FOR A PARTICULAR
- * PURPOSE, OR ARISING FROM A COURSE OF DEALING, USAGE OR TRADE PRACTICE.
- *
- * Sun RPC is provided with no support and without any obligation on the
- * part of Sun Microsystems, Inc. to assist in its use, correction,
- * modification or enhancement.
- *
- * SUN MICROSYSTEMS, INC. SHALL HAVE NO LIABILITY WITH RESPECT TO THE
- * INFRINGEMENT OF COPYRIGHTS, TRADE SECRETS OR ANY PATENTS BY SUN RPC
- * OR ANY PART THEREOF.
- *
- * In no event will Sun Microsystems, Inc. be liable for any lost revenue
- * or profits or other special, indirect and consequential damages, even if
- * Sun has been advised of the possibility of such damages.
- *
- * Sun Microsystems, Inc.
- * 2550 Garcia Avenue
- * Mountain View, California 94043
- */
-
-/*
- * Copyright (c) 1985 by Sun Microsystems, Inc.
- */
-
-#include <stdio.h>
-#include <string.h>
-#include <sys/types.h>
-#include <rpc/rpc.h>
-#include <netdb.h>
-#include <sys/socket.h>
-#include <arpa/inet.h>
-#include <errno.h>
-
-
-/*
- * Internet version.
- */
-static struct rpcdata {
- FILE *rpcf;
- char *current;
- int currentlen;
- int stayopen;
-#define MAXALIASES 35
- char *rpc_aliases[MAXALIASES];
- struct rpcent rpc;
- char line[BUFSIZ + 1];
- char *domain;
-} *rpcdata;
-
-static const char RPCDB[] = "/etc/rpc";
-
-static struct rpcdata *_rpcdata(void)
-{
- register struct rpcdata *d = rpcdata;
-
- if (d == NULL) {
- d = (struct rpcdata *) calloc(1, sizeof(struct rpcdata));
-
- rpcdata = d;
- }
- return d;
-}
-
-void endrpcent(void)
-{
- register struct rpcdata *d = _rpcdata();
-
- if (d == NULL)
- return;
- if (d->stayopen)
- return;
- free(d->current);
- d->current = NULL;
- if (d->rpcf) {
- fclose(d->rpcf);
- d->rpcf = NULL;
- }
-}
-libc_hidden_def(endrpcent)
-
-void setrpcent(int f)
-{
- register struct rpcdata *d = _rpcdata();
-
- if (d == NULL)
- return;
- if (d->rpcf == NULL)
- d->rpcf = fopen(RPCDB, "r");
- else
- rewind(d->rpcf);
- free(d->current);
- d->current = NULL;
- d->stayopen |= f;
-}
-libc_hidden_def(setrpcent)
-
-static struct rpcent *interpret(struct rpcdata *);
-
-static struct rpcent *__get_next_rpcent(struct rpcdata *d)
-{
- if (fgets(d->line, BUFSIZ, d->rpcf) == NULL)
- return NULL;
- return interpret(d);
-}
-
-struct rpcent *getrpcent(void)
-{
- register struct rpcdata *d = _rpcdata();
-
- if (d == NULL)
- return NULL;
- if (d->rpcf == NULL && (d->rpcf = fopen(RPCDB, "r")) == NULL)
- return NULL;
- return __get_next_rpcent(d);
-}
-libc_hidden_def(getrpcent)
-
-struct rpcent *getrpcbynumber(register int number)
-{
- register struct rpcdata *d = _rpcdata();
- register struct rpcent *rpc;
-
- if (d == NULL)
- return NULL;
- setrpcent(0);
- while ((rpc = getrpcent())) {
- if (rpc->r_number == number)
- break;
- }
- endrpcent();
- return rpc;
-}
-libc_hidden_def(getrpcbynumber)
-
-struct rpcent *getrpcbyname(const char *name)
-{
- struct rpcent *rpc;
- char **rp;
-
- setrpcent(0);
- while ((rpc = getrpcent())) {
- if (strcmp(rpc->r_name, name) == 0)
- return rpc;
- for (rp = rpc->r_aliases; *rp != NULL; rp++) {
- if (strcmp(*rp, name) == 0)
- return rpc;
- }
- }
- endrpcent();
- return NULL;
-}
-libc_hidden_def(getrpcbyname)
-
-#ifdef __linux__
-static char *firstwhite(char *s)
-{
- char *s1, *s2;
-
- s1 = strchr(s, ' ');
- s2 = strchr(s, '\t');
- if (s1) {
- if (s2)
- return (s1 < s2) ? s1 : s2;
- else
- return s1;
- } else
- return s2;
-}
-#endif
-
-static struct rpcent *interpret(register struct rpcdata *d)
-{
- char *p;
- register char *cp, **q;
-
- p = d->line;
- d->line[strlen(p)-1] = '\n';
- if (*p == '#')
- return __get_next_rpcent(d);
- cp = strchr(p, '#');
- if (cp == NULL) {
- cp = strchr(p, '\n');
- if (cp == NULL)
- return __get_next_rpcent(d);
- }
- *cp = '\0';
-#ifdef __linux__
- if ((cp = firstwhite(p)))
- *cp++ = 0;
- else
- return __get_next_rpcent(d);
-#else
- cp = strchr(p, ' ');
- if (cp == NULL) {
- cp = strchr(p, '\t');
- if (cp == NULL)
- return __get_next_rpcent(d);
- }
- *cp++ = '\0';
-#endif
- /* THIS STUFF IS INTERNET SPECIFIC */
- d->rpc.r_name = d->line;
- while (*cp == ' ' || *cp == '\t')
- cp++;
- d->rpc.r_number = atoi(cp);
- q = d->rpc.r_aliases = d->rpc_aliases;
-#ifdef __linux__
- if ((cp = firstwhite(cp)))
- *cp++ = '\0';
-#else
- cp = strchr(p, ' ');
- if (cp != NULL)
- *cp++ = '\0';
- else {
- cp = strchr(p, '\t');
- if (cp != NULL)
- *cp++ = '\0';
- }
-#endif
- while (cp && *cp) {
- if (*cp == ' ' || *cp == '\t') {
- cp++;
- continue;
- }
- if (q < &(d->rpc_aliases[MAXALIASES - 1]))
- *q++ = cp;
-#ifdef __linux__
- if ((cp = firstwhite(cp)))
- *cp++ = '\0';
-#else
- cp = strchr(p, ' ');
- if (cp != NULL)
- *cp++ = '\0';
- else {
- cp = strchr(p, '\t');
- if (cp != NULL)
- *cp++ = '\0';
- }
-#endif
- }
- *q = NULL;
- return &d->rpc;
-}
-
-#if defined(__UCLIBC_HAS_REENTRANT_RPC__)
-
-#include <bits/uClibc_mutex.h>
-__UCLIBC_MUTEX_STATIC(mylock, PTHREAD_MUTEX_INITIALIZER);
-
-
-static int __copy_rpcent(struct rpcent *r, struct rpcent *result_buf, char *buffer,
- size_t buflen, struct rpcent **result)
-{
- size_t i, s;
-
- *result = NULL;
-
- if (!r)
- return ENOENT;
-
- /* copy the struct from the shared mem */
- memset(result_buf, 0x00, sizeof(*result_buf));
- memset(buffer, 0x00, buflen);
-
- result_buf->r_number = r->r_number;
-
- /* copy the aliases ... need to not only copy the alias strings,
- * but the array of pointers to the alias strings */
- i = 0;
- while (r->r_aliases[i++]) ;
-
- s = i-- * sizeof(char*);
- if (buflen < s)
- goto err_out;
- result_buf->r_aliases = (char**)buffer;
- buffer += s;
- buflen -= s;
-
- while (i-- > 0) {
- s = strlen(r->r_aliases[i]) + 1;
- if (buflen < s)
- goto err_out;
- result_buf->r_aliases[i] = buffer;
- buffer += s;
- buflen -= s;
- memcpy(result_buf->r_aliases[i], r->r_aliases[i], s);
- }
-
- /* copy the name */
- i = strlen(r->r_name);
- if (buflen <= i)
- goto err_out;
- result_buf->r_name = buffer;
- memcpy(result_buf->r_name, r->r_name, i);
-
- /* that was a hoot eh ? */
- *result = result_buf;
-
- return 0;
-err_out:
- return ERANGE;
-}
-
-int getrpcbynumber_r(int number, struct rpcent *result_buf, char *buffer,
- size_t buflen, struct rpcent **result)
-{
- int ret;
- __UCLIBC_MUTEX_LOCK(mylock);
- ret = __copy_rpcent(getrpcbynumber(number), result_buf, buffer, buflen, result);
- __UCLIBC_MUTEX_UNLOCK(mylock);
- return ret;
-}
-
-int getrpcbyname_r(const char *name, struct rpcent *result_buf, char *buffer,
- size_t buflen, struct rpcent **result)
-{
- int ret;
- __UCLIBC_MUTEX_LOCK(mylock);
- ret = __copy_rpcent(getrpcbyname(name), result_buf, buffer, buflen, result);
- __UCLIBC_MUTEX_UNLOCK(mylock);
- return ret;
-}
-
-int getrpcent_r(struct rpcent *result_buf, char *buffer,
- size_t buflen, struct rpcent **result)
-{
- int ret;
- __UCLIBC_MUTEX_LOCK(mylock);
- ret = __copy_rpcent(getrpcent(), result_buf, buffer, buflen, result);
- __UCLIBC_MUTEX_UNLOCK(mylock);
- return ret;
-}
-
-#endif /* __UCLIBC_HAS_REENTRANT_RPC__ */