clnt_perror.c

   1 /* @(#)clnt_perror.c    2.1 88/07/29 4.0 RPCSRC */
   2 /*
   3  * Sun RPC is a product of Sun Microsystems, Inc. and is provided for
   4  * unrestricted use provided that this legend is included on all tape
   5  * media and as a part of the software program in whole or part.  Users
   6  * may copy or modify Sun RPC without charge, but are not authorized
   7  * to license or distribute it to anyone else except as part of a product or
   8  * program developed by the user.
   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 #if 0
  31 static char sccsid[] = "@(#)clnt_perror.c 1.15 87/10/07 Copyr 1984 Sun Micro";
  32 #endif
  33
  34 /*
  35  * clnt_perror.c
  36  *
  37  * Copyright (C) 1984, Sun Microsystems, Inc.
  38  *
  39  */
  40
  41 #define __FORCE_GLIBC
  42 #include <features.h>
  43
  44 #include <stdio.h>
  45 #include <string.h>
  46 #include "rpc_private.h"
  47
  48 #ifdef USE_IN_LIBIO
  49 # include <wchar.h>
  50 # include <libio/iolibio.h>
  51 # define fputs(s, f) _IO_fputs (s, f)
  52 #endif
  53
  54 static char *auth_errmsg (enum auth_stat stat) internal_function;
  55
  56 #ifdef __UCLIBC_HAS_THREADS__
  57 /*
  58  * Making buf a preprocessor macro requires renaming the local
  59  * buf variable in a few functions.  Overriding a global variable
  60  * with a local variable of the same name is a bad idea, anyway.
  61  */
  62 #define buf (*(char **)&RPC_THREAD_VARIABLE(clnt_perr_buf_s))
  63 #else
  64 static char *buf;
  65 #endif
  66
  67 static char *
  68 _buf (void)
  69 {
  70   if (buf == NULL)
  71     buf = (char *) malloc (256);
  72   return buf;
  73 }
  74
  75 struct rpc_errtab
  76 {
  77   enum clnt_stat status;
  78   unsigned int message_off;
  79 };
  80
  81 static const char rpc_errstr[] =
  82 {
  83 #define RPC_SUCCESS_IDX         0
  84   _("RPC: Success")
  85   "\0"
  86 #define RPC_CANTENCODEARGS_IDX  (RPC_SUCCESS_IDX + sizeof "RPC: Success")
  87   _("RPC: Can't encode arguments")
  88   "\0"
  89 #define RPC_CANTDECODERES_IDX   (RPC_CANTENCODEARGS_IDX \
  90                                  + sizeof "RPC: Can't encode arguments")
  91   _("RPC: Can't decode result")
  92   "\0"
  93 #define RPC_CANTSEND_IDX        (RPC_CANTDECODERES_IDX \
  94                                  + sizeof "RPC: Can't decode result")
  95   _("RPC: Unable to send")
  96   "\0"
  97 #define RPC_CANTRECV_IDX        (RPC_CANTSEND_IDX \
  98                                  + sizeof "RPC: Unable to send")
  99   _("RPC: Unable to receive")
 100   "\0"
 101 #define RPC_TIMEDOUT_IDX        (RPC_CANTRECV_IDX \
 102                                  + sizeof "RPC: Unable to receive")
 103   _("RPC: Timed out")
 104   "\0"
 105 #define RPC_VERSMISMATCH_IDX    (RPC_TIMEDOUT_IDX \
 106                                  + sizeof "RPC: Timed out")
 107   _("RPC: Incompatible versions of RPC")
 108   "\0"
 109 #define RPC_AUTHERROR_IDX       (RPC_VERSMISMATCH_IDX \
 110                                  + sizeof "RPC: Incompatible versions of RPC")
 111   _("RPC: Authentication error")
 112   "\0"
 113 #define RPC_PROGUNAVAIL_IDX             (RPC_AUTHERROR_IDX \
 114                                  + sizeof "RPC: Authentication error")
 115   _("RPC: Program unavailable")
 116   "\0"
 117 #define RPC_PROGVERSMISMATCH_IDX (RPC_PROGUNAVAIL_IDX \
 118                                   + sizeof "RPC: Program unavailable")
 119   _("RPC: Program/version mismatch")
 120   "\0"
 121 #define RPC_PROCUNAVAIL_IDX     (RPC_PROGVERSMISMATCH_IDX \
 122                                  + sizeof "RPC: Program/version mismatch")
 123   _("RPC: Procedure unavailable")
 124   "\0"
 125 #define RPC_CANTDECODEARGS_IDX  (RPC_PROCUNAVAIL_IDX \
 126                                  + sizeof "RPC: Procedure unavailable")
 127   _("RPC: Server can't decode arguments")
 128   "\0"
 129 #define RPC_SYSTEMERROR_IDX     (RPC_CANTDECODEARGS_IDX \
 130                                  + sizeof "RPC: Server can't decode arguments")
 131   _("RPC: Remote system error")
 132   "\0"
 133 #define RPC_UNKNOWNHOST_IDX     (RPC_SYSTEMERROR_IDX \
 134                                  + sizeof "RPC: Remote system error")
 135   _("RPC: Unknown host")
 136   "\0"
 137 #define RPC_UNKNOWNPROTO_IDX    (RPC_UNKNOWNHOST_IDX \
 138                                  + sizeof "RPC: Unknown host")
 139   _("RPC: Unknown protocol")
 140   "\0"
 141 #define RPC_PMAPFAILURE_IDX     (RPC_UNKNOWNPROTO_IDX \
 142                                  + sizeof "RPC: Unknown protocol")
 143   _("RPC: Port mapper failure")
 144   "\0"
 145 #define RPC_PROGNOTREGISTERED_IDX (RPC_PMAPFAILURE_IDX \
 146                                    + sizeof "RPC: Port mapper failure")
 147   _("RPC: Program not registered")
 148   "\0"
 149 #define RPC_FAILED_IDX          (RPC_PROGNOTREGISTERED_IDX \
 150                                  + sizeof "RPC: Program not registered")
 151   _("RPC: Failed (unspecified error)")
 152 };
 153
 154 static const struct rpc_errtab rpc_errlist[] =
 155 {
 156   { RPC_SUCCESS, RPC_SUCCESS_IDX },
 157   { RPC_CANTENCODEARGS, RPC_CANTENCODEARGS_IDX },
 158   { RPC_CANTDECODERES, RPC_CANTDECODERES_IDX },
 159   { RPC_CANTSEND, RPC_CANTSEND_IDX },
 160   { RPC_CANTRECV, RPC_CANTRECV_IDX },
 161   { RPC_TIMEDOUT, RPC_TIMEDOUT_IDX },
 162   { RPC_VERSMISMATCH, RPC_VERSMISMATCH_IDX },
 163   { RPC_AUTHERROR, RPC_AUTHERROR_IDX },
 164   { RPC_PROGUNAVAIL, RPC_PROGUNAVAIL_IDX },
 165   { RPC_PROGVERSMISMATCH, RPC_PROGVERSMISMATCH_IDX },
 166   { RPC_PROCUNAVAIL, RPC_PROCUNAVAIL_IDX },
 167   { RPC_CANTDECODEARGS, RPC_CANTDECODEARGS_IDX },
 168   { RPC_SYSTEMERROR, RPC_SYSTEMERROR_IDX },
 169   { RPC_UNKNOWNHOST, RPC_UNKNOWNHOST_IDX },
 170   { RPC_UNKNOWNPROTO, RPC_UNKNOWNPROTO_IDX },
 171   { RPC_PMAPFAILURE, RPC_PMAPFAILURE_IDX },
 172   { RPC_PROGNOTREGISTERED, RPC_PROGNOTREGISTERED_IDX },
 173   { RPC_FAILED, RPC_FAILED_IDX }
 174 };
 175
 176
 177 /*
 178  * This interface for use by clntrpc
 179  */
 180 char *
 181 clnt_sperrno (enum clnt_stat stat)
 182 {
 183   size_t i;
 184
 185   for (i = 0; i < sizeof (rpc_errlist) / sizeof (struct rpc_errtab); i++)
 186     {
 187       if (rpc_errlist[i].status == stat)
 188         {
 189           return (char*)_(rpc_errstr + rpc_errlist[i].message_off);
 190         }
 191     }
 192   return _("RPC: (unknown error code)");
 193 }
 194 libc_hidden_def(clnt_sperrno)
 195
 196 void
 197 clnt_perrno (enum clnt_stat num)
 198 {
 199 #ifdef USE_IN_LIBIO
 200   if (_IO_fwide (stderr, 0) > 0)
 201     (void) fwprintf (stderr, L"%s", clnt_sperrno (num));
 202   else
 203 #endif
 204     (void) fputs (clnt_sperrno (num), stderr);
 205 }
 206
 207 /*
 208  * Print reply error info
 209  */
 210 char *
 211 clnt_sperror (CLIENT * rpch, const char *msg)
 212 {
 213   char chrbuf[1024];
 214   struct rpc_err e;
 215   char *err;
 216   char *str = _buf ();
 217   char *strstart = str;
 218   int len;
 219
 220   if (str == NULL)
 221     return NULL;
 222   CLNT_GETERR (rpch, &e);
 223
 224   len = sprintf (str, "%s: ", msg);
 225   str += len;
 226
 227   (void) strcpy(str, clnt_sperrno(e.re_status));
 228   str += strlen(str);
 229
 230   switch (e.re_status)
 231     {
 232     case RPC_SUCCESS:
 233     case RPC_CANTENCODEARGS:
 234     case RPC_CANTDECODERES:
 235     case RPC_TIMEDOUT:
 236     case RPC_PROGUNAVAIL:
 237     case RPC_PROCUNAVAIL:
 238     case RPC_CANTDECODEARGS:
 239     case RPC_SYSTEMERROR:
 240     case RPC_UNKNOWNHOST:
 241     case RPC_UNKNOWNPROTO:
 242     case RPC_PMAPFAILURE:
 243     case RPC_PROGNOTREGISTERED:
 244     case RPC_FAILED:
 245       break;
 246
 247     case RPC_CANTSEND:
 248     case RPC_CANTRECV:
 249       __glibc_strerror_r (e.re_errno, chrbuf, sizeof chrbuf);
 250       len = sprintf (str, "; errno = %s", chrbuf);
 251       str += len;
 252       break;
 253
 254     case RPC_VERSMISMATCH:
 255       len= sprintf (str, _("; low version = %lu, high version = %lu"),
 256                     e.re_vers.low, e.re_vers.high);
 257       str += len;
 258       break;
 259
 260     case RPC_AUTHERROR:
 261       err = auth_errmsg (e.re_why);
 262       (void) strcpy(str, _("; why = "));
 263       str += strlen(str);
 264
 265       if (err != NULL)
 266         {
 267           (void) strcpy(str, err);
 268           str += strlen(str);
 269         }
 270       else
 271         {
 272           len = sprintf (str, _("(unknown authentication error - %d)"),
 273                          (int) e.re_why);
 274           str += len;
 275         }
 276       break;
 277
 278     case RPC_PROGVERSMISMATCH:
 279       len = sprintf (str, _("; low version = %lu, high version = %lu"),
 280                      e.re_vers.low, e.re_vers.high);
 281       str += len;
 282       break;
 283
 284     default:                    /* unknown */
 285       len = sprintf (str, "; s1 = %lu, s2 = %lu", e.re_lb.s1, e.re_lb.s2);
 286       str += len;
 287       break;
 288     }
 289   *str = '\n';
 290   *++str = '\0';
 291   return (strstart);
 292 }
 293 libc_hidden_def(clnt_sperror)
 294
 295 void
 296 clnt_perror (CLIENT * rpch, const char *msg)
 297 {
 298 #ifdef USE_IN_LIBIO
 299   if (_IO_fwide (stderr, 0) > 0)
 300     (void) fwprintf (stderr, L"%s", clnt_sperror (rpch, msg));
 301   else
 302 #endif
 303     (void) fputs (clnt_sperror (rpch, msg), stderr);
 304 }
 305 libc_hidden_def(clnt_perror)
 306
 307 char *
 308 clnt_spcreateerror (const char *msg)
 309 {
 310   char chrbuf[1024];
 311   char *str = _buf ();
 312   char *cp;
 313   int len;
 314   struct rpc_createerr *ce;
 315
 316   if (str == NULL)
 317     return NULL;
 318   ce = &get_rpc_createerr ();
 319   len = sprintf (str, "%s: ", msg);
 320   cp = str + len;
 321   (void) strcpy(cp, clnt_sperrno (ce->cf_stat));
 322   cp += strlen(cp);
 323
 324   switch (ce->cf_stat)
 325     {
 326     case RPC_PMAPFAILURE:
 327       (void) strcpy(cp, " - ");
 328       cp += strlen(cp);
 329
 330       (void) strcpy(cp, clnt_sperrno (ce->cf_error.re_status));
 331       cp += strlen(cp);
 332
 333       break;
 334
 335     case RPC_SYSTEMERROR:
 336       (void) strcpy(cp, " - ");
 337       cp += strlen(cp);
 338
 339       __glibc_strerror_r (ce->cf_error.re_errno, chrbuf, sizeof chrbuf);
 340       (void) strcpy(cp, chrbuf);
 341       cp += strlen(cp);
 342       break;
 343     default:
 344       break;
 345     }
 346   *cp = '\n';
 347   *++cp = '\0';
 348   return str;
 349 }
 350 libc_hidden_def(clnt_spcreateerror)
 351
 352 void
 353 clnt_pcreateerror (const char *msg)
 354 {
 355 #ifdef USE_IN_LIBIO
 356   if (_IO_fwide (stderr, 0) > 0)
 357     (void) fwprintf (stderr, L"%s", clnt_spcreateerror (msg));
 358   else
 359 #endif
 360     (void) fputs (clnt_spcreateerror (msg), stderr);
 361 }
 362
 363 struct auth_errtab
 364 {
 365   enum auth_stat status;
 366   unsigned int message_off;
 367 };
 368
 369 static const char auth_errstr[] =
 370 {
 371 #define AUTH_OK_IDX             0
 372    _("Authentication OK")
 373    "\0"
 374 #define AUTH_BADCRED_IDX        (AUTH_OK_IDX + sizeof "Authentication OK")
 375    _("Invalid client credential")
 376    "\0"
 377 #define AUTH_REJECTEDCRED_IDX   (AUTH_BADCRED_IDX \
 378                                  + sizeof "Invalid client credential")
 379    _("Server rejected credential")
 380    "\0"
 381 #define AUTH_BADVERF_IDX        (AUTH_REJECTEDCRED_IDX \
 382                                  + sizeof "Server rejected credential")
 383    _("Invalid client verifier")
 384    "\0"
 385 #define AUTH_REJECTEDVERF_IDX   (AUTH_BADVERF_IDX \
 386                                  + sizeof "Invalid client verifier")
 387    _("Server rejected verifier")
 388    "\0"
 389 #define AUTH_TOOWEAK_IDX        (AUTH_REJECTEDVERF_IDX \
 390                                  + sizeof "Server rejected verifier")
 391    _("Client credential too weak")
 392    "\0"
 393 #define AUTH_INVALIDRESP_IDX    (AUTH_TOOWEAK_IDX \
 394                                  + sizeof "Client credential too weak")
 395    _("Invalid server verifier")
 396    "\0"
 397 #define AUTH_FAILED_IDX         (AUTH_INVALIDRESP_IDX \
 398                                  + sizeof "Invalid server verifier")
 399    _("Failed (unspecified error)")
 400 };
 401
 402 static const struct auth_errtab auth_errlist[] =
 403 {
 404   { AUTH_OK, AUTH_OK_IDX },
 405   { AUTH_BADCRED, AUTH_BADCRED_IDX },
 406   { AUTH_REJECTEDCRED, AUTH_REJECTEDCRED_IDX },
 407   { AUTH_BADVERF, AUTH_BADVERF_IDX },
 408   { AUTH_REJECTEDVERF, AUTH_REJECTEDVERF_IDX },
 409   { AUTH_TOOWEAK, AUTH_TOOWEAK_IDX },
 410   { AUTH_INVALIDRESP, AUTH_INVALIDRESP_IDX },
 411   { AUTH_FAILED, AUTH_FAILED_IDX }
 412 };
 413
 414 static char *
 415 internal_function
 416 auth_errmsg (enum auth_stat stat)
 417 {
 418   size_t i;
 419
 420   for (i = 0; i < sizeof (auth_errlist) / sizeof (struct auth_errtab); i++)
 421     {
 422       if (auth_errlist[i].status == stat)
 423         {
 424           return (char*)_(auth_errstr + auth_errlist[i].message_off);
 425         }
 426     }
 427   return NULL;
 428 }
 429
 430
 431 static void __attribute_used__
 432 free_mem (void)
 433 {
 434   free (buf);
 435 }