| /* | 
 |  * clnt_perror.c | 
 |  * | 
 |  * Copyright (c) 2010, 2011, Oracle America, Inc. | 
 |  * | 
 |  * Redistribution and use in source and binary forms, with or without | 
 |  * modification, are permitted provided that the following conditions are | 
 |  * met: | 
 |  * | 
 |  *     * Redistributions of source code must retain the above copyright | 
 |  *       notice, this list of conditions and the following disclaimer. | 
 |  *     * Redistributions in binary form must reproduce the above | 
 |  *       copyright notice, this list of conditions and the following | 
 |  *       disclaimer in the documentation and/or other materials | 
 |  *       provided with the distribution. | 
 |  *     * Neither the name of the "Oracle America, Inc." nor the names of its | 
 |  *       contributors may be used to endorse or promote products derived | 
 |  *       from this software without specific prior written permission. | 
 |  * | 
 |  *   THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS | 
 |  *   "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT | 
 |  *   LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS | 
 |  *   FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE | 
 |  *   COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, | 
 |  *   INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL | 
 |  *   DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE | 
 |  *   GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS | 
 |  *   INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, | 
 |  *   WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING | 
 |  *   NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE | 
 |  *   OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | 
 |  */ | 
 | #include <stdio.h> | 
 | #include <string.h> | 
 | #include <libintl.h> | 
 | #include <rpc/rpc.h> | 
 | #include <wchar.h> | 
 | #include <libio/iolibio.h> | 
 |  | 
 | static char *auth_errmsg (enum auth_stat stat) internal_function; | 
 |  | 
 | #ifdef _RPC_THREAD_SAFE_ | 
 | /* | 
 |  * 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. | 
 |  */ | 
 | #define buf RPC_THREAD_VARIABLE(clnt_perr_buf_s) | 
 | #else | 
 | static char *buf; | 
 | #endif | 
 |  | 
 | /* | 
 |  * Print reply error info | 
 |  */ | 
 | char * | 
 | clnt_sperror (CLIENT * rpch, const char *msg) | 
 | { | 
 |   struct rpc_err e; | 
 |   CLNT_GETERR (rpch, &e); | 
 |  | 
 |   const char *errstr = clnt_sperrno (e.re_status); | 
 |  | 
 |   char chrbuf[1024]; | 
 |   char *str; | 
 |   char *tmpstr; | 
 |   int res; | 
 |   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: | 
 |       res = __asprintf (&str, "%s: %s\n", msg, errstr); | 
 |       break; | 
 |  | 
 |     case RPC_CANTSEND: | 
 |     case RPC_CANTRECV: | 
 |       res = __asprintf (&str, "%s: %s; errno = %s\n", | 
 | 			msg, errstr, __strerror_r (e.re_errno, | 
 | 						   chrbuf, sizeof chrbuf)); | 
 |       break; | 
 |  | 
 |     case RPC_VERSMISMATCH: | 
 |       res = __asprintf (&str, | 
 | 			_("%s: %s; low version = %lu, high version = %lu"), | 
 | 			msg, errstr, e.re_vers.low, e.re_vers.high); | 
 |       break; | 
 |  | 
 |     case RPC_AUTHERROR: | 
 |       tmpstr = auth_errmsg (e.re_why); | 
 |       if (tmpstr != NULL) | 
 | 	res = __asprintf (&str, _("%s: %s; why = %s\n"), msg, errstr, tmpstr); | 
 |       else | 
 | 	res = __asprintf (&str, _("\ | 
 | %s: %s; why = (unknown authentication error - %d)\n"), | 
 | 			  msg, errstr, (int) e.re_why); | 
 |       break; | 
 |  | 
 |     case RPC_PROGVERSMISMATCH: | 
 |       res = __asprintf (&str, | 
 | 			_("%s: %s; low version = %lu, high version = %lu"), | 
 | 			msg, errstr, e.re_vers.low, e.re_vers.high); | 
 |       break; | 
 |  | 
 |     default:			/* unknown */ | 
 |       res = __asprintf (&str, "%s: %s; s1 = %lu, s2 = %lu", | 
 | 			msg, errstr, e.re_lb.s1, e.re_lb.s2); | 
 |       break; | 
 |     } | 
 |  | 
 |   if (res < 0) | 
 |     return NULL; | 
 |  | 
 |   char *oldbuf = buf; | 
 |   buf = str; | 
 |   free (oldbuf); | 
 |  | 
 |   return str; | 
 | } | 
 | libc_hidden_nolink_sunrpc (clnt_sperror, GLIBC_2_0) | 
 |  | 
 | void | 
 | clnt_perror (CLIENT * rpch, const char *msg) | 
 | { | 
 |   (void) __fxprintf (NULL, "%s", clnt_sperror (rpch, msg)); | 
 | } | 
 | #ifdef EXPORT_RPC_SYMBOLS | 
 | libc_hidden_def (clnt_perror) | 
 | #else | 
 | libc_hidden_nolink_sunrpc (clnt_perror, GLIBC_2_0) | 
 | #endif | 
 |  | 
 |  | 
 | struct rpc_errtab | 
 | { | 
 |   enum clnt_stat status; | 
 |   unsigned int message_off; | 
 | }; | 
 |  | 
 | static const char rpc_errstr[] = | 
 | { | 
 | #define RPC_SUCCESS_IDX		0 | 
 |   N_("RPC: Success") | 
 |   "\0" | 
 | #define RPC_CANTENCODEARGS_IDX	(RPC_SUCCESS_IDX + sizeof "RPC: Success") | 
 |   N_("RPC: Can't encode arguments") | 
 |   "\0" | 
 | #define RPC_CANTDECODERES_IDX	(RPC_CANTENCODEARGS_IDX \ | 
 | 				 + sizeof "RPC: Can't encode arguments") | 
 |   N_("RPC: Can't decode result") | 
 |   "\0" | 
 | #define RPC_CANTSEND_IDX	(RPC_CANTDECODERES_IDX \ | 
 | 				 + sizeof "RPC: Can't decode result") | 
 |   N_("RPC: Unable to send") | 
 |   "\0" | 
 | #define RPC_CANTRECV_IDX	(RPC_CANTSEND_IDX \ | 
 | 				 + sizeof "RPC: Unable to send") | 
 |   N_("RPC: Unable to receive") | 
 |   "\0" | 
 | #define RPC_TIMEDOUT_IDX	(RPC_CANTRECV_IDX \ | 
 | 				 + sizeof "RPC: Unable to receive") | 
 |   N_("RPC: Timed out") | 
 |   "\0" | 
 | #define RPC_VERSMISMATCH_IDX	(RPC_TIMEDOUT_IDX \ | 
 | 				 + sizeof "RPC: Timed out") | 
 |   N_("RPC: Incompatible versions of RPC") | 
 |   "\0" | 
 | #define RPC_AUTHERROR_IDX	(RPC_VERSMISMATCH_IDX \ | 
 | 				 + sizeof "RPC: Incompatible versions of RPC") | 
 |   N_("RPC: Authentication error") | 
 |   "\0" | 
 | #define RPC_PROGUNAVAIL_IDX		(RPC_AUTHERROR_IDX \ | 
 | 				 + sizeof "RPC: Authentication error") | 
 |   N_("RPC: Program unavailable") | 
 |   "\0" | 
 | #define RPC_PROGVERSMISMATCH_IDX (RPC_PROGUNAVAIL_IDX \ | 
 | 				  + sizeof "RPC: Program unavailable") | 
 |   N_("RPC: Program/version mismatch") | 
 |   "\0" | 
 | #define RPC_PROCUNAVAIL_IDX	(RPC_PROGVERSMISMATCH_IDX \ | 
 | 				 + sizeof "RPC: Program/version mismatch") | 
 |   N_("RPC: Procedure unavailable") | 
 |   "\0" | 
 | #define RPC_CANTDECODEARGS_IDX	(RPC_PROCUNAVAIL_IDX \ | 
 | 				 + sizeof "RPC: Procedure unavailable") | 
 |   N_("RPC: Server can't decode arguments") | 
 |   "\0" | 
 | #define RPC_SYSTEMERROR_IDX	(RPC_CANTDECODEARGS_IDX \ | 
 | 				 + sizeof "RPC: Server can't decode arguments") | 
 |   N_("RPC: Remote system error") | 
 |   "\0" | 
 | #define RPC_UNKNOWNHOST_IDX	(RPC_SYSTEMERROR_IDX \ | 
 | 				 + sizeof "RPC: Remote system error") | 
 |   N_("RPC: Unknown host") | 
 |   "\0" | 
 | #define RPC_UNKNOWNPROTO_IDX	(RPC_UNKNOWNHOST_IDX \ | 
 | 				 + sizeof "RPC: Unknown host") | 
 |   N_("RPC: Unknown protocol") | 
 |   "\0" | 
 | #define RPC_PMAPFAILURE_IDX	(RPC_UNKNOWNPROTO_IDX \ | 
 | 				 + sizeof "RPC: Unknown protocol") | 
 |   N_("RPC: Port mapper failure") | 
 |   "\0" | 
 | #define RPC_PROGNOTREGISTERED_IDX (RPC_PMAPFAILURE_IDX \ | 
 | 				   + sizeof "RPC: Port mapper failure") | 
 |   N_("RPC: Program not registered") | 
 |   "\0" | 
 | #define RPC_FAILED_IDX		(RPC_PROGNOTREGISTERED_IDX \ | 
 | 				 + sizeof "RPC: Program not registered") | 
 |   N_("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 } | 
 | }; | 
 |  | 
 |  | 
 | /* | 
 |  * This interface for use by clntrpc | 
 |  */ | 
 | char * | 
 | clnt_sperrno (enum clnt_stat stat) | 
 | { | 
 |   size_t i; | 
 |  | 
 |   for (i = 0; i < sizeof (rpc_errlist) / sizeof (struct rpc_errtab); i++) | 
 |     { | 
 |       if (rpc_errlist[i].status == stat) | 
 | 	{ | 
 | 	  return _(rpc_errstr + rpc_errlist[i].message_off); | 
 | 	} | 
 |     } | 
 |   return _("RPC: (unknown error code)"); | 
 | } | 
 | libc_hidden_def (clnt_sperrno) | 
 |  | 
 | void | 
 | clnt_perrno (enum clnt_stat num) | 
 | { | 
 |   (void) __fxprintf (NULL, "%s", clnt_sperrno (num)); | 
 | } | 
 | #ifdef EXPORT_RPC_SYMBOLS | 
 | libc_hidden_def (clnt_perrno) | 
 | #else | 
 | libc_hidden_nolink_sunrpc (clnt_perrno, GLIBC_2_0) | 
 | #endif | 
 |  | 
 | char * | 
 | clnt_spcreateerror (const char *msg) | 
 | { | 
 |   struct rpc_createerr *ce = &get_rpc_createerr (); | 
 |  | 
 |   char chrbuf[1024]; | 
 |   const char *connector = ""; | 
 |   const char *errstr = ""; | 
 |   switch (ce->cf_stat) | 
 |     { | 
 |     case RPC_PMAPFAILURE: | 
 |       connector = " - "; | 
 |       errstr = clnt_sperrno (ce->cf_error.re_status); | 
 |       break; | 
 |  | 
 |     case RPC_SYSTEMERROR: | 
 |       connector = " - "; | 
 |       errstr = __strerror_r (ce->cf_error.re_errno, chrbuf, sizeof chrbuf); | 
 |       break; | 
 |  | 
 |     default: | 
 |       break; | 
 |     } | 
 |  | 
 |   char *str; | 
 |   if (__asprintf (&str, "%s: %s%s%s\n", | 
 | 		  msg, clnt_sperrno (ce->cf_stat), connector, errstr) < 0) | 
 |     return NULL; | 
 |  | 
 |   char *oldbuf = buf; | 
 |   buf = str; | 
 |   free (oldbuf); | 
 |  | 
 |   return str; | 
 | } | 
 | libc_hidden_nolink_sunrpc (clnt_spcreateerror, GLIBC_2_0) | 
 |  | 
 | void | 
 | clnt_pcreateerror (const char *msg) | 
 | { | 
 |   (void) __fxprintf (NULL, "%s", clnt_spcreateerror (msg)); | 
 | } | 
 | #ifdef EXPORT_RPC_SYMBOLS | 
 | libc_hidden_def (clnt_pcreateerror) | 
 | #else | 
 | libc_hidden_nolink_sunrpc (clnt_pcreateerror, GLIBC_2_0) | 
 | #endif | 
 |  | 
 | struct auth_errtab | 
 | { | 
 |   enum auth_stat status; | 
 |   unsigned int message_off; | 
 | }; | 
 |  | 
 | static const char auth_errstr[] = | 
 | { | 
 | #define AUTH_OK_IDX		0 | 
 |    N_("Authentication OK") | 
 |    "\0" | 
 | #define AUTH_BADCRED_IDX	(AUTH_OK_IDX + sizeof "Authentication OK") | 
 |    N_("Invalid client credential") | 
 |    "\0" | 
 | #define AUTH_REJECTEDCRED_IDX	(AUTH_BADCRED_IDX \ | 
 | 				 + sizeof "Invalid client credential") | 
 |    N_("Server rejected credential") | 
 |    "\0" | 
 | #define AUTH_BADVERF_IDX	(AUTH_REJECTEDCRED_IDX \ | 
 | 				 + sizeof "Server rejected credential") | 
 |    N_("Invalid client verifier") | 
 |    "\0" | 
 | #define AUTH_REJECTEDVERF_IDX	(AUTH_BADVERF_IDX \ | 
 | 				 + sizeof "Invalid client verifier") | 
 |    N_("Server rejected verifier") | 
 |    "\0" | 
 | #define AUTH_TOOWEAK_IDX	(AUTH_REJECTEDVERF_IDX \ | 
 | 				 + sizeof "Server rejected verifier") | 
 |    N_("Client credential too weak") | 
 |    "\0" | 
 | #define AUTH_INVALIDRESP_IDX	(AUTH_TOOWEAK_IDX \ | 
 | 				 + sizeof "Client credential too weak") | 
 |    N_("Invalid server verifier") | 
 |    "\0" | 
 | #define AUTH_FAILED_IDX		(AUTH_INVALIDRESP_IDX \ | 
 | 				 + sizeof "Invalid server verifier") | 
 |    N_("Failed (unspecified error)") | 
 | }; | 
 |  | 
 | static const struct auth_errtab auth_errlist[] = | 
 | { | 
 |   { 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 } | 
 | }; | 
 |  | 
 | 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 _(auth_errstr + auth_errlist[i].message_off); | 
 | 	} | 
 |     } | 
 |   return NULL; | 
 | } | 
 |  | 
 |  | 
 | libc_freeres_fn (free_mem) | 
 | { | 
 |   /* Not libc_freeres_ptr, since buf is a macro.  */ | 
 |   free (buf); | 
 | } |