OSDN Git Service

- trim any trailing whitespace
[uclinux-h8/uClibc.git] / libc / inet / rpc / clnt_perror.c
index 4ede1a4..7e6c907 100644 (file)
@@ -6,31 +6,29 @@
  * 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
  */
-#if !defined(lint) && defined(SCCSIDS)
-static char sccsid[] =
-
-       "@(#)clnt_perror.c 1.15 87/10/07 Copyr 1984 Sun Micro";
+#if 0
+static char sccsid[] = "@(#)clnt_perror.c 1.15 87/10/07 Copyr 1984 Sun Micro";
 #endif
 
 /*
@@ -39,264 +37,412 @@ static char sccsid[] =
  * Copyright (C) 1984, Sun Microsystems, Inc.
  *
  */
-#include <stdio.h>
-
-#include <rpc/types.h>
-#include <rpc/auth.h>
-#include <rpc/clnt.h>
 
-//extern char *sys_errlist[];
-//static char *auth_errmsg();
+#define __FORCE_GLIBC
+#include <features.h>
 
-extern char *strcpy();
+#include <stdio.h>
+#include <string.h>
+#include "rpc_private.h"
 
-#if 0
-static char *buf;
+#ifdef USE_IN_LIBIO
+# include <wchar.h>
+# include <libio/iolibio.h>
+# define fputs(s, f) _IO_fputs (s, f)
+#endif
 
-static char *_buf()
-{
+/* Experimentally off - libc_hidden_proto(strcpy) */
+/* Experimentally off - libc_hidden_proto(strlen) */
+libc_hidden_proto(sprintf)
+libc_hidden_proto(__glibc_strerror_r)
+libc_hidden_proto(fputs)
+#ifdef USE_IN_LIBIO
+libc_hidden_proto(fwprintf)
+#endif
 
-       if (buf == 0)
-               buf = (char *) malloc(256);
-       return (buf);
-}
-#endif 
+static char *auth_errmsg (enum auth_stat stat) internal_function;
 
+#ifdef __UCLIBC_HAS_THREADS__
 /*
- * Print reply error info
+ * Making buf a preprocessor macro requires renaming the local
+ * buf variable in a few functions.  Overriding a global variable
+ * with a local variable of the same name is a bad idea, anyway.
  */
-char *clnt_sperror __P ((CLIENT *rpch, const char *s))
-{
-#if 0
-       struct rpc_err e;
-       void clnt_perrno();
-       char *err;
-       char *str = _buf();
-       char *strstart = str;
-
-       if (str == 0)
-               return (0);
-       CLNT_GETERR(rpch, &e);
-
-       (void) sprintf(str, "%s: ", s);
-       str += strlen(str);
-
-       (void) strcpy(str, clnt_sperrno(e.re_status));
-       str += strlen(str);
-
-       switch (e.re_status) {
-       case RPC_SUCCESS:
-       case RPC_CANTENCODEARGS:
-       case RPC_CANTDECODERES:
-       case RPC_TIMEDOUT:
-       case RPC_PROGUNAVAIL:
-       case RPC_PROCUNAVAIL:
-       case RPC_CANTDECODEARGS:
-       case RPC_SYSTEMERROR:
-       case RPC_UNKNOWNHOST:
-       case RPC_UNKNOWNPROTO:
-       case RPC_PMAPFAILURE:
-       case RPC_PROGNOTREGISTERED:
-       case RPC_FAILED:
-               break;
-
-       case RPC_CANTSEND:
-       case RPC_CANTRECV:
-               (void) sprintf(str, "; errno = %s", sys_errlist[e.re_errno]);
-               str += strlen(str);
-               break;
-
-       case RPC_VERSMISMATCH:
-               (void) sprintf(str,
-                                          "; low version = %lu, high version = %lu",
-                                          e.re_vers.low, e.re_vers.high);
-               str += strlen(str);
-               break;
-
-       case RPC_AUTHERROR:
-               err = auth_errmsg(e.re_why);
-               (void) sprintf(str, "; why = ");
-               str += strlen(str);
-               if (err != NULL) {
-                       (void) sprintf(str, "%s", err);
-               } else {
-                       (void) sprintf(str,
-                                                  "(unknown authentication error - %d)",
-                                                  (int) e.re_why);
-               }
-               str += strlen(str);
-               break;
-
-       case RPC_PROGVERSMISMATCH:
-               (void) sprintf(str,
-                                          "; low version = %lu, high version = %lu",
-                                          e.re_vers.low, e.re_vers.high);
-               str += strlen(str);
-               break;
-
-       default:                                        /* unknown */
-               (void) sprintf(str,
-                                          "; s1 = %lu, s2 = %lu", e.re_lb.s1, e.re_lb.s2);
-               str += strlen(str);
-               break;
-       }
-       (void) sprintf(str, "\n");
-       return (strstart);
+#define buf (*(char **)&RPC_THREAD_VARIABLE(clnt_perr_buf_s))
+#else
+static char *buf;
 #endif
-       return (0);
-}
 
-void clnt_perror __P ((CLIENT *rpch, const char *s))
+static char *
+_buf (void)
 {
-       (void) fprintf(stderr, "%s", clnt_sperror(rpch, s));
+  if (buf == NULL)
+    buf = (char *) malloc (256);
+  return buf;
 }
 
+struct rpc_errtab
+{
+  enum clnt_stat status;
+  unsigned int message_off;
+};
 
-struct rpc_errtab {
-       enum clnt_stat status;
-       char *message;
+static const char rpc_errstr[] =
+{
+#define RPC_SUCCESS_IDX                0
+  _("RPC: Success")
+  "\0"
+#define RPC_CANTENCODEARGS_IDX (RPC_SUCCESS_IDX + sizeof "RPC: Success")
+  _("RPC: Can't encode arguments")
+  "\0"
+#define RPC_CANTDECODERES_IDX  (RPC_CANTENCODEARGS_IDX \
+                                + sizeof "RPC: Can't encode arguments")
+  _("RPC: Can't decode result")
+  "\0"
+#define RPC_CANTSEND_IDX       (RPC_CANTDECODERES_IDX \
+                                + sizeof "RPC: Can't decode result")
+  _("RPC: Unable to send")
+  "\0"
+#define RPC_CANTRECV_IDX       (RPC_CANTSEND_IDX \
+                                + sizeof "RPC: Unable to send")
+  _("RPC: Unable to receive")
+  "\0"
+#define RPC_TIMEDOUT_IDX       (RPC_CANTRECV_IDX \
+                                + sizeof "RPC: Unable to receive")
+  _("RPC: Timed out")
+  "\0"
+#define RPC_VERSMISMATCH_IDX   (RPC_TIMEDOUT_IDX \
+                                + sizeof "RPC: Timed out")
+  _("RPC: Incompatible versions of RPC")
+  "\0"
+#define RPC_AUTHERROR_IDX      (RPC_VERSMISMATCH_IDX \
+                                + sizeof "RPC: Incompatible versions of RPC")
+  _("RPC: Authentication error")
+  "\0"
+#define RPC_PROGUNAVAIL_IDX            (RPC_AUTHERROR_IDX \
+                                + sizeof "RPC: Authentication error")
+  _("RPC: Program unavailable")
+  "\0"
+#define RPC_PROGVERSMISMATCH_IDX (RPC_PROGUNAVAIL_IDX \
+                                 + sizeof "RPC: Program unavailable")
+  _("RPC: Program/version mismatch")
+  "\0"
+#define RPC_PROCUNAVAIL_IDX    (RPC_PROGVERSMISMATCH_IDX \
+                                + sizeof "RPC: Program/version mismatch")
+  _("RPC: Procedure unavailable")
+  "\0"
+#define RPC_CANTDECODEARGS_IDX (RPC_PROCUNAVAIL_IDX \
+                                + sizeof "RPC: Procedure unavailable")
+  _("RPC: Server can't decode arguments")
+  "\0"
+#define RPC_SYSTEMERROR_IDX    (RPC_CANTDECODEARGS_IDX \
+                                + sizeof "RPC: Server can't decode arguments")
+  _("RPC: Remote system error")
+  "\0"
+#define RPC_UNKNOWNHOST_IDX    (RPC_SYSTEMERROR_IDX \
+                                + sizeof "RPC: Remote system error")
+  _("RPC: Unknown host")
+  "\0"
+#define RPC_UNKNOWNPROTO_IDX   (RPC_UNKNOWNHOST_IDX \
+                                + sizeof "RPC: Unknown host")
+  _("RPC: Unknown protocol")
+  "\0"
+#define RPC_PMAPFAILURE_IDX    (RPC_UNKNOWNPROTO_IDX \
+                                + sizeof "RPC: Unknown protocol")
+  _("RPC: Port mapper failure")
+  "\0"
+#define RPC_PROGNOTREGISTERED_IDX (RPC_PMAPFAILURE_IDX \
+                                  + sizeof "RPC: Port mapper failure")
+  _("RPC: Program not registered")
+  "\0"
+#define RPC_FAILED_IDX         (RPC_PROGNOTREGISTERED_IDX \
+                                + sizeof "RPC: Program not registered")
+  _("RPC: Failed (unspecified error)")
 };
 
-#if 0
-static struct rpc_errtab rpc_errlist[] = {
-       {RPC_SUCCESS,
-        "RPC: Success"},
-       {RPC_CANTENCODEARGS,
-        "RPC: Can't encode arguments"},
-       {RPC_CANTDECODERES,
-        "RPC: Can't decode result"},
-       {RPC_CANTSEND,
-        "RPC: Unable to send"},
-       {RPC_CANTRECV,
-        "RPC: Unable to receive"},
-       {RPC_TIMEDOUT,
-        "RPC: Timed out"},
-       {RPC_VERSMISMATCH,
-        "RPC: Incompatible versions of RPC"},
-       {RPC_AUTHERROR,
-        "RPC: Authentication error"},
-       {RPC_PROGUNAVAIL,
-        "RPC: Program unavailable"},
-       {RPC_PROGVERSMISMATCH,
-        "RPC: Program/version mismatch"},
-       {RPC_PROCUNAVAIL,
-        "RPC: Procedure unavailable"},
-       {RPC_CANTDECODEARGS,
-        "RPC: Server can't decode arguments"},
-       {RPC_SYSTEMERROR,
-        "RPC: Remote system error"},
-       {RPC_UNKNOWNHOST,
-        "RPC: Unknown host"},
-       {RPC_UNKNOWNPROTO,
-        "RPC: Unknown protocol"},
-       {RPC_PMAPFAILURE,
-        "RPC: Port mapper failure"},
-       {RPC_PROGNOTREGISTERED,
-        "RPC: Program not registered"},
-       {RPC_FAILED,
-        "RPC: Failed (unspecified error)"}
+static const struct rpc_errtab rpc_errlist[] =
+{
+  { RPC_SUCCESS, RPC_SUCCESS_IDX },
+  { RPC_CANTENCODEARGS, RPC_CANTENCODEARGS_IDX },
+  { RPC_CANTDECODERES, RPC_CANTDECODERES_IDX },
+  { RPC_CANTSEND, RPC_CANTSEND_IDX },
+  { RPC_CANTRECV, RPC_CANTRECV_IDX },
+  { RPC_TIMEDOUT, RPC_TIMEDOUT_IDX },
+  { RPC_VERSMISMATCH, RPC_VERSMISMATCH_IDX },
+  { RPC_AUTHERROR, RPC_AUTHERROR_IDX },
+  { RPC_PROGUNAVAIL, RPC_PROGUNAVAIL_IDX },
+  { RPC_PROGVERSMISMATCH, RPC_PROGVERSMISMATCH_IDX },
+  { RPC_PROCUNAVAIL, RPC_PROCUNAVAIL_IDX },
+  { RPC_CANTDECODEARGS, RPC_CANTDECODEARGS_IDX },
+  { RPC_SYSTEMERROR, RPC_SYSTEMERROR_IDX },
+  { RPC_UNKNOWNHOST, RPC_UNKNOWNHOST_IDX },
+  { RPC_UNKNOWNPROTO, RPC_UNKNOWNPROTO_IDX },
+  { RPC_PMAPFAILURE, RPC_PMAPFAILURE_IDX },
+  { RPC_PROGNOTREGISTERED, RPC_PROGNOTREGISTERED_IDX },
+  { RPC_FAILED, RPC_FAILED_IDX }
 };
-#endif
+
 
 /*
  * This interface for use by clntrpc
  */
-char *clnt_sperrno(stat)
-enum clnt_stat stat;
+libc_hidden_proto(clnt_sperrno)
+char *
+clnt_sperrno (enum clnt_stat stat)
 {
-#if 0
-       int i;
+  size_t i;
 
-       for (i = 0; i < sizeof(rpc_errlist) / sizeof(struct rpc_errtab); i++) {
-               if (rpc_errlist[i].status == stat) {
-                       return (rpc_errlist[i].message);
-               }
+  for (i = 0; i < sizeof (rpc_errlist) / sizeof (struct rpc_errtab); i++)
+    {
+      if (rpc_errlist[i].status == stat)
+       {
+         return (char*)_(rpc_errstr + rpc_errlist[i].message_off);
        }
-#endif
-       return ("RPC: (unknown error code)");
+    }
+  return _("RPC: (unknown error code)");
 }
+libc_hidden_def(clnt_sperrno)
 
-void clnt_perrno(num)
-enum clnt_stat num;
+void
+clnt_perrno (enum clnt_stat num)
 {
-       (void) fprintf(stderr, "%s", clnt_sperrno(num));
+#ifdef USE_IN_LIBIO
+  if (_IO_fwide (stderr, 0) > 0)
+    (void) fwprintf (stderr, L"%s", clnt_sperrno (num));
+  else
+#endif
+    (void) fputs (clnt_sperrno (num), stderr);
 }
 
-
-char *clnt_spcreateerror __P ((__const char *s))
+/*
+ * Print reply error info
+ */
+libc_hidden_proto(clnt_sperror)
+char *
+clnt_sperror (CLIENT * rpch, const char *msg)
 {
-#if 0
-       extern int sys_nerr;
-       extern char *sys_errlist[];
-       char *str = _buf();
-
-       if (str == 0)
-               return (0);
-       (void) sprintf(str, "%s: ", s);
-       (void) strcat(str, clnt_sperrno(rpc_createerr.cf_stat));
-       switch (rpc_createerr.cf_stat) {
-       case RPC_PMAPFAILURE:
-               (void) strcat(str, " - ");
-               (void) strcat(str, clnt_sperrno(rpc_createerr.cf_error.re_status));
-               break;
-
-       case RPC_SYSTEMERROR:
-               (void) strcat(str, " - ");
-               if (rpc_createerr.cf_error.re_errno > 0
-                       && rpc_createerr.cf_error.re_errno < sys_nerr)
-                       (void) strcat(str,
-                                                 sys_errlist[rpc_createerr.cf_error.re_errno]);
-               else
-                       (void) sprintf(&str[strlen(str)], "Error %d",
-                                                  rpc_createerr.cf_error.re_errno);
-               break;
+  char chrbuf[1024];
+  struct rpc_err e;
+  char *err;
+  char *str = _buf ();
+  char *strstart = str;
+  int len;
+
+  if (str == NULL)
+    return NULL;
+  CLNT_GETERR (rpch, &e);
+
+  len = sprintf (str, "%s: ", msg);
+  str += len;
+
+  (void) strcpy(str, clnt_sperrno(e.re_status));
+  str += strlen(str);
+
+  switch (e.re_status)
+    {
+    case RPC_SUCCESS:
+    case RPC_CANTENCODEARGS:
+    case RPC_CANTDECODERES:
+    case RPC_TIMEDOUT:
+    case RPC_PROGUNAVAIL:
+    case RPC_PROCUNAVAIL:
+    case RPC_CANTDECODEARGS:
+    case RPC_SYSTEMERROR:
+    case RPC_UNKNOWNHOST:
+    case RPC_UNKNOWNPROTO:
+    case RPC_PMAPFAILURE:
+    case RPC_PROGNOTREGISTERED:
+    case RPC_FAILED:
+      break;
+
+    case RPC_CANTSEND:
+    case RPC_CANTRECV:
+      __glibc_strerror_r (e.re_errno, chrbuf, sizeof chrbuf);
+      len = sprintf (str, "; errno = %s", chrbuf);
+      str += len;
+      break;
+
+    case RPC_VERSMISMATCH:
+      len= sprintf (str, _("; low version = %lu, high version = %lu"),
+                   e.re_vers.low, e.re_vers.high);
+      str += len;
+      break;
+
+    case RPC_AUTHERROR:
+      err = auth_errmsg (e.re_why);
+      (void) strcpy(str, _("; why = "));
+      str += strlen(str);
+
+      if (err != NULL)
+       {
+         (void) strcpy(str, err);
+         str += strlen(str);
        }
-       (void) strcat(str, "\n");
-       return (str);
+      else
+       {
+         len = sprintf (str, _("(unknown authentication error - %d)"),
+                        (int) e.re_why);
+         str += len;
+       }
+      break;
+
+    case RPC_PROGVERSMISMATCH:
+      len = sprintf (str, _("; low version = %lu, high version = %lu"),
+                    e.re_vers.low, e.re_vers.high);
+      str += len;
+      break;
+
+    default:                   /* unknown */
+      len = sprintf (str, "; s1 = %lu, s2 = %lu", e.re_lb.s1, e.re_lb.s2);
+      str += len;
+      break;
+    }
+  *str = '\n';
+  *++str = '\0';
+  return (strstart);
+}
+libc_hidden_def(clnt_sperror)
+
+libc_hidden_proto(clnt_perror)
+void
+clnt_perror (CLIENT * rpch, const char *msg)
+{
+#ifdef USE_IN_LIBIO
+  if (_IO_fwide (stderr, 0) > 0)
+    (void) fwprintf (stderr, L"%s", clnt_sperror (rpch, msg));
+  else
 #endif
-       return(0);
+    (void) fputs (clnt_sperror (rpch, msg), stderr);
 }
+libc_hidden_def(clnt_perror)
 
-extern void clnt_pcreateerror __P ((__const char *s))
+libc_hidden_proto(clnt_spcreateerror)
+char *
+clnt_spcreateerror (const char *msg)
 {
-       (void) fprintf(stderr, "%s", clnt_spcreateerror(s));
+  char chrbuf[1024];
+  char *str = _buf ();
+  char *cp;
+  int len;
+  struct rpc_createerr *ce;
+
+  if (str == NULL)
+    return NULL;
+  ce = &get_rpc_createerr ();
+  len = sprintf (str, "%s: ", msg);
+  cp = str + len;
+  (void) strcpy(cp, clnt_sperrno (ce->cf_stat));
+  cp += strlen(cp);
+
+  switch (ce->cf_stat)
+    {
+    case RPC_PMAPFAILURE:
+      (void) strcpy(cp, " - ");
+      cp += strlen(cp);
+
+      (void) strcpy(cp, clnt_sperrno (ce->cf_error.re_status));
+      cp += strlen(cp);
+
+      break;
+
+    case RPC_SYSTEMERROR:
+      (void) strcpy(cp, " - ");
+      cp += strlen(cp);
+
+      __glibc_strerror_r (ce->cf_error.re_errno, chrbuf, sizeof chrbuf);
+      (void) strcpy(cp, chrbuf);
+      cp += strlen(cp);
+      break;
+    default:
+      break;
+    }
+  *cp = '\n';
+  *++cp = '\0';
+  return str;
 }
+libc_hidden_def(clnt_spcreateerror)
 
-struct auth_errtab {
-       enum auth_stat status;
-       char *message;
+void
+clnt_pcreateerror (const char *msg)
+{
+#ifdef USE_IN_LIBIO
+  if (_IO_fwide (stderr, 0) > 0)
+    (void) fwprintf (stderr, L"%s", clnt_spcreateerror (msg));
+  else
+#endif
+    (void) fputs (clnt_spcreateerror (msg), stderr);
+}
+
+struct auth_errtab
+{
+  enum auth_stat status;
+  unsigned int message_off;
 };
 
-#if 0
-static struct auth_errtab auth_errlist[] = {
-       {AUTH_OK,
-        "Authentication OK"},
-       {AUTH_BADCRED,
-        "Invalid client credential"},
-       {AUTH_REJECTEDCRED,
-        "Server rejected credential"},
-       {AUTH_BADVERF,
-        "Invalid client verifier"},
-       {AUTH_REJECTEDVERF,
-        "Server rejected verifier"},
-       {AUTH_TOOWEAK,
-        "Client credential too weak"},
-       {AUTH_INVALIDRESP,
-        "Invalid server verifier"},
-       {AUTH_FAILED,
-        "Failed (unspecified error)"},
+static const char auth_errstr[] =
+{
+#define AUTH_OK_IDX            0
+   _("Authentication OK")
+   "\0"
+#define AUTH_BADCRED_IDX       (AUTH_OK_IDX + sizeof "Authentication OK")
+   _("Invalid client credential")
+   "\0"
+#define AUTH_REJECTEDCRED_IDX  (AUTH_BADCRED_IDX \
+                                + sizeof "Invalid client credential")
+   _("Server rejected credential")
+   "\0"
+#define AUTH_BADVERF_IDX       (AUTH_REJECTEDCRED_IDX \
+                                + sizeof "Server rejected credential")
+   _("Invalid client verifier")
+   "\0"
+#define AUTH_REJECTEDVERF_IDX  (AUTH_BADVERF_IDX \
+                                + sizeof "Invalid client verifier")
+   _("Server rejected verifier")
+   "\0"
+#define AUTH_TOOWEAK_IDX       (AUTH_REJECTEDVERF_IDX \
+                                + sizeof "Server rejected verifier")
+   _("Client credential too weak")
+   "\0"
+#define AUTH_INVALIDRESP_IDX   (AUTH_TOOWEAK_IDX \
+                                + sizeof "Client credential too weak")
+   _("Invalid server verifier")
+   "\0"
+#define AUTH_FAILED_IDX                (AUTH_INVALIDRESP_IDX \
+                                + sizeof "Invalid server verifier")
+   _("Failed (unspecified error)")
 };
 
-static char *auth_errmsg(stat)
-enum auth_stat stat;
+static const struct auth_errtab auth_errlist[] =
 {
-       int i;
+  { AUTH_OK, AUTH_OK_IDX },
+  { AUTH_BADCRED, AUTH_BADCRED_IDX },
+  { AUTH_REJECTEDCRED, AUTH_REJECTEDCRED_IDX },
+  { AUTH_BADVERF, AUTH_BADVERF_IDX },
+  { AUTH_REJECTEDVERF, AUTH_REJECTEDVERF_IDX },
+  { AUTH_TOOWEAK, AUTH_TOOWEAK_IDX },
+  { AUTH_INVALIDRESP, AUTH_INVALIDRESP_IDX },
+  { AUTH_FAILED, AUTH_FAILED_IDX }
+};
 
-       for (i = 0; i < sizeof(auth_errlist) / sizeof(struct auth_errtab); i++) {
-               if (auth_errlist[i].status == stat) {
-                       return (auth_errlist[i].message);
-               }
+static char *
+internal_function
+auth_errmsg (enum auth_stat stat)
+{
+  size_t i;
+
+  for (i = 0; i < sizeof (auth_errlist) / sizeof (struct auth_errtab); i++)
+    {
+      if (auth_errlist[i].status == stat)
+       {
+         return (char*)_(auth_errstr + auth_errlist[i].message_off);
        }
-       return (NULL);
+    }
+  return NULL;
+}
+
+
+static void __attribute_used__
+free_mem (void)
+{
+  free (buf);
 }
-#endif